загрузка файла из интернета.

загрузка файла из интернета.

Добрый день.
Нашел в примерах как загрузить файл и зинтернета.

Function DownLoadFile2(strPathName As String)
Dim lngRetVal As Long
lngRetVal = DoFileDownload(StrConv(strPathName, vbUnicode))
If lngRetVal = 0 Then DownLoadFile2 = True
End Function

где то так. Проблема оказалась. Чтобы файл скачать требуется пароль.
Пароль есть, но как сделать чтобы он заносился автоматически не знаю.
Просто хотел чтоб файл ночью закачивался, а потом обрабатывался.
А днем уже можно с ним работать. А то каждый раз приходится в ручную
пользователя и пароль заносить.

DoFileDownload - метод из Shdocvw.dll, который есть ни что иное как WebBrowser Control. Вот в справке по контролу и смотри...

Akina,

Этот контрол как я понял вообще такой функцией не обладает. Может подскажете алтернативу, если не готовую функцию, то хоть в какую сторону копать. Если это вообще возможно реализовать.

AlexDE,
просто URL (адрес странички) указывайте типа так
http://user:pass@domen.ru

guest_rusimport,

Попробовал примерно так.
Call DownLoadFile2("https://'Customer':'Pass'.domain.com/Customer/Parts/Parts_Stock.csv")
Выдает что текущие настройки безопасности не позволяют загрузит файл.

А так проходит. Только пользователя и пароль надо вручную вводить.
Call DownLoadFile2("https://www.domain.com/Customer/Parts/Parts_Stock.csv")

а что, кавычки - это символы в логине и пароле?

А что Техт без ковычек???

Ето же техт , а не переменная.

Просто реальные данные выложить не могу, узнают голову оторвут.

Хотя ни как не работает, ни с кавычками , ни без

AlexDE,
кавычки не надо и собака в адресе обязательна :)

guest_rusimport,

Спасибо, добил таки :) Кавычки действително не надо, и собаку не поставил.

Единственная заморочка, в DoFileDownload спрашивает куда сохранить , а URLDownloadToFile отлично работает без вопросов, можно на ноч на таск ставить.