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

VBS - User und Passwort übermitteln klappt nicht

Frage Entwicklung VB for Applications

Mitglied: Fixu

Fixu (Level 1) - Jetzt verbinden

01.06.2009, aktualisiert 09:43 Uhr, 3712 Aufrufe, 4 Kommentare

Ich habe unten stehendes Script, jedoch geht es eigentlich nur um die Zeile "Source". Hier möchte ich ein Bild aus einem passwortgeschützten Bereich lokal speichern. Da das Script lokal läuft, ist es egal wenn das Passwort ClearType ist. Warum funktioniert es so nicht?

Option Explicit

Dim fso, Source, Target, Frage, Info

Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Source = "http://admin:password@192.168.1.4/cgi-bin/video.jpg"
Target = "C:\test\"

Frage = MsgBox("Bild kopieren?", vbQuestion + vbYesNo, "Kopieren starten?")

If Frage= vbYes Then
Call Yes
else
Call No
End if

Sub Yes
Do
Call Copy
loop
End Sub

Sub Copy
'Info = MsgBox("Daten werden kopiert", vbInformation, "Info")
fso.CopyFile Source, Target
wscript.sleep 60000
End Sub

Sub No
Wscript.Quit
End Sub
Mitglied: 78632
01.06.2009 um 10:59 Uhr
Zitat von Fixu:
Warum funktioniert es so nicht?

Das liegt sicher daran, dass du weder ein Betriebssystem noch einen Browser hast.
Bitte warten ..
Mitglied: dog
01.06.2009 um 17:42 Uhr
Vielleicht aber auch daran, dass ein Scripting.FileSystemObject - wie der Name schon sagt - nichts mit URLs zu tun haben will:

http://msdn.microsoft.com/en-us/library/e1wf9e7w(VS.85).aspx

Grüße

Max
Bitte warten ..
Mitglied: bastla
01.06.2009 um 19:06 Uhr
... daher versuchsweise ein anderes Objekt verwenden: XMLHTTP - Beispiele finden sich etwa hier oder da ...

Grüße
bastla
Bitte warten ..
Mitglied: Fixu
13.06.2009 um 17:30 Uhr
Ich werde es mal probieren, habe aber momentan keine Zeit dazu. Danke soweit =)
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Windows Userverwaltung
gelöst Programmupdates ohne Adminrechte für die User einer Domäne (3)

Frage von M.Marz zum Thema Windows Userverwaltung ...

Microsoft Office
gelöst Sharepoint Cached User Infos ? (4)

Frage von joehuaba zum Thema Microsoft Office ...

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 ...