Thema: Delphi Dienst aktualisieren

Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#8

Re: Dienst aktualisieren

  Alt 24. Feb 2009, 15:03
Hallo,
Zitat von MacKleriker:
Ja, aber die Batchdatei wird ja wiederum mit den Rechten von "Netzwerkdienst" aufgerufen und kann nicht in das Windowsverzeichnis zugreifen!
ja, irgendwie hast Du recht, wir laufen hier wohl momentan in eine Rekursion.

Das wollen wir dann doch mal lieber schnell abstellen:

Mache auf das Verzeichnis des Dienstes eine Freigabe, z. B.: DienstName$. Durch das $ am Ende wird es eine versteckte Freigabe, die im Explorer nicht zu sehen ist.

Code:
@ECHO OFF
net stop DienstName
:REM Laufwerksverbindung mit Anmeldung an "Fileserver"
net use \\rechnername\freigegebenesVerzeichnis\ /user:Domaene\Benutzername kennwort
:REM Laufwerksverbindung auf uns selbst mit anderer Anmeldung
net use \\%COMPUTERNAME%\LokaleFreigabe$ /user:Domaene\Benutzername kennwort
copy \\rechnername\freigegebenesVerzeichnis\Dienst.exe \\%COMPUTERNAME%\LokaleFreigabe$\Dienst.Exe
net use \\rechnername\freigegebenesVerzeichnis\ /delete
net use \\%COMPUTERNAME%\ObenGenannteFreigabe$ /delete
net start DienstName
Über die "Eleganz" dieser Lösung wollen wir uns lieber nicht streiten

Ansonsten schau bitte mal, ob Du mit CreateProcess nicht weiter kommst.
  Mit Zitat antworten Zitat