xtrollra
May 02, 2013, updated at 19:53:46 (UTC)
view2458
view11
0
Goto Top

Links in Textdatei kopieren

GermanQuestionBatch, ShellDevelopment
Hallo Leute,
Ich habe eine Textdatei (HTML-Format), die viele Downloadlinks enthält. Name der Datei: dlinks.html

Jetzt möchte ich, dass alle Links in dieser Datei, die die folgenden Bedingungen erfüllen, Zeilenweise in eine neue Textdatei (newlinks.txt) kopiert/geschrieben wird:

Bedingungen:
-beginnt mit http://
-enthält das Wort Photoma
-endet mit .jpg

Ich habe bereits mit findstr probiert, aber da funktionieren die Platzhalter * nicht...

Mein Ansatz:

for /f %%i in ('findstr /c:"*http://*Photoma*.jpg*" dlinks.html') do (echo "%%i">>newlinks.txt)


funktioniert jedoch leider nicht face-sad


Könnt ihr mir helfen?
Vielen Dank für eure Hilfe.
comment-contentCommentShareShare
Share on Facebook Share on Twitter Share on Reddit Share on Linkedin

Content-Key: 205966

Url: https://administrator.de/contentid/205966

Printed on: April 24, 2024 at 19:04 o'clock

11 Comments
Latest comment
Goto Top
Member: bastla
bastla May 02, 2013 updated at 20:28:20 (UTC)
Goto Top
Hallo xtrollra und willkommen im Forum!
Ich habe bereits mit findstr probiert, aber da funktionieren die Platzhalter * nicht...
... vor allem, weil "*" kein Platzhalter ist face-wink - kannst Du der Onlinehilfe (aufzurufen mit findstr /?) entnehmen ...

Abgesehen davon kann "findstr" nur zeilenweise verarbeiten - besteht denn Deine Datei aus lauter Zeilen mit je einem Link?

Grüße
bastla
Member: xtrollra
xtrollra May 02, 2013 at 21:05:42 (UTC)
Goto Top
hallo Bastla,
nein, die Datei ist eine HTML-Datei...also HTML-Code mit vielen Zeilen.
Irgendwo gibt es einen Link zu einer Datei und genau diesen Link will ich quasi herauskopieren und in eine Datei schreiben.
Member: Endoro
Endoro May 02, 2013 at 21:15:57 (UTC)
Goto Top
Hallo xtrollra,

ohne mehr Infos zur "dlinks.html" kann man so nix sagen.

Gruss!
Member: bastla
bastla May 02, 2013 updated at 22:12:02 (UTC)
Goto Top
... aber es ganz schematisch mit einem VBScript der Art
Ein = "D:\dlinks.html"  
Aus = "D:\newlinks.txt"  

Set fso = CreateObject("Scripting.FileSystemObject")  
T = fso.OpenTextFile(Ein).ReadAll

Set rE = New RegExp
rE.Pattern = "http://.*Photoma.*\.jpg"  
rE.Global = True
rE.IgnoreCase = True

For Each Match In rE.Execute(T)
    Liste = Liste & vbCrLf & Match
Next
fso.CreateTextFile(Aus).Write Mid(Liste, 3)
versuchen ...

Grüße
bastla
Member: xtrollra
xtrollra May 02, 2013 at 22:01:50 (UTC)
Goto Top
jaaa, mega vielen Dank bastla face-smile))
Funktioniert genau wie ich es haben will. Klasse.
Geht das ganze auch rein per Batch? also ohne vbs?


@Endoro
Hintergrund ist, dass ich mit einer Batchdatei Updatedateien für ein Programm mit einem Klick downloaden möchte.

Der Downloadlink zu dieser Datei ändert sich aber logischerweise ständig, wenn neue Versionen verfügbar sind. D.h. der Dateiname auf dem Server ändert sich und damit auch der Link dazu.

Deshalb lasse ich per Batch die HTML-Datei zuerst herunterladen, um dann diese zu "verarbeiten" und den Link darin rausfischen...
Hoffe das ist verständlich ;)
Member: bastla
bastla May 02, 2013 at 22:11:44 (UTC)
Goto Top
Hallo xtrollra!
Geht das ganze auch rein per Batch? also ohne vbs?
Grundsätzlich möglich, aber mühsam - zur Not lässt sich das VBScript aber durch einen Batch erzeugen und ausführen, etwa so:
set "Ein=D:\dlinks.html"  
set "Aus=D:\newlinks.txt"  

set "G=%temp%\GetLinks.vbs"  
 >"%G%" echo Set fso=CreateObject("Scripting.FileSystemObject"):T=fso.OpenTextFile("%Ein%").ReadAll  
>>"%G%" echo Set rE=New RegExp:rE.Pattern="http://.*Photoma.*\.jpg":rE.Global=True:rE.IgnoreCase=True  
>>"%G%" echo For Each Match In rE.Execute(T):Liste=Liste^&vbCrLf^&Match:Next:fso.CreateTextFile("%Aus%").Write Mid(Liste,3)  

cscript //nologo "%G%"
Grüße
bastla
Member: Endoro
Endoro May 03, 2013 at 05:40:03 (UTC)
Goto Top
Zitat von @xtrollra:
Geht das ganze auch rein per Batch? also ohne vbs?


Sicher nicht ohne mehr Info face-smile

Gruss!
Member: micneu
micneu May 04, 2013 at 09:23:37 (UTC)
Goto Top
ich könnte dir eine lösung in powershell anbieten. oder in awk, perl.
Member: bastla
bastla May 04, 2013 at 09:32:30 (UTC)
Goto Top
@ micneu
awk, perl
Wenn's noch nicht einmal VBS sein soll? face-wink

Grüße
bastla
Member: xtrollra
xtrollra May 04, 2013 at 15:29:36 (UTC)
Goto Top
@micneu
vielen Dank für deine Hilfe, aber mit bastla's VBS-Skript funktionierts super.

ich habe aber noch ein Problem, für das ich noch keine gute Lösung gefunden habe:
Die Batch soll die 3. Zeile (oder x-te) einer Textdatei als Variable speichern.

for /f "tokens=* delims= " %%a in (Datei.txt) do (  
	set /a N+=1
	set v!N!=%%a
	set vLineThree=!v3!
	)
Leider durchläuft dieser Code unnötig jede Zeile der ganzen Textdatei, was Zeit usw. kostet.
Ist es möglich gezielt einfach die x. Zeile auszulesen?
Danke für Eure Hilfe
Member: bastla
bastla May 04, 2013 updated at 15:43:13 (UTC)
Goto Top
Hallo xtrollra!

Etwa so:
set "Line=3"  
for /f "tokens=1* delims=]" %%i in ('find /n /v "§§§§§§"^<Datei.txt^|findstr /b "\[%Line%\]"') do set "vLineThree=%%j"  
if not defined vLineThree echo Zeile %Line% leer oder nicht vorhanden!
- oder natürlich per VBS ... face-wink

Grüße
bastla
GermanQuestionBatch, ShellDevelopment
Hotly discussed
gleixnerdCheck of ZFW Firewallgleixnerd - 5 CommentsjstrickerWireguard VPN on UDM Pro behind Fritzbox - Handshake did not completejstricker - 3 Comments