Reading and writing value from a textfile by using vbscript code

Question

i have a variable named  data  i need to write in to a textfile named  listfile txt  Can you tell me the vbscript code to do that  And i need vbscript code for reading value from textfile  listfile txt  also

User · Answer

Dim obj   Set obj   CreateObject  quot Scripting FileSystemObject quot   Dim outFile   Set outFile   obj CreateTextFile  quot listfile txt quot   Dim inFile  Set inFile   obj OpenTextFile  quot listfile txt quot      read file data   inFile ReadAll inFile Close    write file outFile write  data  outFile Close

User · Answer

To Write  Set objFileToWrite   CreateObject  Scripting FileSystemObject   OpenTextFile  C  listfile txt  2 true  objFileToWrite WriteLine data  objFileToWrite Close Set objFileToWrite   Nothing   OpenTextFile parameters     lt filename gt   IOMode  1 Read 2 write 8 Append   Create  true false   Format  -2 System Default -1 Unicode 0 ASCII    To Read the entire file  Set objFileToRead   CreateObject  Scripting FileSystemObject   OpenTextFile  C  listfile txt  1  strFileText   objFileToRead ReadAll   objFileToRead Close Set objFileToRead   Nothing   To Read line by line  Set objFileToRead   CreateObject  Scripting FileSystemObject   OpenTextFile  C  listfile txt  1  Dim strLine do while not objFileToRead AtEndOfStream      strLine   objFileToRead ReadLine         Do something with the line loop objFileToRead Close Set objFileToRead   Nothing

User · Answer

Need help reading and writing text file using vbscript - Dev Shed  http   forums devshed com asp-programming-51 need-help-reading-and-writing-text-file-using-vbscript-355967 html  VBScript - FileSystemObject  http   ezinearticles com  VBScript---FileSystemObject amp id 294348

User · Answer

This script will read lines from large file and write to new small files  Will duplicate the header of the first line  Header  to all child files  Dim strLine lCounter   1 fCounter   1 cPosition   1 MaxLine   1000 splitAt   MaxLine Dim fHeader sFile    inputFile txt  dFile   LEFT sFile   LEN sFile -4   amp    0   amp  fCounter  amp    txt  Set objFileToRead   CreateObject  Scripting FileSystemObject   OpenTextFile sFile 1  Set objFileToWrite   CreateObject  Scripting FileSystemObject   OpenTextFile dFile 2 true  do while not objFileToRead AtEndOfStream         strLine   objFileToRead ReadLine           objFileToWrite WriteLine strLine          If cPosition   1 Then             fHeader   strLine         End If         If cPosition   splitAt Then             fCounter   fCounter   1             splitAt   splitAt   MaxLine             objFileToWrite Close             Set objFileToWrite   Nothing             If fCounter  lt  10 Then                 dFile LEFT dFile   LEN dFile -5   amp  fCounter  amp    txt                  Set objFileToWrite   CreateObject  Scripting FileSystemObject   OpenTextFile dFile 2 true                  objFileToWrite WriteLine fHeader              ElseIf fCounter  lt 100 Or fCounter   100 Then                 dFile LEFT dFile   LEN dFile -6   amp  fCounter  amp    txt                  Set objFileToWrite   CreateObject  Scripting FileSystemObject   OpenTextFile dFile 2 true                  objFileToWrite WriteLine fHeader              Else                 dFile LEFT dFile   LEN dFile -7    amp  fCounter  amp    txt                  Set objFileToWrite   CreateObject  Scripting FileSystemObject   OpenTextFile dFile 2 true                  objFileToWrite WriteLine fHeader              End If         End If         lCounter lCounter   1         cPosition cPosition   1 Loop objFileToWrite Close Set objFileToWrite   Nothing objFileToRead Close Set objFileToRead   Nothing

[vbscript] Reading and writing value from a textfile by using vbscript code

Examples related to vbscript