title image


Smiley vbscript logon script erweitern
Hallo,



ich habe ein logon skript in vb gefunden und für meine bedürfnisse umgeändert. Funktioniert soweit auch ganz gut.

Nun muss ich es noch erweitern mit einer Funktion die den Nutzer jede Woche fragt ob er Urlaub genommen hatte. Ich muss also irgendwie eine Datumsabfrage in das Skript hereinbekommen sodass die Abfrage nur wöchtlich erscheint. Ausserdem sollte der User die Möglichkeit haben die Anzahl der Urlaubstage eingeben zu können und per e-mail zu verschicken.

Kann ich das mit vbscript überhaupt machen oder sollte ich mich vielleicht nach einer anderen möglichkeit umsehen?



Ich poste mal mein Logon Skript mit:





Dim bForce

Dim bUpdateProfile

bForce = true

bUpdateProfile = true

Set wshNetwork = CreateObject("WScript.Network")

Set colNetDrives = wshNetwork.EnumNetworkDrives

On error Resume next ' Remove any drive mappings. This removes all drive mappings that might be set using

'If colNetDrives.Count > 0 then

'For x = 0 to colNetDrives.count-1 Step 2

'wshNetwork.RemoveNetworkDrive colNetDrives.Item(x), bForce, bUpdateProfile

'Next

'End If

wshNetwork.MapNetworkDrive "Z:", "\\zeus\Users\" & wshNetwork.UserName

with wshNetwork

' setup common shares

' setup a case statement for all users

Select case .username

Case "akraan"

.MapNetworkDrive "E:", "\\Olympus\Engineering"

.MapNetworkDrive "H:", "\\Zeus\Support"

.MapNetworkDrive "S:", "\\Olympus\Sales"

.MapNetworkDrive "X:", "\\Olympus\Archives"

Case "asmith"

.MapNetworkDrive "E:", "\\Olympus\Engineering"

.MapNetworkDrive "H:", "\\Zeus\Support"

.MapNetworkDrive "I:", "\\Zeus\IntraNET\Hima Intranet\QMS"

.MapNetworkDrive "J:", "\\Olympus\Commercial"

.MapNetworkDrive "O:", "\\Zeus\Operational System"

.MapNetworkDrive "Q:", "\\Olympus\Administration"

.MapNetworkDrive "S:", "\\Olympus\Sales"

.MapNetworkDrive "T:", "\\Hera\engineering\Active Jobs"

.MapNetworkDrive "V:", "\\Zeus\Templates"

.MapNetworkDrive "X:", "\\Olympus\Archives"

End Select

End With

On error goto 0



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: