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

mit VBScript am Server anmelden

Frage Entwicklung VB for Applications

Mitglied: 57677

57677 (Level 1)

29.11.2007, aktualisiert 02.12.2007, 5580 Aufrufe, 1 Kommentar

Hallo,
ich bin ein Neuling in Sachen vbs und hab mir folgendes Script geschrieben:
01.
Dim user,pass,wbem,net,wmi,fso,zwis,kontroll,answer 
02.
user = "Administrator" 
03.
pass = "abcdefg" 
04.
 
05.
Set net = CreateObject("WScript.Network") 
06.
Set wbem = CreateObject("WbemScripting.SWbemLocator") 
07.
wbem.Security_.privileges.addasstring "sedebugprivilege", True 
08.
If remote = net.ComputerName Then 
09.
  Set wmi = wbem.ConnectServer("Server") 
10.
Else 
11.
  Set wmi = wbem.ConnectServer("Server",,user,pass) 
12.
End If 
13.
 
14.
Set fso = CreateObject("Scripting.FileSystemObject") 
15.
Set kontroll = fso.OpenTextFile("\SERVERFestplatteNetzwerkprotokolleSystem.log",1) 
16.
zwis = kontroll.ReadAll 
17.
answer = Msgbox (zwis,0,"Übersicht Sever")
Das Script soll sich zunächst am Windows 2k Professional Rechner anmelden um auf den Freigegebenen Ordnrer zugreifen zu können. Dann soll es die System.log Datei öffnen und ihren Inhalt anzeigen.
Das Problem ist, dass sich das Script am anderen Rechner nicht anmelden kann, ich hab schon zwei Benutzer ausprobiert:

Fehlermeldung als user1: "Zugriff verweigert "
Fehlermeldung als Administrator:
"Anmeldung fehlgeschlagen: unbekannter Benutzername oder falsches Kennwort"

Pfad, Passwort und Benutzername hab ich korrekt eingegeben (glaub ich)
Wenn ich den Benutzernamen und das Kennwort manuell eingebe, kann ich ohne Probleme auf den freigegebenen Ordner zugereifen.

Hier habe ich das Problem noch näher erklährt:
http://www.administrator.de/frage/ordnerfreigabe-unter-windows-2k-prof- ...

Ich hab es vorläufig so gelöst:
Auf dem W2k Prof jeden Benutzer eingetragen mit entsprechnedem Kennwort.
Aber diese Lösung soll nur eine Übergangslösung sein.

Vielen Dank für eure Hilfe.

Mit freundlichen Grüßen
Mike
Mitglied: 57677
02.12.2007 um 15:32 Uhr
Die Frage steht immernoch.
Würd mich sehr über Antworten freuen!

Mit freundlichen Grüßen mike

[edit 28.12.2007]
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

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

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...

Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...