Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Помогите.. Как создать ЯРЛЫК на рабочем столе ? Добавлено: 16.02.03 03:10  

Автор вопроса:  VisBas | Web-сайт: chipmicro.narod.ru

Как создать ЯРЛЫК на рабочем столе ?

На форуме нашел код,
Программа останавливается на сточке:
Set WshShell = CreateObject("WScript.Shell") 
И выдает ошибку:
Ошибка во время выполнения программы '429'
Компонент ActiveX не может создать объект

Помогите

Код программы:

Dim WSHShell
Dim NewShortcut
Set WSHShell = CreateObject("WScript.Shell")

Set NewShortcut = WSHShell.CreateShortcut("Полный путь и имя файла ярлыка")
NewShortcut.Arguments = "Командная строка"
NewShortcut.Description = "Описание"

NewShortcut.WindowStyle ="Стиль окна" (1)

NewShortcut.TargetPath = "Полный путь и имя программы"
NewShortcut.WorkingDirectory = "Рабочий каталог"
NewShortcut.IconLocation="Полный путь и имя файла с иконкой,индекс иконки(0)"

NewShortcut.Save

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 boevik



Хранитель чата

ICQ: 137392264 

Вопросов: 8
Ответов: 557
  Web-сайт: www.hypertech.ru
 Профиль | | #1 		Добавлено: 16.02.03 08:30
Проверь или есть файл wshom.ocx

Ответить

Номер ответа: 2
Автор ответа:
 VisBas



Вопросов: 44
Ответов: 127
  Web-сайт: chipmicro.narod.ru
 Профиль | | #2 		Добавлено: 18.02.03 08:57
НЕТ !  Спасибо !!

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам