VBScr stets im Hintergrund und nur bei best. Event aktiv werden
From: Sephiroth (anonymous_at_discussions.microsoft.com)
Date: 06/29/04
- Next message: Andrej Golubew: "AD, Printer, Anmeldescript"
- Previous message: Martin Peters: "Re: Dienst auf Remotecomputer"
- In reply to: Christoph Fricke: "VBScr stets im Hintergrund und nur bei best. Event aktiv werden"
- Messages sorted by: [ date ] [ thread ]
Date: Tue, 29 Jun 2004 12:21:23 -0700
Oha, ich denke ich bin der Sache einen ganzen Schritt
weiter gekommen ...
Das Script könnte doch die Ereignisanzeige überwachen und
zwar genau den Event der kommt, wenn man eine DFÜ-
Verbindung hergestellt hat - Event ID 20158 (20158 ist DFÜ
Verb. beendet) unter "System".
Kann ich das so machen?
strComputer = "."
Set objWMIService = GetObject("winmgmts:"
_& "{impersonationLevel=impersonate, (Security)}!\\" &
strComputer & "\root\cimv2")
Set colMonitoredEvents =
objWMIService.ExecNotificationQuery _("Select * from
__instancecreationevent where TargetInstance
isa 'Win32_NTLogEvent' and TargetInstance.EventCode
= '20158' and TargetInstance.SourceName = 'RemoteAccess' ")
Do
blablub
Loop
>-----Originalnachricht-----
>Hi there,
>
>
>ich denke das ist dann eher was für eine kleine
>Appliaktion. IMHO ist Scripting ab einem gewissen Punkt
>nicht mehr mächtig genug bzw. einfach zu umständlich...
>
>Gruß
>Christoph
>.
>
- Next message: Andrej Golubew: "AD, Printer, Anmeldescript"
- Previous message: Martin Peters: "Re: Dienst auf Remotecomputer"
- In reply to: Christoph Fricke: "VBScr stets im Hintergrund und nur bei best. Event aktiv werden"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
|
