Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Immer 34 Zeilen auslesen, dann Leerzeile, nächste 34 Zeilen usw.

Frage Entwicklung Batch & Shell

Mitglied: RobertB

RobertB (Level 1) - Jetzt verbinden

17.02.2009, aktualisiert 11:35 Uhr, 4491 Aufrufe, 4 Kommentare

Hallo und guten Tag !

Ich möchte die ersten 34 Zeilen einer .txt - Datei per Batch in eine Zeile schreiben, dann die nächsten 34 Zeilen usw.
Dann muss ein Zeilenumbruch her bzw. eine Leerzeile.

Falls jemand von Euch diesbezüglich eine Lösung hat, würde ich mich freuen, wenn er mir die Lösung hier mitteilt.

Vielen Dank für Euer Interesse und evtl. Hilfe schon mal im voraus.
Mitglied: bastla
17.02.2009 um 17:18 Uhr
Hallo RobertB!

Soferne nicht irgendwelche Sonderzeichen (wie "&", "<", etc) dazwischenfunken, sollte das etwa so gehen:
01.
@echo off & setlocal 
02.
set "Ein=D:\Daten.txt" 
03.
set "Aus=D:\DatenNeu.txt" 
04.
set /a Anzahl=34 
05.
set "Delim=" 
06.
 
07.
if exist "%Aus%" del "%Aus%" 
08.
for /f "tokens=1* delims=:" %%i in ('findstr /n "^" "%Ein%"') do set "Zeile=%%j" & call :ProcessFile %%i 
09.
goto :eof 
10.
 
