per tornare al problema originale, farlo con un file batch non ne sono capace, con un file script devi fare una cosa tipo (l'ho copiata dall'help di access) adattandolo alle tue esigenze
codice:
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim fs, fs2, f, ts, s
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CreateTextFile "test1.txt"
Set f = fs.GetFile("test1.txt")
Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)
Set fs2 = CreateObject("Scripting.FileSystemObject")
Set a = fs2.OpenTextFile("c:\test.txt", ForReading, False)
for i=1 to 10
retstring = a.ReadLine
next i
Do While a.AtEndOfStream <> True
ts.Write
Loop
a.Close
ts.close
fs.movefile("c:\text.txt", "c:\text1.txt")
salvarlo come .vbs ed eseguirlo con un doppio click
p.s. l'ho copiato incollato e modificato in 2 minuti occhio agli errori