J'ai une variable nommée 'données' je dois écrire dans un fichier texte nommé "listfile.txt" .Pouvez-vous me dire le code vbscript pour le faire .. et je besoin d'un code vbscript pour la valeur de lecture de fichier texte "listfile.txt" aussiLecture et écriture de valeur à partir d'un fichier texte en utilisant le code vbscript
6
A
Répondre
28
Pour écrire
Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\listfile.txt",2,true)
objFileToWrite.WriteLine(data)
objFileToWrite.Close
Set objFileToWrite = Nothing
paramètres OpenTextFile:
<filename>, IOMode (1=Read,2=write,8=Append), Create (true,false), Format (-2=System Default,-1=Unicode,0=ASCII)
Pour lire l'intégralité du fichier
Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\listfile.txt",1)
strFileText = objFileToRead.ReadAll()
objFileToRead.Close
Set objFileToRead = Nothing
à lire ligne par ligne
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
2
Besoin d'aide lire et écrire un fichier texte à l'aide vbscript - Dev Shed
VBScript - FileSystemObject
http://ezinearticles.com/?VBScript---FileSystemObject&id=294348
0
Ce script lit les lignes d'un fichier volumineux et écrit dans de nouveaux petits fichiers. Dupliquera l'en-tête de la première ligne (en-tête) à tous les fichiers enfants
Dim strLine
lCounter = 1
fCounter = 1
cPosition = 1
MaxLine = 1000
splitAt = MaxLine
Dim fHeader
sFile = "inputFile.txt"
dFile = LEFT(sFile, (LEN(sFile)-4))& "_0" & fCounter & ".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 < 10 Then
dFile=LEFT(dFile, (LEN(dFile)-5))& fCounter & ".txt"
Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile(dFile,2,true)
objFileToWrite.WriteLine(fHeader)
ElseIf fCounter <100 Or fCounter = 100 Then
dFile=LEFT(dFile, (LEN(dFile)-6))& fCounter & ".txt"
Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile(dFile,2,true)
objFileToWrite.WriteLine(fHeader)
Else
dFile=LEFT(dFile, (LEN(dFile)-7)) & fCounter & ".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
+1
ne pas répondre à la question. –
Questions connexes
- 1. Lecture à partir d'un fichier, effacement, écriture
- 2. Comment lire à partir d'un fichier texte en utilisant VBScript?
- 3. Lecture de texte et écriture dans Excel en Java
- 4. Lecture/écriture de fichier texte à plusieurs reprises/simultanément
- 5. Lecture et écriture Bits dans des fichiers texte en Java
- 6. Lecture et écriture dans EditText
- 7. Lecture et écriture Writelog
- 8. Qt - lecture à partir d'un fichier texte
- 9. écriture et de lecture des chaînes à/de fichier interne
- 10. lecture en lignes de texte à partir du fichier
- 11. Java: fichier CSV Lecture et écriture
- 12. Lecture et écriture DEVMODE.dmColor
- 13. Lecture et analyse d'entiers à partir d'un fichier texte
- 14. Lecture de données à partir d'un fichier texte en C
- 15. Deux processus de lecture/écriture dans le même fichier Python
- 16. Lecture et écriture dans le fichier Word en utilisant Visual Studio 2005
- 17. Menu texte C++: écriture, lecture et tri des données
- 18. Java - Lecture/écriture de fichiers
- 19. Lecture d'informations à partir d'un fichier texte en C
- 20. Lecture/écriture à partir d'un socket Unix en Ruby
- 21. Lecture de caractères ASCII étendus à partir d'un fichier et conversion en valeur décimale ASCII
- 22. Lecture/écriture des métadonnées de fichiers en utilisant C/C++
- 23. Lecture/écriture à partir de tubes nommés sous mono/Linux
- 24. fichiers en lecture/écriture Serrures
- 25. java - problème de lecture/écriture de fichier
- 26. écriture et de lecture Plist
- 27. Comment retourner une valeur à partir d'exe et capturer la valeur retournée en utilisant C#
- 28. Comment appeler le code système à partir de JScript/VBScript?
- 29. lecture de fichier texte en C#
- 30. Lecture à partir du fichier en eclipse
double possible de [Comment lire un fichier texte à l'aide VBScript?] (Http://stackoverflow.com/questions/854975/how -to-read-from-a-text-file-using-vbscript) – Helen
Cette question est assez bien couverte dans StackOverflow: http://stackoverflow.com/search?q=[vbscript]+read+text+file – Fionnuala