Druck-Script oder Datei

[Kevin-K]

Entschuldigt ich weiß nicht ob Ihr mir dabei helfen könnt aber ich komm einfach nicht weiter.

Ich habe täglich mehrere 100 Links die ich öffnen muss.
Die Links führen zu einer Seite bei der sich automatisch schon ein Fenster zum drucken öffnet.
Aufbau der Links:
http://www.firma123.de/admin/print_order.php?mode=duplicate&oID=JJJJXXXX&date=TT.MM.JJJJ
Die ID ist variabel und das datum ist immer das aktuelle.
Ich bräuchte eigentlich nur ein Script oder eine Datei oder ein Programm bei der ich diese Links einfügen kann und nicht jeden einzelnen Druckbefehl selbst geben muss.
Über ihrgendwelche Tipps oder vielleicht sogar ein Programm oder ein Script wäre ich sehr dankbar.

 

[ryan_blackdrago]

Am Beispiel Firefox :
Links in eine Datei speichern (hier test2.txt unter c:\)

Folgenden Quellcode in eine .vbs-Datei speichern:

Spoiler

Dim Beispiel
Set Beispiel = CreateObject("WScript.Shell")

Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")

' hier den Pfad zur .txt anpassen
Set objTextFile = objFSO.OpenTextFile _
    ("c:\test2.txt", ForReading)

Do Until objTextFile.AtEndOfStream
    strNextLine = objTextFile.Readline
    arrServiceList = Split(strNextLine , ",")

dim a
set a = CreateObject("WScript.Shell")
a.run arrServiceList(0)
set WshShell = CreateObject("WScript.Shell") 

'strg+p für drucken
WScript.Sleep 1500
CreateObject("WScript.Shell").SendKeys "^p"
WScript.Sleep 1500

'drucken OK
CreateObject("WScript.Shell").SendKeys "{ENTER}"
WScript.Sleep 1500

'strg+w für Tab schließen
CreateObject("WScript.Shell").SendKeys"^w"
WScript.Sleep 1500

Loop

Das VB Script liest die Datei unter c:\test2.txt aus. Ruft sämtliche Links der Reihe nach auf. Die Seite wird jeweils über die Firefox-Tastenkürzel gedruckt und der Tab danach geschlossen.

 

[Kevin-K]

Vielen Dank das Prinzip funktioniert einwandfrei.