aus Textdatei auslesen

[Killer-Man]

Den gesamten Inhalt aus einer txt Datei auszulesen, habe ich schon geschafft:

strdatei="C:\Users\xxx\Desktop\no1.txt"
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objTest = objFSO.GetFile(strdatei)
Set objFile = objFSO.OpenTextFile(strdatei, ForReading)
strText = objFile.ReadAll
wscript.echo strText
objFile.Close

Nun würde ich gerne nur Zeichen 10-20 aus der Datei auslesen.
Ich denke mal, da muss nur etwas in der 6. Zeile geändert werden, aber ich krieg's einfach nicht hin

Kann mir da jemand weiterhelfen?

 

[ronaldh]

Das geht mit der mid-Funktion, z.B.:

      strText = Mid(strText, 10, 10)

Diese Funktion extrahiert ab der 10. Stelle 10 Zeichen aus Deiner Variablen.

 

[Killer-Man]

Vielen Dank!