Re: MsgBox

From: Sascha Teuber (sascha.teuber_at_freenet.de)
Date: 06/15/04


Date: Tue, 15 Jun 2004 11:27:50 +0200

Roland Weisskopf wrote:
> Sascha Teuber posted the following on 14.06.2004 15:06:
>
>
>> WShell.Run "SPCheck.exe /i:" & CsvDatei3 & " /w:" & HtmlDatei
>> MsgBox "Ermittlung abgeschlossen..."
>>
>> allerdings ist die generierte HMTL-Datei dann ohne jegliche Clients,
> > lasse ich MsgBox "Ermittlung abgeschlossen..." einfach weg,
> > funktioniert es.
> So wie Du die Run-Methode anwendest, wird SPCheck gestartet
> und danach im Ablauf die Messsagebox aktiviert. Du kannst mal
> versuchen, auf das Ende von SPCheck zu warten, indem Du Run
> etwas anders einsetzt, etwa so:
>
> Return=WShell.Run("SPCheck.exe ... " & HtmlDatei,7,-1)
>
> Das Script wartet dann auf die Beendigung des Programms.
>
Ich habe das Script ergänzt um:
Dim Return
und abgeändert auf:
Return=WShell.Run("SPCheck.exe /i:" & CsvDatei3 & " /w:" & HtmlDatei,7,True)

Leider erfolglos... Die HTML bleibt immer noch leer.

Sascha