Datei öffnen & in Datei schreiben



  • hallo,
    (erstmal vorweg: ich weiß nicht ob ich das richtige subForum getroffen hab)

    ich will (vielmehr muss 😞 ) mit vb script eine datei öffnen aus dieser lesen und dann in eine andere datei schreiben. Mit der hilfe von google und der msdn hab ich auch schon einiges geschafft. nur leider bekomme ich wenn ich das script laufen lassen will folgende fehlermeldung:

    Line: 17
    Cahr: 1
    Error: Bad file mode

    hier der TEST code:

    const getpath = "C:\project\VB Script sachen\Testfile1.dat"
    
    const setpath = "C:\project\VB Script sachen\TEST.dat"
    
    dim file
    
    dim read
    
    Set file = CreateObject("Scripting.FileSystemObject")
    set read = file.OpenTextFile(getpath)',ForReading,false,TristateFalse)
    dim value
    value = read.ReadLine()
    
    read.Close
    
    set read = file.OpenTextFile(setpath)',ForWritting)',true)
    read.Write value 'warum Fehler?
    
    read.Close
    
    Set file = Nothing
    Set read = Nothing
    

    Könnt ihr mit mir sagen was ich falsch mache
    (und eventuell auch warum er die (jetzt) auskommnetierten Argumente bei OpenTextFile nicht will)?

    Gruß,

    Heimwerkerking



  • Hab den Fehler schon gefunden!


Anmelden zum Antworten