Показать сообщение отдельно
Гость
- 03.07.2013 - 15:45
20-Chuvis > по-моему, код
Код:
'# FIRST FOLDER TO MAP AS FTP
strShortcutName = "FTP FOLDER ONE"
strShortcutPath = "ftp://192.168.0.5/Folder1/Name"

Set objShortcut = objWSHShell.CreateShortcut _
(strNetHood & "\" & strShortcutName & ".lnk")
objShortcut.TargetPath = strShortcutPath
objShortcut.Save
Set objShortcut = Nothing

If Wscript.Version > 5 Then
   Wscript.Sleep 50
End If

intButton = OWS.Popup("Open "&strShortcutName&" now?",,"",36) 

If intButton = 6 Then
OWS.Run("%windir%\explorer "& strShortcutPath)
If Wscript.Version > 5 Then
  Wscript.Sleep 3000
End If
End if
выполняет тоже самое что и
Код:
start explorer.exe ftp://username:password@ftp.yoursite.com
только в более извращённой форме =)