Read and write into a file using VBScript

by

You can create a temp file, then rename it back to original file:

Set objFS = CreateObject("Scripting.FileSystemObject")
strFile = "c:\test\file.txt"
strTemp = "c:\test\temp.txt"
Set objFile = objFS.GetFile(strFile)
Set objOutFile = objFS.CreateTextFile(strTemp,True)
Set ts = objFile.OpenAsTextStream(1,-2)
Do Until ts.AtEndOfStream
    strLine = ts.ReadLine
    ' do something with strLine 
    objOutFile.Write(strLine)
Loop
objOutFile.Close
ts.Close
objFS.DeleteFile(strFile)
objFS.MoveFile strTemp,strFile

Usage is almost the same using OpenTextFile:

Set objFS = CreateObject("Scripting.FileSystemObject")
strFile = "c:\test\file.txt"
strTemp = "c:\test\temp.txt"
Set objFile = objFS.OpenTextFile(strFile)
Set objOutFile = objFS.CreateTextFile(strTemp,True)    
Do Until objFile.AtEndOfStream
    strLine = objFile.ReadLine
    ' do something with strLine 
    objOutFile.Write(strLine & "kndfffffff")
Loop
objOutFile.Close
objFile.Close
objFS.DeleteFile(strFile)
objFS.MoveFile strTemp,strFile

More Related Contents:

  1. Is it possible to embed and execute VBScript within a batch file without using a temporary file?
  2. Adding quotes to a string in VBScript
  3. About using Double quotes in Vbscript
  4. VBScript — Using error handling
  5. Recursively access subfolder files inside a folder
  6. Hide command prompt window when using Exec()
  7. Cannot use parentheses when calling a Sub Error 800A0414 VBS
  8. Prevent VBscript app from showing Console Window
  9. How do I run a VBScript in 32-bit mode on a 64-bit machine?
  10. Creating multi-select list box in VBScript [closed]
  11. Does VBScript allow named arguments in function calls?
  12. How do I sort arrays using vbscript?
  13. VBscript code to capture stdout, without showing console window
  14. Run Command Line & Command From VBS
  15. Breaking a String Across Multiple Lines
  16. ADODB.Parameters error ‘800a0e7c’ Parameter object is improperly defined. Inconsistent or incomplete information was provided
  17. What does the “On Error Resume Next” statement do?
  18. VBScript to send email without running Outlook
  19. How to find the window Title of Active(foreground) window using Window Script Host
  20. How to identify between ok and cancel button in inputbox
  21. Can I pick up environment variables in vbscript WSH script?
  22. VBscript relative path
  23. Use clipboard from VBScript
  24. How do I include a common file in VBScript (similar to C #include)?
  25. VBS with Space in File Path
  26. insert a variable to cmd command
  27. Creating and writing lines to a file
  28. Create a folder in Outlook: error 800A0401 – Expected End of Statement
  29. Is the Sleep operation no longer used in VBscript?
  30. Run a vbscript from another vbscript

Leave a Comment