Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Letzen Zeilen löschen

Frage Entwicklung Batch & Shell

Mitglied: Madej1

Madej1 (Level 1) - Jetzt verbinden

28.11.2007, aktualisiert 03.12.2007, 5384 Aufrufe, 2 Kommentare

Hab eine Frage. Ich les ein Verzeichnis aus:

Datentr„ger in Laufwerk E: ist Daten
Volumeseriennummer: xxxxx-xxxx

Verzeichnis von E:\*\html

27.11.2007 16:22 0 index.html
27.11.2007 15:24 22.952 index_favorites.html
27.11.2007 15:24 16.610 index_periodic.html
27.11.2007 15:24 1.627.698 PRUEF_V_A_STREET.html
28.11.2007 09:19 3.062 statistic_time.html
28.11.2007 09:19 3.062 temp.html
6 Datei(en) 1.673.384 Bytes
0 Verzeichnis(se), 121.650.913.280 Bytes frei

Hab des in einer Text datei stehen, aber ich bräuchte nur des:

index.html
index_favorites.html
index_periodic.html
PRUEF_V_A_STREET.html
statistic_time.html
temp.html

Wie kann ich mit batch einfach Die Letzten Zeilen löschen und die ersten 5.
Und es können auch mal mehhr dateien sein . Hab es mit sed probiert des schmeißt mir aber dann alles in eine Zeile...! Würde mich überhilfe freuen.

Hab es geschafft die ersten zeichen in jeder Zeile zu löschen jetzt hab ich noch den Schnippsel:
01.
02.
 
03.
 
04.
tml 
05.
 
06.
index.html 
07.
index_favorites.html 
08.
index_periodic.html 
09.
PRUEF_V_A_STREET.html 
10.
statistic_time.html 
11.
temp.html 
12.
3.384 Bytes 
13.
1.650.909.184 Bytes frei
Da müssen nur noch die ersten 5Zeilen und die letzten 2 zeilen weg! Wie kann ich des machen?

Hab dann meinen Lösungweg gefunden... ist zwar n bisschen umständlich :D , aber falls es jemand interessiert:
01.
@echo off 
02.
cd F:\html\ 
03.
dir *.html>dir.txt 
04.
setlocal 
05.
set xy=36 
06.
set "Alt=E:\*\dir.txt" 
07.
set "Neu=E:\*\dir.txt" 
08.
set "Cut=%temp%\Cut.vbs" 
09.
echo Set fso=CreateObject("Scripting.FileSystemObject"):aL=Split(fso.OpenTextFile(WScript.Arguments(0),1).ReadAll,vbCrLF)>"%Cut%" 
10.
echo Set N=fso.OpenTextFile(WScript.Arguments(1),2,-1):P=WScript.Arguments(2)+1:For Each sL In aL: N.WriteLine Mid(sL,P):Next:N.Close>>"%Cut%" 
11.
cscript //nologo "%Cut%" "%Alt%" "%Neu%" %xy% 
12.
del "%Cut%" 
13.
 
14.
rem Zeile 1-5 Löschen 
15.
sed "1,5d" dir.txt > dir1.txt 
16.
xcopy dir1.txt dir.txt /Y 
17.
 
18.
rem letzte zeilen löschen 
19.
sed $d dir.txt > dir1.txt 
20.
xcopy dir1.txt dir.txt /Y 
21.
sed $d dir.txt > dir1.txt 
22.
xcopy dir1.txt dir.txt /Y 
23.
sed $d dir.txt > dir1.txt 
24.
xcopy dir1.txt dir.txt /Y 
25.
rem temp.html aus der Liste entfernen 
26.
call loeschen.vbs 
27.
 
28.
rem leer zeilen löschen 
29.
FOR /F "delims=|" %%f IN (dir.txt) DO echo %%f >> dir2.txt  
30.
xcopy dir2.txt dir.txt /Y 
31.
del dir2.txt 
32.
 
33.
rem einlesen der Variablen 
34.
35.
36.
37.
 
38.
del dir1.txt 
39.
pause
die loschen.vbs
01.
strFilename = "dir.txt" 
02.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
03.
Set objFile = objFSO.GetFile(strFilename) 
04.
intFileSize = objFile.Size 
05.
Set objFile = objFile.OpenAsTextStream() 
06.
strFileContent = objFile.Read(intFileSize) 
07.
objFile.Close 
08.
 
09.
Set objRegExp = New RegExp 
10.
objRegExp.Pattern = Chr(34) 
11.
objRegExp.Global = True 
12.
objRegExp.IgnoreCase = True             'False für case-sensitive 
13.
strFileContent = objRegExp.Replace(strFileContent, "") 
14.
objRegExp.Pattern = "temp.html" 
15.
strFileContent = objRegExp.Replace(strFileContent, "") 
16.
Set objFile = objFSO.OpenTextFile(strFilename, 2) 
17.
objFile.Write strFileContent 
18.
objFile.Close
Gruß Madej
Mitglied: Biber
29.11.2007 um 10:35 Uhr
Moin Madej1,

Anmerkung:
Du könntest auch statt des Befehls "dir *.html>dir.txt" den Befehl "dir /b *.html>dir.txt" verwenden.

Der Schalter /b bedeutet auf neudeutsch soviel wie bare=einfach, schmucklos.
Oder für die MediaMarkt-Generation leichter zu merken "/b wie billich".

Dann hast Du gleich "nur" die Dateinamen.

Grüße
Biber
Bitte warten ..
Mitglied: Madej1
03.12.2007 um 09:46 Uhr
Vielen dank. Hab vergeblich nach so einem Schalter gesucht

gruß Madej
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (20)

Frage von Xaero1982 zum Thema Microsoft ...

Outlook & Mail
gelöst Outlook 2010 findet ost datei nicht (19)

Frage von Floh21 zum Thema Outlook & Mail ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
M.2 SSD wird nicht erkannt (14)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...