Danke für die schnelle Antwort:)
hab das ganze mal getestet
Code:
Imports System.IO
Module Module1
Sub Main()
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, MyFile, FileName, TextLine
fso = CreateObject("Scripting.FileSystemObject")
' Open the file for output.
FileName = ("C:\test.txt")
MyFile = fso.OpenTextFile(FileName, ForWriting, True)
' Write to the file.
' MyFile.WriteLine("Hello world!")
' MyFile.WriteLine("The quick brown fox")
MyFile.Close()
' Open the file for input.
MyFile = fso.OpenTextFile(FileName, ForReading)
' Read from the file and display the results.
Do While MyFile.AtEndOfStream <> True
TextLine = MyFile.ReadLine
Document.Write(TextLine & "<br />")
Loop
MyFile.Close()
End Sub
End Module
jetzt bringt er mir VB immer noch die Fehlermeldung
"Document" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner
Schutzstufe möglicherweise nicht zugegriffen werden.
Sorry bin absoluter Neuling in VB
Was muss ich tun?
welche Code Zeile ist jetzt nun genau für das Ausführen
der Textdateizeilen verantwortlich?
Die Zeilen "write to the file..."
kann ich ja weg lassen...ich will ja nichts in die Textdatei reinschreiben.
Vielen Dank für die Hilfe!
MFG