![]() |
Visual Basic 6 help
Как программно запустить Service в WinXP ?
Как запустить другую программу в VB ? Если можно ,в примерах. senks. |
Можно это сделать через Win API.
A в принципе вот пример(правда на c++) как запустит какую нибудь програму из своей как service http://www.codeproject.com/system/xyntservice.asp |
a VB ?
|
какой .ocx подключить , чтоб считывать картинку с webcamrы ?
|
Где можно достать подробную инфу по этой проге?
|
По какой?
|
неужели все .Net юзают ?
|
VB6
У меня есть диск с самоучителем, но он как-то нихера толком не объяснет! |
А shell "net /start имя_сервиса" не пробовал?
Про .NET ты прав, сейчас все переходят на него. |
' Start the indicated program and wait for it
' to finish, hiding while we wait. Private Sub ShellAndWait(ByVal program_name As String, _ ByVal window_style As VbAppWinStyle) Dim process_id As Long Dim process_handle As Long ' Start the program. On Error GoTo ShellError process_id = Shell(program_name, window_style) On Error GoTo 0 ' Hide. Me.Visible = False DoEvents ' Wait for the program to finish. ' Get the process handle. process_handle = OpenProcess(SYNCHRONIZE, 0, process_id) If process_handle <> 0 Then WaitForSingleObject process_handle, INFINITE CloseHandle process_handle End If ' Reappear. Me.Visible = True Exit Sub ShellError: MsgBox "Error starting task " & _ txtProgram.Text & vbCrLf & _ Err.Description, vbOKOnly Or vbExclamation, _ "Error" End Sub |
spasibo Vane :)
|
| Часовой пояс GMT +4, время: 08:38. |
Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.