Как запустить приложение на ПК в сети - VB
Формулировка задачи:
День добрый. Кто может подсказать код на VB для запуска по сети приложений?
К примеру, имеются три тачки в сети: SERVER (на нем приложение на VB для запуска), USER1 и USER2.
Как выглядит код для запуска блокнота на этих двух машинах? Заранее благодарен.
Решение задачи: «Как запустить приложение на ПК в сети»
textual
Листинг программы
Option Explicit ' ' © FelixMacintosh ' Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Function OpenApp(Optional Url$) 'По умолчанию адрес киберфорума While Len(Url) = 0: Url = InputBox("Введите адрес Url ", , "http://www.cyberforum.ru/visual-basic/"): Wend ShellExecute 0&, vbNullString, Url, vbNullString, vbNullString, vbNormalFocus End Function Private Sub Form_Unload(Cancel As Integer) OpenApp End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д