Beiträge von DavieDave

Das Script läuft jetzt. Er druckt die neuen PDF´s 1-2 Sekunden nachdem sie angekommen sind aus. Einfach optimal [Blockierte Grafik: http://www.computerbase.de/forum/images/smilies/biggrin.gif][Blockierte Grafik: http://www.computerbase.de/forum/images/smilies/biggrin.gif]

Vielen Vielen Dank.

Jetzt muss ich lediglich den HTML-Server irgendwie als Laufwerk einbinden damit er den dann überwachen kann. Leider komme ich nur bis zur Benutzer/Kennwort Abfrage. Obwohl ich die gleichen eingebe wie die im Browser (bei verbinden mit dem HTML) will er das Laufwerk nicht einbinden.

Okay, man sollte wohl kein Passwort nehmen in dem ein @-Zeichen vorkommt wegen der ftp-Verbindung :D:D

Wie gesagt, der Wald...

DankeDanke, war FileFirstFile

[autoit]

$file = FileFindFirstFile($ordner & "\*.pdf")

[/autoit]

OK, kann sein, dass ich bald nochmal was frage, ich gebe Bescheid falls geschlossen werden kann.

Danke bin schon eine Ecke glücklicher

Hi Leute,

Ihr werdet mich steinigen wollen aber ich komme einfach nicht weiter und bin ziemlich frustriert. Warscheinlich sehe ich den Wald vor lauter Bäumen nicht mehr.
Bin gerade mir Scripten etc. am beibringen, leider habe ich damit keinerlei Erfahrung soll das aber trotzdem lösen Da ich aber lernfähig bin ist das ja alles kein Problem

Habe hier im Forum bereits einen Code für mein Problem gefunden und ihn angepasst. Der Original-Code war von chip hier im Forum.

Das ganze soll in einem Ordner automatisch PDF´s erkennen und verschieben und dabei drucken.

[autoit]

$ordner = "blablablal\Desktop\PDF Ablauf\Neu"
$archiv = "blablabla\Desktop\PDF Ablauf\Archiv"
$foxit = "C:\Programme\Foxit Software\Foxit Reader\Foxit Reader.exe"
$Zeile = "Ich kam bis Zeile"

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

MsgBox(64, "Hallo", $Zeile & "7 Anfang")

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

While 1
MsgBox(64, "Hallo", $Zeile & "11 in WhileSchleife")
Sleep(1000)
$file = FileFindFirstFile($ordner & "*.pdf")
If $file <> -1 Then Print()
FileClose($file)
WEnd

[/autoit][autoit][/autoit][autoit]

MsgBox(64, "Hallo", $Zeile & "18 Mitte")

[/autoit][autoit][/autoit][autoit]

Func Print()
While 1
MsgBox(64, "Hallo", $Zeile & "22 in Function")
$pdffile = FileFindNextFile($file)
$neuname = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC & @MSEC
If @error Then ExitLoop
FileMove($ordner & $pdffile, $archiv & $neuname & ".pdf")
While 1
Sleep(100)
If FileExists($archiv & $neuname & ".pdf") Then
ExitLoop
EndIf
WEnd

[/autoit][autoit][/autoit][autoit]

MsgBox(64, "Hallo", $Zeile & "31 vor Runwait")

[/autoit][autoit][/autoit][autoit]

RunWait('"' & $foxit & '" /p "' & $archiv & $neuname & '.pdf"')
WEnd
EndFunc ;==>Print

[/autoit][autoit][/autoit][autoit]

MsgBox(64, "Hallo", $Zeile & "36 Ende")

[/autoit]

Er kommt nur in die While Schleife, obwohl PDF´s in den Ordnern drin sind. Die Schleife läuft auch immer schön durch. Jedoch geht er gar nicht erst in die Function print.

Warum nicht?