PDA

Vollständige Version anzeigen : Msgbox soll sich nur 1x öffnen


Chrizz
26.10.2005, 19:24
Wenn ich ne email bekomme öffnet sich eine Msgbox per
wscript.exe "C:\notifier.vbs".
Leider öffnet sich jedesmal eine neue wenn ich eine bekomme.
Wie stelle ich das an das die alte box sich schließt wenn sich ne neue öffnet.

uwek
26.10.2005, 21:00
Wenn du nicht den Inhalt von notifier.vbs hier preis gibts,
wird dir hier keiner helfen können oder wollen.

Chrizz
27.10.2005, 12:24
Viel steht da nicht drin.

Option Explicit
On Error Resume Next
MsgBox (" Sie haben Post "), vbSystemModal

Stefan Kulpa
28.10.2005, 08:48
Für "Script-Themen" haben wir (neuerdings) ein eigenes Forum - der Beitrag wird daher verschoben.

~~~dexter~~~
10.11.2005, 09:39
Besser spät, als nie!

Das Problem bei der Msgbox ist, dass das Script nicht weiterläuft und sich dann auch nicht beenden kann. Ich würde es deshalb mit Popup machen. Hier gibt es ein Argument, wie lange das Popup-Fenster angezeigt werden soll.

intButton = object.Popup(strText,[nSecondsToWait],[strTitle],[nType])

Auf die Schnelle, deshalb vielleicht eine unschöne Lösung:

set objWMI = GetObject("winmgmts:")
set objSystem = objWMI.instancesOf("win32_process")
count = 0

for each Process in objSystem
if Process.name="wscript.exe" then
count = count + 1
if count <> 1 Then
Process.Terminate(0)
end if
end if
next

MsgBox (" Sie haben Post "), vbSystemModal

Vielleicht konnte ich ein bißchen helfen.

~~~Dexter~~~

Maxus
10.11.2005, 10:00
ups 2 x das selbe gepostet

Maxus
10.11.2005, 10:02
Einfach ein popup wenn ich das richtig verstanden habe, funktioniert unter WSH sehr gut, aber unter vba nur bedingt gut.


dim pop
set pop=createobject("wscript.shell")

pop.popup"Zeitfenster geschlossen.(" & Date()& " um "& Time()& ")",15, "Text",vbCritical


ich hoffe ich konnte helfen