29. März 2024, 11:26
VB-fun.de - Beitragsübersicht zum VB-/VBA-Forum-Archiv 0414
  VBS: Netzlaufwerke, Wartezeit mit VB Script
 Von VC Script Anfänger
 Am 20. November 2008 um 12:02:59
 Frage Hi,

ich habe ein kleines Problem, bei dem ich nicht fündig werde und zwar geht es um folgendes:

Bisher habe ich meine Netzlaufwerke per Batch-Datei verbunden (mit Abfrage), jedoch habe ich das Problem, dass mir die Batch-Datei noch vor den üblichen Programmen startet und dann ist das ganze starten von Windows total zeitverzögert. Mit Bacht kann man leider "nicht sooo viel" machen. Daher habe ich mir überlegt, meine Netzlaufwerke mit per VB Script verbinden zu lassen.

Jetzt habe ich folgenden Code gefunden:
On Error Resume Next

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")
For Each objComputer In colItems
UN = objComputer.UserName
Next
Msgbox "Hello " & UN , vbOKOnly, "Welcome"

Set objshell = Wscript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
objshell.Run("net use k: /d"),0 'delete exsisting map
objshell.Run("net use k: \\servername\share"),0
Nur müssten hier zwei Dinge anders sein:

1. Es müsste eine Abfrage kommen, ob der Benutzer verbinden möchte (ja, nein) oder (ok, abbrechen)
und
2. Wenn der Benutzer ja klickt, sollte das Programm z. B. 20 Sekunden warten bevor es anfängt zu verbinden



Leider bekomme ich das nicht hin.


Über Hilfe würde ich mich freuen!


Grüße
[ VB-/VBA-Forum | Archiv 0414 | Archiv-Übersicht ]
 Antworten
VBS: Netzlaufwerke, Wartezeit mit VB Script - VC Script Anfänger 20. November 2008 um 12:02:59
Re: Netzlaufwerke, Wartezeit mit VB Script - Seton 21. November 2008 um 13:03:51

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB-/VBA-Forum | DirectX | DirectX-Forum | VB.Net | VB.Net-Forum | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum