W2K Netzwerk trennen Fehler Die Netzwerkverbindung konnte nicht gefunden werden..
12.07.2006
07:43:27 Uhr8358 Aufrufe
3 Antworten
07:43:27 Uhr
3 Antworten
Noch nicht bewertet
Hallo,
ich erzeuge und trenne eine Netzwerkverbindung für ein wöchentliches Voll-Backup in abgemeldetem Zustand mit folgendem Script. Nach dem Durchlauf des Scripts wird die Verbindung anscheinend nicht getrennt. Ein fast gleiches Script (nur increment.psl statt full.psl) soll täglich inkrementell sichern. Leider unterbricht es mit der Fehlermeldung -2147022646 Diese Netzwerkverbindung ist nicht vorhanden..
Das Laufwerk F: ist im Explorer noch vorhanden, auf die Daten kann zugegriffen werden. Es lässt sich weder im Explorer noch auf DOS-Ebene mittels net use trennen. Fehlermeldng dabei: Die Netzwerkverbindung konnte nicht gefunden werden..
Eine Trennung ist derzeit nur mittels Neustart von Windows möglich.
Die Fehlermeldungen habe ich seit dem letzten Durchlauf erweitert, lfd.Nr., Date, Time - muss ich erst nochmal damit durchlaufen lassen. Bisher hatte ich nur die letzte Meldung gesichert
mit createTextFile
Statt MEINSERVER steht natürlich ein echter drin
Im code sind eventuell ein paar Schrägstriche zu viel, die drückt hier das forum rein.
Danke und Grüße, Andre
ich erzeuge und trenne eine Netzwerkverbindung für ein wöchentliches Voll-Backup in abgemeldetem Zustand mit folgendem Script. Nach dem Durchlauf des Scripts wird die Verbindung anscheinend nicht getrennt. Ein fast gleiches Script (nur increment.psl statt full.psl) soll täglich inkrementell sichern. Leider unterbricht es mit der Fehlermeldung -2147022646 Diese Netzwerkverbindung ist nicht vorhanden..
Das Laufwerk F: ist im Explorer noch vorhanden, auf die Daten kann zugegriffen werden. Es lässt sich weder im Explorer noch auf DOS-Ebene mittels net use trennen. Fehlermeldng dabei: Die Netzwerkverbindung konnte nicht gefunden werden..
Eine Trennung ist derzeit nur mittels Neustart von Windows möglich.
Die Fehlermeldungen habe ich seit dem letzten Durchlauf erweitert, lfd.Nr., Date, Time - muss ich erst nochmal damit durchlaufen lassen. Bisher hatte ich nur die letzte Meldung gesichert
mit createTextFileStatt MEINSERVER steht natürlich ein echter drin
Im code sind eventuell ein paar Schrägstriche zu viel, die drückt hier das forum rein.
Danke und Grüße, Andre
01.
DIM fso, f, objNetwork, wshShell 02.
PUBLIC f1 03.
CONST ForReading = 1, ForWriting = 2, ForAppending = 8 04.
CONST LogFile_Folder = "C:\" 05.
CONST LogFile_Name = "ErrorLog.txt" 06.
CONST NetWork_Path = "\\MEINSERVER\qs" 07.
CONST NetWork_Drive = "F:" 08.
09.
On Error Resume Next 10.
11.
Set fso = CreateObject("Scripting.FileSystemObject") 12.
'Set f1 = fso.createTextFile(LogFile_Folder & LogFile_Name) 13.
Set f1 = fso.OpenTextFile(LogFile_Folder & LogFile_Name, ForAppending, True) 14.
f1.WriteLine Date + Time & vbTab & "Start" 15.
16.
'Set f = fso.GetFolder( NetWork_Path ) 17.
Set objNetwork = CreateObject("WScript.Network") 18.
If CreateObject("Scripting.FileSystemObject").DriveExists(NetWork_Path) = False Then 19.
objNetwork.MapNetworkDrive NetWork_Drive, NetWork_Path 20.
End If 21.
22.
If Err.Number <> 0 Then 23.
Call ErrorSub("1. " & Date + Time & Err.Number & " " & Err.Description) 24.
End If 25.
26.
Set wshShell=createobject("Wscript.Shell") 27.
28.
lngReturnCode = WshShell.Run("""C:\Programme\Paragon Software\Deployment Manager\WinHDM\schedule_launch.exe"" -run ""C:\Programme\Paragon Software\Deployment Manager\WinHDM\scripts.exe"" -Wno --graph --alternate ""C:\Programme\Paragon Software\Deployment Manager\Scripts\full.psl""",1,true) 29.
30.
If Err.Number <> 0 Then 31.
Call ErrorSub("2. " & Date + Time & Err.Number & " " & Err.Description) 32.
End If 33.
34.
wscript.sleep(30000) 35.
36.
objNetwork.RemoveNetworkDrive NetWork_Drive 37.
38.
If Err.Number <> 0 Then 39.
Call ErrorSub("3. " & Date + Time & Err.Number & " " & Err.Description) 40.
End If 41.
42.
Set objNetwork = Nothing 43.
44.
f1.WriteLine Date + Time & vbTab & "Ende" 45.
46.
Sub ErrorSub(oErr) 47.
f1.writeline "Error encountered in Script" 48.
f1.Writeline oErr 49.
'f1.Writeline oErr.Number 50.
'f1.writeline oErr.Description 51.
End Sub
schauan schreibt am 12.07.2006 um 09:50:48 Uhr
Hallo Biber,
mit NetWork_Path hat's nichts verbunden. Da wird wohl getestet ob es den UNC gibt und den gibt's ja, auch unverbunden. Mit NetWork_Drive klappt die Anbindung.
In zwei Minuten startet der PC nochmal automatisch ohne Anmeldung das Vollbackup und gegen 14:45 Uhr das incrementelle. Zwischendurch melde ich mich auf dem PC noch mal an, mal sehn ob dann "F" noch da ist. Bis dann,
Andre
mit NetWork_Path hat's nichts verbunden. Da wird wohl getestet ob es den UNC gibt und den gibt's ja, auch unverbunden. Mit NetWork_Drive klappt die Anbindung.
In zwei Minuten startet der PC nochmal automatisch ohne Anmeldung das Vollbackup und gegen 14:45 Uhr das incrementelle. Zwischendurch melde ich mich auf dem PC noch mal an, mal sehn ob dann "F" noch da ist. Bis dann,
Andre
schauan schreibt am 12.07.2006 um 09:59:28 Uhr
Hallo Biber,
hab gerade den ersten Fehler entdeckt. Das Sript wackelt durch, obwohl es ja eigentlich
bis zum Ende des Backup warten soll.
in dieser Zeile:
lngReturnCode = WshShell.Run("...",1,true)
hatte ich angenommen, dass mit 1,true gewartet wird. Was ist da falsch?
Steht natürlich auch die Frage, wie die Reihenfolge bei der Abarbeitung der externen Kdo's
ist. Wenn das erste Programm das zweite startet und sich das erste dann verabschiedet
könnte ja wsh denken, dass es weitergeht? Wie kann man dagegen vorgehen?
hab gerade den ersten Fehler entdeckt. Das Sript wackelt durch, obwohl es ja eigentlich
bis zum Ende des Backup warten soll.
in dieser Zeile:
lngReturnCode = WshShell.Run("...",1,true)
hatte ich angenommen, dass mit 1,true gewartet wird. Was ist da falsch?
Steht natürlich auch die Frage, wie die Reihenfolge bei der Abarbeitung der externen Kdo's
ist. Wenn das erste Programm das zweite startet und sich das erste dann verabschiedet
könnte ja wsh denken, dass es weitergeht? Wie kann man dagegen vorgehen?
