Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.04;
Скачать: CL | DM;

Вниз

Запуск приложения в ЛВС   Найти похожие ветки 

 
Astronom ©   (2007-02-15 11:14) [0]

Здравствуйте Мастера! История следующая: 2 компьютера объединены в сеть. Нужно, чтобы приложение, установленное на одном компьютере запускало файл на другом. Это вообще возможно?
Я пользовался
ShellExecute(MainForm.Handle, PChar("open"), PChar(FileName), nil, nil, SW_ShowNormal);
Но этот фокус работает только для локальных для данной программы файлов, а сеть игнорирует. Что делать?


 
Alarm ©   (2007-02-15 11:27) [1]

офф: что стоит за понятием - запускало файл на другом?
Думается, что ты очень обрадовался если бы с соседнего компьютера запускали программы на твоем:)


 
Рамиль ©   (2007-02-15 11:33) [2]

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


 
Astronom ©   (2007-02-15 12:28) [3]

Что-то на строчку:
Set_objWMIservice = GetObject("winmgmts:\\" & strComputer & "\root\cimv2: Win32_Process");
ругается, не может найти функцию. Может там модуль какой-нибудь нужен?


 
Рамиль ©   (2007-02-15 12:47) [4]

Конечно будет ругаться, это же vbs
Сохрани в файл с раширением vbs и запусти.

А вообще это было направление, куда копать, если хочешь именно из Delphi.


 
Рамиль ©   (2007-02-15 12:50) [5]

Еще можешь запустит скрипт ShellExecute ом :)


 
Astronom ©   (2007-02-15 12:54) [6]

Нда-а-а! Старею, VBS не узнать - это клиника :( Надо все-же больше книжек читать.


 
Astronom ©   (2007-02-15 13:45) [7]

Тупейший вопрос, просто забыл, какой компонент позволяет сделать на форме вкладки (как Standart, Additional) в Delphi?


 
medved_68 ©   (2007-02-15 13:49) [8]


> Тупейший вопрос, просто забыл, какой компонент позволяет
> сделать на форме вкладки (как Standart, Additional) в Delphi?
>

PageControl,TabControl. :)))


 
Astronom ©   (2007-02-15 13:51) [9]

Спасибо! Сегодня наверное полнолуние, мозги где-то далеко-далеко! :)



Страницы: 1 вся ветка

Текущий архив: 2007.03.04;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.043 c
15-1170732655
brother
2007-02-06 06:30
2007.03.04
Бесплатный хостинг с поддержкой php


15-1170797102
Германн
2007-02-07 00:25
2007.03.04
Кому не лень, оцените первую работу начинающего веб-дизайнера :)


2-1171312839
kingsoft
2007-02-12 23:40
2007.03.04
DateTimePicker


15-1170941831
ZeroDivide
2007-02-08 16:37
2007.03.04
Сайт www.nvidia.com лежит вторые сутки


3-1165645262
Ulugbek
2006-12-09 09:21
2007.03.04
Mysql 5 Ошибка в запросе unkown column g.kod_ms in on clause