Flasher

|
Posted: Tue Jan 05, 2016 14:24 Post subject: |
|
|
Тьфу ты, я на ползунок-то не смотрю. Поправил.
MVV wrote: | Перечисление в режиме списка не даст выбрать занятую букву | Каким образом? Я только так смог:
Code: | '=============== Путь к AskParam ===============
AskParam = "%COMMANDER_PATH%\Utils\AskParam.exe"
'===============================================
S = " /tZ: /tY: /tX: /tY: /tW: /tV: /tU: /tT: /tS: /tR: /tQ: " & _
"/tP: /tO: /tN: /tM: /tL: /tK: /tJ: /tI: /tH: /tG: /tF: /tE: /tD:"
For Each D in CreateObject("Scripting.FileSystemObject").Drives
S = Replace(S, " /t" & D, "")
Next : CreateObject("WScript.Shell").Exec AskParam & " /v290 /s0 /c"" " &_
"Подключить сетевой диск"" /c(1)Принять /c(2)Отменить /rl" & S & " /pДиск: /rd /thttps:"&_
"//webdav.ru /pURL-адрес: /pЛогин: /h /pПароль: net use %1 %2 %4 /user:%3 /persistent:yes" |
И что-то я про режимы не понял. И там и там можно выбирать стрелками? Напиши примеры лучше. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|