Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Lukas
2 метод: Set objShell = CreateObject("Wscript.Shell") Set ShellApp = CreateObject("Shell.Application") strFolder = objShell.SpecialFolders.Item("Desktop") Set objShortcut = objShell.CreateShortcut(strFolder & "\My Shortcut.lnk") objShortcut.TargetPath = "C:\MyDB.mdb" objShortcut.Save
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.