VBからサービスの機動


ロラン  2004-12-13 22:43:08  No: 87342  IP: [192.*.*.*]

よろしくお願いします。

VB6から、windowsに登録されている
サービスを開始できるものでしょうか?

http://www.roy.hi-ho.ne.jp/mutaguchi/wsh/object/shell2.htm
↑はVBに適用できますでしょうか?

よろしくお願いいたします

編集 削除
魔界の仮面弁士  2004-12-13 23:07:42  No: 87343  IP: [192.*.*.*]

バージョンが適切なら、動作しますよ。

> Set Shell=Wscript.CreateObject("Shell.Application")
の部分を、
  Dim objShell As Object
  Set objShell = CreateObject("Shell.Application")
としてください。

As Object が嫌いなら、「参照設定」で Shell32.DLL を指定して、
  Dim objShell As Shell32.Shell
などとすればOK。


Shell.ServiceStart メソッドが使えない環境であれば、
  steServiceName = "W32Time"   'サービス名
  Shell "CMD.EXE /C NET START " & steServiceName, vbNormalFocus
のように、『NET STARTコマンド』を利用する方法もあります。

編集 削除
ロラン  2004-12-20 22:14:24  No: 87344  IP: [192.*.*.*]

非常に的確なアドバイスをありがとうございました!
実現できました。
とても感謝しております^^

編集 削除