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 File durchsuchen, kopieren und danach weiter suchen

Mitglied: cookie

cookie (Level 1) - Jetzt verbinden

11.09.2007, aktualisiert 12.09.2007, 4137 Aufrufe, 4 Kommentare

Hallo zusammen.

Ich möchte aus Logfiles (teilweise über eine Million Zeilen gross) einen Wert suchen, in eine neue Textdatei kopieren danach weiter suchen.

Der wert sieht z.B so aus: CopiesCompleted="39"

Wobei sich die Zahl dahinter immer ändert. Genau diese Zahl benötige ich aber für eine Verrechnung. Nun meine Frage, ist es möglich das TextFile PCNAME.txt nach dem Wert CopiesCompleted= zu durchsuchen, die Zahl dahinter zu kopieren, danach im Textfile weitersuchen und gleich aufaddieren? So das zum schluss nur noch angezeigt wird CopiesCompleted=5201 oder so in etwa.

Vielen dank.

Gruss
Cookie
Mitglied: Logan000
11.09.2007 um 14:32 Uhr
per vbSkript solte das in etwa so gehen:
01.
Const szSuch = "text" ' Such test 
02.
 
03.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
04.
Set objSourceFile = objFSO.OpenTextFile("Source.txt", 1)	' Quelldatei öffnen 
05.
Set objDestFile = objFSO.CreateTextFile("Dest.txt", True)	' Zieldatei anlegen / überschreiben 
06.
 
07.
	Do Until objSourceFile.AtEndOfStream 	' Gesammtes TextDok durchgehen 
08.
		szNextLine = objSourceFile.Readline	' Zeile aus Quelldatei einlesen 
09.
		if instr(szNextLine,szSuch) Then	' Wenn Suchtest vorhanden 
10.
			objDestFile.writeline szNextLine '  Zeile in Zieldatei schreiben 
11.
		end if		 
12.
	Loop
Das aufaddieren fehlt. Aber ich hoffe, es ist immerhin ein Anfang.

[Edit Biber] Formatierung auf < code > gesetzt. [/Edit]
Bitte warten ..
Mitglied: bastla
11.09.2007 um 17:50 Uhr
Hallo Cookie!

Wenn Du tatsächlich nur die Gesamtsumme benötigst, sollte eigentlich folgendes reichen:
01.
@echo off & setlocal 
02.
for /f "tokens=2 delims==" %%i in ('findstr "CopiesCompleted=" Source.txt') do set /a Anzahl+=%%i >nul 
03.
echo CopiesCompleted=%Anzahl%
Grüße
bastla
Bitte warten ..
Mitglied: bastla
11.09.2007 um 18:12 Uhr
... und das (geringfügig ergänzte) Script von Logan000 schreibt auch noch vorweg die gefundenen Zeilen in die Zieldatei:
01.
Const szSuch = "CopiesCompleted=" 'Suchtext 
02.
iRelPos = Len(szSuch) + 1 'relative Position (bezogen auf den Beginn des Suchtextes) der gesuchten Zahl 
03.
 
04.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
05.
Set objSourceFile = objFSO.OpenTextFile("Source.txt", 1) 'Quelldatei öffnen 
06.
Set objDestFile = objFSO.CreateTextFile("Dest.txt", True) 'Zieldatei anlegen / überschreiben 
07.
 
08.
lSumme = 0 
09.
Do Until objSourceFile.AtEndOfStream 'gesamtes TextDok durchgehen 
10.
	szNextLine = objSourceFile.Readline 'Zeile aus Quelldatei einlesen 
11.
	iPos = InStr(szNextLine, szSuch) 'Position des Suchtextes feststellen 
12.
	If iPos Then ' Wenn Suchtext vorhanden 
13.
		iStart = iPos + iRelPos 'Starposition der gesuchten Zahl berechnen 
14.
		iEnd = InStr(iStart, szNextLine, Chr(34)) 'schließendes Anführungszeichen suchen 
15.
		If iEnd Then 'wenn gefunden, Zeile verwertbar 
16.
			objDestFile.WriteLine szNextLine 'Zeile in Zieldatei schreiben 
17.
			'Text ab Startposition bis vor Endposition in Zahl umwandeln und aufsummieren 
