Seite nicht gefunden ...
11.09.2014 11:32:53
Uwe
mit der folgenden Routine öffne ich perfekt eine Anwendung auf einem Server:
Sub Kern()
Set wshshell = CreateObject("WScript.Shell")
wshshell.Run "http://s-bs-ge-kd1/KernActivity-Prod/"
End Sub
Aber auf nicht allen PC`s, auf denen meine Datei zum Einsatz kommt, ist dieser Zugang zum Server und ebenso entsprechend der Zugriff auf das Programm möglich. Das ist so beabsichtigt. Wie füge ich nun z.B. eine MsgBox mit dem Hinweis ein, das die Verbindung nicht hergestellt werden kann?
Bisher bleibt der Browser (IE) mit dem Hinweis geöffnet, das die Seite nicht angezeigt werden kann. Das ist von mir so nicht gewünscht.
Wäre schön, so jemand dazu `ne Idee hat.
Danke für Eure Mühe.
Uwe