Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VBS-Script schließen von Fenster verhindern

Frage Entwicklung

Mitglied: retz12

retz12 (Level 1) - Jetzt verbinden

28.07.2008, aktualisiert 16:49 Uhr, 9030 Aufrufe, 5 Kommentare

Ich habe ein Anmelde Script in VBS geschrieben, dass beim Anmelden ein Internet Explorer Fenster öffnet und den Status der einzelnen Befehle anzeigt.
Jetzt bin ich draufgekommen, dass einige User frühzeitig das Fenster schließen.
Ich weiß dann nicht ob alle Befehle ordnungsgemäß ausgeführt wurden.

Jetzt meine Frage:
Kann man in einem VBS-Script das Schließen eines Fensters (mittels X rechts oben) verhindern?
Mitglied: AndreasHoster
28.07.2008 um 10:27 Uhr
Na ja, einfachste Variante:
Den IE im FullScreen / Kiosk Modus starten. Da gibts dann keine Adress/Menuleiste mehr und auch keine Titelleiste, damit auch kein X zum Schließen (hilft nicht gegen Strg+Alt+Del und den Taskmanager)
Edit: Hilft aber gegen Strg+W und Alt+F4

Die andere Variante hilft nicht wirklich gegen das Schließen, aber Du kannst auf das Schließen reagieren. Mann kann in VBS die Events des IE bekommen und damit auf das onQuit Event reagieren. Der IE schließt immer noch, aber man könnte dann einfach einen neuen aufmachen.
Hier ein BSP-Code-Schnipsel
01.
Set oIE=Wscript.CreateObject("InternetExplorer.Application","ie_") 
02.
oIE.navigate("Hier die URL") 
03.
oIE.FullScreen = False <- True für Kioskmodus 
04.
oIE.visible=true 
05.
 
06.
sub ie_onQuit 
07.
REM Hier könnte man jetzt auf das Schliessen mit irgendwas reagieren. z.B. einen neuen IE aufmachen. 
08.
end sub
Bitte warten ..
Mitglied: 67369
28.07.2008 um 11:39 Uhr
Kann man in einem VBS-Script das Schließen eines Fensters (mittels X rechts oben) verhindern?

Nicht wirklich. Der IE lässt sich auch einfachst über STRG-W schließen.
Bitte warten ..
Mitglied: Logan000
28.07.2008 um 15:27 Uhr
Moin moin

Das ist zwar nicht genau das was Du suchst aber vielleicht ....

Wann immer ich eine Skriptausgabe im IE mache, merke ich mir in einer Variable den gesamten HTML text den ich für jede Meldung/Ausgabe erweitere.

01.
Set objExplorer = WScript.CreateObject("InternetExplorer.Application") 
02.
objExplorer.Width=400 
03.
objExplorer.Height = 500  
04.
objExplorer.Left = 20 
05.
objExplorer.Top = 20 
06.
HTMLText = "<body><h1>Hallo Lieber User</h1> </body>" 
07.
objExplorer.Document.Body.InnerHTML = HTMLText  
08.
 
09.
HTMLText = HTMLText & "<br> Zeit aufzuwachen" 
10.
objExplorer.Document.Body.InnerHTML = HTMLText  
11.
....
Solte der User das IE Fenster zwischendurch schliessen wird es bei nächsten .InnerHTML setzen alles wieder angezeigt.
Das ist natürlich nur ein Notnagel.

Gruß L.
Bitte warten ..
Mitglied: 67369
28.07.2008 um 15:43 Uhr
Edit: Hilft aber gegen Strg+W und Alt+F4

Das hättest du wohl gern. Was gegen Schließen eines Fensters hilft, ist ein Sperren der Tastatur und der Maus, und sonst nichts.

Gegen STRG-W und ALT-F4 hilft dein Script, so wie es da steht
Set oIE=Wscript.CreateObject("InternetExplorer.Application","ie_")
oIE.navigate("Hier die URL")
oIE.FullScreen = False <- True für Kioskmodus
oIE.visible=true


sub ie_onQuit
REM Hier könnte man jetzt auf das Schliessen mit irgendwas reagieren. z.B. einen neuen IE aufmachen.
end sub

jedenfalls nicht.
Bitte warten ..
Mitglied: AndreasHoster
28.07.2008 um 16:49 Uhr
Nochmals getestet, ist tasächlich richtig.
Beim ersten Mal ging Strg+W nicht, weil das Kiosk-Fenster den Fokus nicht hatte.

OK, da hilft dann halt doch nur, im onQuit einen neuen IE zu öffnen.
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
VBS Script zum versenden mehrerer Verknüpfungen zu Dateien per Lotus Notes

Frage von Sentinel87 zum Thema VB for Applications ...

Batch & Shell
gelöst VBS Script in eine Textdatei ausgeben (VBS mit Batch zusammenführen) (5)

Frage von Luuke257 zum Thema Batch & Shell ...

VB for Applications
gelöst VBS Script kann Prgramm nicht starten (15)

Frage von C.Boerner zum Thema VB for Applications ...

Windows Server
Aufgabenplanung bringt bei VBS Script immer 0x41301 (14)

Frage von 116480 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Windows Tools
gelöst Aussendienst Datensynchronisierung (12)

Frage von lighningcrow zum Thema Windows Tools ...

Windows Server
Suche passender Treiber (12)

Frage von stolli zum Thema Windows Server ...

Peripheriegeräte
Wlan stört Funkmaus (11)

Frage von Falaffel zum Thema Peripheriegeräte ...

Peripheriegeräte
gelöst USB Festplatte verliert Laufwerksbuchstabe (9)

Frage von cese4321 zum Thema Peripheriegeräte ...