![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запуск приложения в ЛВС [D7]
Astronom © (2007-02-15 11:14:00)Здравствуйте Мастера! История следующая: 2 компьютера объединены в сеть. Нужно, чтобы приложение, установленное на одном компьютере запускало файл на другом. Это вообще возможно?
Я пользовался
ShellExecute(MainForm.Handle, PChar('open'), PChar(FileName), nil, nil, SW_ShowNormal);
Но этот фокус работает только для локальных для данной программы файлов, а сеть игнорирует. Что делать?
Astronom (2007-02-15 13:51:00) [1]Спасибо! Сегодня наверное полнолуние, мозги где-то далеко-далеко! :)
medved_68 (2007-02-15 13:49:00) [2]
> Тупейший вопрос, просто забыл, какой компонент позволяет
> сделать на форме вкладки (как Standart, Additional) в Delphi?
>
PageControl,TabControl. :)))
Astronom (2007-02-15 13:45:00) [3]Тупейший вопрос, просто забыл, какой компонент позволяет сделать на форме вкладки (как Standart, Additional) в Delphi?
Astronom (2007-02-15 12:54:00) [4]Нда-а-а! Старею, VBS не узнать - это клиника :( Надо все-же больше книжек читать.
Рамиль (2007-02-15 12:50:00) [5]Еще можешь запустит скрипт ShellExecute ом :)
Рамиль (2007-02-15 12:47:00) [6]Конечно будет ругаться, это же vbs
Сохрани в файл с раширением vbs и запусти.
А вообще это было направление, куда копать, если хочешь именно из Delphi.
Astronom (2007-02-15 12:28:00) [7]Что-то на строчку:
Set_objWMIservice = GetObject('winmgmts:\\' & strComputer & '\root\cimv2: Win32_Process');
ругается, не может найти функцию. Может там модуль какой-нибудь нужен?
Рамиль (2007-02-15 11:33:00) [8]strComputer = "Remote_Computer_Name"
Set objWMIService = GetObject _
("winmgmts:\\" & strComputer & "\root\cimv2:Win32_Process")
Error = objWMIService.Create("c:\Program.exe", null, null, intProcessID)
If Error = 0 Then
Wscript.Echo "Ok!"
Else
Wscript.Echo "Start fail"
End If
Alarm (2007-02-15 11:27:00) [9]офф: что стоит за понятием - запускало файл на другом ?
Думается, что ты очень обрадовался если бы с соседнего компьютера запускали программы на твоем:)