Wie lösche ich jedes n-te Zeichen in der Datei (über Batch oder Vbs)?

Question

Wie kann ich jedes n-te (4000.) Zeichen (Leerzeichen) in einer Datei (.txt oder .sql) am besten über Batch oder Vbs löschen?

Answer 1

Sie benötigen etwas VBScript, das können Sie nicht mit einer Batch-Datei tun. So etwas wie diese wird es für Sie tun

option Explicit 

Const ForReading = 1 
Const ForWriting = 2 
Const ForAppending = 8 

Dim fso 

Dim inFile 
Dim outFile 
Dim buffer 

set fso = CreateObject("Scripting.FileSystemObject") 

Set inFile = fso.OpenTextFile("C:\testIn.txt", ForReading) 
Set outFile = fso.OpenTextFile("C:\testOut.txt", ForWriting, True) 

Do While Not inFile.AtEndOfStream 
    buffer = inFile.Read(3999) 
    outFile.Write buffer 
    If Not inFile.AtEndOfStream Then 
     inFile.Read (1) 
    End If 
Loop 

inFile.Close 
outFile.Close 

Hope this :)