« VBScript » : différence entre les versions
		
		
		
		
		
		Aller à la navigation
		Aller à la recherche
		
				
		
		
	
Aucun résumé des modifications  | 
				Aucun résumé des modifications  | 
				||
| Ligne 6 : | Ligne 6 : | ||
   outFile=CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\stage1.txt"  | 
     outFile=CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\stage1.txt"  | 
||
   Set objFile = objFSO.CreateTextFile(outFile,True)  | 
     Set objFile = objFSO.CreateTextFile(outFile,True)  | 
||
   objFile.WriteLine variable  | 
|||
Append in a text file  | 
|||
   Set objFSO=CreateObject("Scripting.FileSystemObject")  | 
|||
   outFile=CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\stage2.txt"  | 
|||
   Set objFile = objFSO.OpenTextFile(outFile, 8, True)  | 
|||
   objFile.WriteLine variable  | 
     objFile.WriteLine variable  | 
||
Dernière version du 15 février 2019 à 11:10
Print text
  Wscript.echo("text")
Write in a text file
  Set objFSO=CreateObject("Scripting.FileSystemObject")
  outFile=CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\stage1.txt"
  Set objFile = objFSO.CreateTextFile(outFile,True)
  objFile.WriteLine variable
Append in a text file
  Set objFSO=CreateObject("Scripting.FileSystemObject")
  outFile=CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\stage2.txt"
  Set objFile = objFSO.OpenTextFile(outFile, 8, True)
  objFile.WriteLine variable
If you can't see all the variable value with the watch point, you can open immediate window View--> Intermediate Window or CTRL-G and type
debug.print VARIABLE_NAME
Copy variable into the clipboard
  Set objIE = CreateObject("InternetExplorer.Application")
  objIE.Visible = False
  objIE.Navigate("about:blank")
  objIE.document.parentwindow.clipboardData.SetData "text", host
  objIE.Quit