Leer y escribir valor de un archivo de texto usando código vbscript

Solución:

Escribir

Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:listfile.txt",2,true)
objFileToWrite.WriteLine(data)
objFileToWrite.Close
Set objFileToWrite = Nothing

Parámetros de OpenTextFile:

<filename>, IOMode (1=Read,2=write,8=Append), Create (true,false), Format (-2=System Default,-1=Unicode,0=ASCII)

Para leer el archivo completo

Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:listfile.txt",1)
strFileText = objFileToRead.ReadAll()
objFileToRead.Close
Set objFileToRead = Nothing

Leer línea por línea

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

Necesita ayuda para leer y escribir archivos de texto con 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&id=294348

---

---

Utiliza Nuestro Buscador