Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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, 3735 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 ..
Ähnliche Inhalte
Windows Userverwaltung
gelöst Zugriff auf PC von Domain-User, ohne sein Passwort zu kennen? (12)

Frage von Lara22 zum Thema Windows Userverwaltung ...

Windows Userverwaltung
Lokale User Passworte im AD - Best Practice (9)

Frage von Der-Phil zum Thema Windows Userverwaltung ...

VB for Applications
gelöst VBS Ordner erstellen - wenn nicht vorhanden! (1)

Frage von freshman2017 zum Thema VB for Applications ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Router & Routing
Allnet - VDSL2 Modem - SFP (mini-GBIC) (20)

Frage von Dobby zum Thema Router & Routing ...

Monitoring
Netzwerk-Monitoring Software (18)

Frage von Ghost108 zum Thema Monitoring ...

Windows 10
Seekrank bei Windows 10 (17)

Frage von zauberer123 zum Thema Windows 10 ...

Windows Server
gelöst Kopiervorgang schlägt fehl, weil Datei- und Ordnername zu lang sind (14)

Frage von Schroedi zum Thema Windows Server ...