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

Ständige Verbindung eines Netzlaufwerkes sicherstellen

Frage Entwicklung VB for Applications

Mitglied: 27186

27186 (Level 1)

11.01.2008, aktualisiert 16:01 Uhr, 3735 Aufrufe, 2 Kommentare

Hallo!

Habe ein Problem, und zwar würde ich gerne permanent sicherstellen dass ein bestimmtes Netzlaufwerk ständig verbunden ist, da eine bestimmte Software mit einem einerseits im Explorer existenten aber nicht verbundenem Netzlaufwerk nichts anfangen kann.

Dazu habe ich folgendes VB-Skript angelegt. Um das Problem direkt nach dem Hochfahren des Rechners zu lösen, lösche ich zu Beginn des Skriptes das entsprechende Netzlaufwerk, welches kurz darauf wieder angelegt wird, und somit verbunden ist.

Das Problem ist aber, wenn der Server kurzzeitig ausfällt. Das Netzlaufwerk existiert zwar weiter, aber eben unverbunden… Und das Laufwerk in einer Schleife ständig zu löschen und neu zu mappen kommt auch nicht in Frage... Was wenn dann gerade ein Zugriff stattfindet?!

01.
Set WshNetwork = Wscript.CreateObject("Wscript.Network") 
02.
 
03.
Dim objNetwork, objShell, objApplication 
04.
Dim strDriveName, strDriveLetter, strRemotePath 
05.
Set objNetwork = CreateObject("WScript.Network") 
06.
Set objShell = CreateObject("Shell.Application") 
07.
strDriveLetter = "W:" 
08.
 
09.
On Error resume next 
10.
objNetwork.RemoveNetworkDrive strDriveLetter, True, True 
11.
 
12.
Public Function mapDrives(strDriveName, strDriveLetter, strRemotePath, strUsername, strPassword) 
13.
  objNetwork.MapNetworkDrive strDriveLetter, strRemotePath, FALSE, strUsername, strPassword  
14.
  objShell.NameSpace(strDriveLetter).Self.Name = strDriveName  
15.
  mapDrives = "" 
16.
End Function 
17.
 
18.
Public Function map(DriveLetter, RemotePath) 
19.
  On Error resume next 
20.
  mapDrives "Data", DriveLetter, RemotePath, "admin", "admin" 
21.
  if err.Number <> 0 then 
22.
    if err.Number <> -2147024811 then 'err.Number means: 'Networkdrive is already mapped' 
23.
      msgBox vbcrlf & err.description & vbcrlf & " Check availability -> " & DriveLetter & RemotePath 
24.
    end if 
25.
    err.clear 
26.
  end if 
27.
end Function 
28.
 
29.
do 
30.
31.
  '-------------------- map drive 
32.
33.
  'map "Y:", "\\server\share" 
34.
   
35.
  WScript.sleep 10000 
36.
loop
Mitglied: Majestro
11.01.2008 um 15:56 Uhr
Hallo,
sag uns mal bitte um welche Infrastruktur ( OS usw... ) es sich handelt !

Gruß
Björn
Bitte warten ..
Mitglied: 27186
11.01.2008 um 16:01 Uhr
WIN XP PRO in einer Arbeitsgruppe...
Bitte warten ..
Ähnliche Inhalte
Windows 10
Ständige SSD Aktivität bei bestehender Skype-Verbindung (1)

Frage von Bluffy zum Thema Windows 10 ...

Router & Routing
Lancom Router mit im vorhandenen Netz für VPN verbindung einbinden (20)

Frage von ittgmbh zum Thema Router & Routing ...

Netzwerkmanagement
gelöst Win Server 2012 R2 NPS in Verbindung mit einem Cisco SG300 (4)

Frage von mario87 zum Thema Netzwerkmanagement ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(29)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Windows Server

Exchange 2010 Active Directory und Windows Server 2016

(4)

Erfahrungsbericht von Herbrich19 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Internet
gelöst Mitarbeiter surft auf unerwünschter Seite - Wie damit umgehen? (44)

Frage von sabines zum Thema Internet ...

Netzwerke
Wie erstelle ich ein Intranet (19)

Frage von Leonardnet zum Thema Netzwerke ...

LAN, WAN, Wireless
gelöst Eintägige Netzwerkunterbrechung trotz Backupleitung (15)

Frage von iAmbricksta zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2012 R2 - Zugriff Verweigert bei jeglicher Tätigkeit (13)

Frage von DarkLevi zum Thema Windows Server ...