11.
:ProcessFile 
12.
set /a KeinUmbruch=%1 %% Anzahl 
13.
if %KeinUmbruch% gtr 0 ( 
14.
    >>"%Aus%" <nul set /p "=%Zeile%%Delim%" 
15.
) else ( 
16.
    >>"%Aus%" echo %Zeile% 
17.
    >>"%Aus%" echo\ 
18.
19.
goto :eof
Falls zwischen die einzelnen Zeilen ein Trennzeichen gesetzt werden soll, dieses nach dem "=" in Zeile 5 eintragen, und falls doch keine Leerzeile benötigt wird, die Zeile 17 ersatzlos streichen.

Grüße
bastla
Bitte warten ..
Mitglied: RobertB
17.02.2009 um 18:29 Uhr
Hallo bastla,

vielen Dank für Deine Unterstützung. Leider erhalte ich immer einen Syntaxfehler, kann aber nicht lokalisieren an welcher Stelle der Fehler auftritt.

Außerdem habe ich eine Fülle an Sonderzeichen in der einzulesenden Text-Datei, wie .:;-='"<>?/ usw. und die könnten auch hm, dazwischenfunken, oder ?

Würde mich wirklich freuen, wenn Du mir noch einen Tipp geben könntest.

Grüße Rob
Bitte warten ..
Mitglied: bastla
17.02.2009 um 18:44 Uhr
Hallo RobertB!

Dann vielleicht so:
01.
@echo off & setlocal 
02.
set "Ein=D:\Daten.txt" 
03.
set "Aus=D:\DatenNeu.txt" 
04.
set /a Anzahl=34 
05.
set "Delim= " 
06.
 
07.
if exist "%Aus%" del "%Aus%" 
08.
for /f "tokens=1* delims=:" %%i in ('findstr /n "^" "%Ein%"') do set "Zeile=%%j" & call :ProcessFile %%i 
09.
goto :eof 
10.
 
11.
:ProcessFile 
12.
set "Zeile=%Zeile:<=^<%" 
13.
set "Zeile=%Zeile:>=^>%" 
14.
set "Zeile=%Zeile:&=^&%" 
15.
set "Zeile=%Zeile:|=^|%" 
16.
 
17.
set /a GleicheZeile=%1 %% Anzahl 
18.
if %GleicheZeile% gtr 0 ( 
19.
    >>"%Aus%" <nul set /p =%Zeile%%Delim% 
20.
) else ( 
21.
    >>"%Aus%" echo %Zeile% 
22.
    >>"%Aus%" echo\ 
23.
24.
goto :eof
Wenn Du weiterhin Fehlermeldungen erhältst, das "echo off" auf "echo on" ändern und den Batch direkt von der Kommandozeile starten - so wird jeder Befehl vor der Ausführung zunächst angezeigt.
Spätestens wenn sich herausstellt, dass eine ungerade Anzahl von Leerzeichen in einer Zeile vorkommt, würde ich eher zur Verwendung von VBScript raten - das sähe dann etwa so aus:
01.
Ein = "D:\Daten.txt" 
02.
Aus = "D:\DatenNeu.txt" 
03.
Anzahl = 34 
04.
Delim = "" 
05.
 
06.
Set fso = CreateObject("Scripting.FileSystemObject") 
07.
TextZeilen = Split(fso.OpenTextFile(Ein).ReadAll, vbCrLF) 
08.
U = UBound(TextZeilen) 
09.
 
10.
Set DateiAus = fso.CreateTextFile(Aus, True) 
11.
 
12.
For i = 0 To U Step Anzahl 
13.
	Zeile = TextZeilen(i) 
14.
	Bis = i + Anzahl - 1 
15.
	If Bis > U Then Bis = U 
16.
	For j = i + 1 To Bis 
17.
	    Zeile = Zeile & Delim & TextZeilen(j) 
18.
	Next 
19.
	If Zeile <> "" Then DateiAus.WriteLine Zeile & vbCrLF 
20.
Next 
21.
DateiAus.Close
Ein ev gewünschtes Trennzeichen wäre hier zwischen die Anführungszeichen in Zeile 4 zu setzen, und um die zusätzliche Leerzeile zu unterbinden genügt es, in Zeile 19 das "& vbCrLF" zu entfernen (oder durch ein diesem Teil der Zeile vorangestelltes Apostroph ' zu deaktivieren).

Grüße
bastla
Bitte warten ..
Mitglied: RobertB
18.02.2009 um 08:59 Uhr
Hallo bastla,

riesen Dank für Deine Unterstützung, plus 5 Sterne. Das Problem ist somit gelöst.
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Textdatei Zeile für Zeile auslesen
Frage von RIPUEDBatch & Shell

Hallo, ich würde gerne mit einem Batch-Skript Zeilen aus einer Textdatei einzeln und nacheinander auslesen und diese dann nach ...

Batch & Shell
Auslesen einer Zeile
Frage von hansbaerBatch & Shell2 Kommentare

Hallo schon wieder, wie bereits erwähnt bin ich eine absolute Flachpfeife was das anbelangt. Nun suche ich ein script, ...

Batch & Shell
Auslesen der drittletzten Zeile ..
gelöst Frage von .SesslBatch & Shell11 Kommentare

Hallo zusammen, ich habe nach einer ganzen Weile, mit Eurer Hilfe bei ähnlichen Problemen, mir ein funktionierendes Script gebastelt. ...

Batch & Shell
In Batch mehrere Zeilen auslesen ?!?
gelöst Frage von JanInfoHDBatch & Shell2 Kommentare

Ich habe in Programm in Batch geschrieben, doch es ließt aus einer .txt-Datei immer nur die erste Zeile, Was ...

Neue Wissensbeiträge
Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 1 TagWindows 107 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Sicherheits-Tools

Achtung: Sicherheitslücke im FortiClient VPN-Client

Tipp von kgborn vor 1 TagSicherheits-Tools

Ich weiß nicht, wie häufig die NextGeneration Endpoint Protection-Lösung von Fortinet in deutschen Unternehmen eingesetzt wird. An dieser Stelle ...

Internet

USA: Die FCC schaff die Netzneutralität ab

Information von Frank vor 2 TagenInternet5 Kommentare

Jetzt beschädigt US-Präsident Donald Trump auch noch das Internet. Der neu eingesetzte FCC-Chef Ajit Pai ist bekannter Gegner einer ...

DSL, VDSL

ALL-BM200VDSL2V - Neues VDSL-Modem mit Vectoring von Allnet

Information von Lochkartenstanzer vor 2 TagenDSL, VDSL2 Kommentare

Moin, Falls jemand eine Alternative zu dem draytek sucht: Gruß lks

Heiß diskutierte Inhalte
Batch & Shell
Kann man mit einer .txt Datei eine .bat Datei öffnen?
gelöst Frage von HelloWorldBatch & Shell20 Kommentare

Wie schon im Titel beschrieben würde ich gerne durch einfaches klicken auf eine Text oder Word Datei eine Batch ...

Router & Routing
OpenWRT bzw. L.E.D.E auf Buffalo WZR-HP-AG300H - update
gelöst Frage von EpigeneseRouter & Routing11 Kommentare

Guten Tag, ich habe auf einem Buffalo WZR-HP-AG300H die alternative Firmware vom L.E.D.E Projekt geflasht. Ich bin es von ...

LAN, WAN, Wireless
WLAN Reichweite erhöhen mit neuer Antenne
gelöst Frage von gdconsultLAN, WAN, Wireless8 Kommentare

Hallo, ich besitze einen TL-WN722N USB-WLAN Dongle mit einer richtigen Antenne. Ich frage mich jetzt ob man die Reichweite ...

Windows Server
Ping auf einen bestimmten Server nicht möglich
gelöst Frage von a.thierWindows Server7 Kommentare

Hallo, ich habe folgendes Problem. srv-dc1: Ping srv-nav > geht Ping srv-exchange > geht nicht srv-exchange: Ping srv-dc1 > ...