Batch datei ausführen

[Meisselbaer]

Guten die Herren (und eventuell Damen),

ich habe mir ein Programm gebastellt, mitdem ich meine reconnect.bat, also meine Datei, die über meinen Router die IP changed, ausführe und die dann eine bestimmte Seite öffnet & das natürlich öfter wiederholt. Das neu geöffnete Fenster soll sich natürlich auch wieder schließen. Soweit so gut.

Allerdings führt das ausführen der reconnect.bat nicht zu einer neuen IP.

Ich hab hier mal den Quellcode, vielleicht könnt ihr mir helfen.

Delphi-Quellcode:

e := ShellExecute
         (Handle,
          NIL,
          PCHAR('reconnect.bat'),
          PCHAR(''),
          NIL,
          SW_SHOW);
  IF (e<=32) THEN
    begin
      ShowMessage('Fehler: Batch-Datei konnte nicht ausgeführt werden!')

end;
//ShellExecute(Handle,NIL,PCHAR(reconnect.bat'),PCHAR(''),NIL, SW_SHOW);
sleep(20000);

Vielen Dank im orraus

Mit freundlichen Grüßen
Meisselbaer