18.
			lSumme = lSumme + CLng(Mid(szNextLine, iStart, iEnd - iStart)) 
19.
		End If 
20.
	End If 
21.
Loop 
22.
 
23.
objDestFile.WriteLine 'Leerzeile in Zieldatei schreiben 
24.
objDestFile.Write szSuch & CStr(lSumme) 'Summe in Zieldatei schreiben (ohne abschließende Zeilenschaltung) 
25.
objDestFile.Close
Grüße
bastla
Bitte warten ..
Mitglied: cookie
12.09.2007 um 15:07 Uhr
Vielen dank bastla.

wie immer, einfach nur genial

gruss
cookie
Bitte warten ..
Ähnliche Inhalte
Entwicklung
Powershell File durchsuchen
gelöst Frage von easy4breezyEntwicklung1 Kommentar

Hallo :) Ich habe ein txt-File und möchte nach einem bestimmten String suchen und dann einen Wert ausgeben. Das ...

Batch & Shell
Files in Ordner kopieren
Frage von 123182Batch & Shell14 Kommentare

Hallo, Ich habe z.b. 100 Ordner (die einem einem Ordner mit variabler Position liegen - ich nenne ihn mal ...

VB for Applications
VBA Files kopieren
Frage von Questionmark93VB for Applications3 Kommentare

Hay Leute, ich habe wiedermal eine Frage bzgl. VBA. Und zwar, ich möchte: Eine Datei auf den Desktop jeder ...

Windows 7

Windows Suche ersetzen Netzwerklaufwerk durchsuchen

Frage von PumpkinWindows 74 Kommentare

Hallo, Aufgrund von Suchproblemen im Cluster suche ich nach einem Ersatz für die Windows Suche. Sollte bequem die Taskleistensuche ...

Neue Wissensbeiträge
Sicherheit
Sicherheitsrisiko: Die Krux mit 7-Zip
Information von kgborn vor 11 StundenSicherheit

Bei vielen Anwendern ist das Tool 7-Zip zum Entpacken von Archivdateien im Einsatz. Die Software ist kostenlos und steht ...

Internet

Datendealing im WWW Tracking Methoden immer brutaler

Information von sabines vor 20 StundenInternet

Interessanter Artikel zum Thema Tracking im WWW und die immer "besseren" Methoden des Trackings. Professor Arvind Narayanan (Princeton-Universität) betreibt ...

Erkennung und -Abwehr

Ups: Einfaches Nullzeichen hebelte den Anti-Malware-Schutzt in Windows 10 aus

Information von kgborn vor 1 TagErkennung und -Abwehr

Windows 10 ist das sicherste Windows aller Zeiten, wie Microsoft betont. Insidern ist aber klar, das es da Lücken, ...

Windows 10

Windows 10 on ARM: von Microsoft entfernte Info - Klartext, was nicht geht

Information von kgborn vor 1 TagWindows 10

Windows 10 on ARM ist ja eine neue Variante, die Microsoft im Verbund mit Geräteherstellern am Markt etablieren will. ...

Heiß diskutierte Inhalte
Server
Route-Befehl Unterstützung (unter CMD)
gelöst Frage von FKRR56Server36 Kommentare

Guten Tag , i.M. habe ich Probleme über den CMD-Route-Befehl ein Routing auf einen entfernten Server zuzulassen. Der Server ...

Windows 10
Windows 10 (1709) Tastur und Maus wieder einschalten?
Frage von LochkartenstanzerWindows 1028 Kommentare

Moin, Ich habe von einem Kunden einen Win10-Rechner bekommen, bei dem weder Tastatur noch Maus geht. Die Hardware funktioniert ...

Microsoft
TV-Tipp: Das Microsoft-Dilemma
Information von kgbornMicrosoft17 Kommentare

Aktuell gibt es in Behörden und in Firmen eine fatale Abhängigkeit von Microsoft und dessen Produkten. Planlos agieren die ...

Webbrowser
Welcher Browser ist der Beste?
Frage von justtinWebbrowser15 Kommentare

Hallo Leute Ich habe eine interessante Frage. Mich wurde mal interessieren welcher Browser ist eure meinung nach der beste? ...