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

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

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

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

Akina,

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

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")

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

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

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

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

guest_rusimport,

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

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