VB2008 サービス「PrintSpooler」の停止、開始方法

VB2008 サービス「PrintSpooler」の停止、開始方法

VB初心者です
どなたか教えていただけると助かります

サービス「PrintSpooler」の停止後、特定のファイルを削除してから
再開するプログラムを作りたいのですがまったくわかりません
どなたか教えてください
よろしくお願いします
※参照すべきコンポーネントも必要であれば教えていただけると助かります

No.4 ベストアンサー 回答者： tohru999 回答日時： 2010/10/13 18:03

>>エラー箇所

>>scTemp.Stop()
>>
>>エラー時メッセージ
>>InvalidOperationExceptionはハンドルされませんでした。
>>'.' コンピュータで Spooler サービスを開けません。

以下のどちらかではないですか？
1.管理者権限で実行していない
2.Spoolerサービスが無効にされている


1の場合は、管理者権限で実行してください
2の場合は、サービスを自動にする

この回答へのお礼

ご回答ありがとうございます。
上記の内容で解決することができました。
ありがとうございました。

お礼日時：2010/10/14 19:22

No.3 回答者： tohru999 回答日時： 2010/10/12 19:49

>>Class宣言の前においた「Imports System.ServiceProcess」でエラーが出てしまいます

>>何かが足りないのでしょうか
どういったエラーなのかわかりませんが．．．

No.1で書いた
System.ServiceProcess を参照設定
は、やってますか？

具体的なエラー内容を書かないと、さっぱり状況が把握できません。

この回答への補足

ご回答ありがとうございます。

返信後、「System.ServiceProcess」の参照忘れに気が付き
参照後、ストップの部分だけを切り抜いて実行したところ下記のようなエラーがでました。


エラー箇所
scTemp.Stop()

エラー時メッセージ
InvalidOperationExceptionはハンドルされませんでした。
'.' コンピュータで Spooler サービスを開けません。


よろしくお願いします。

補足日時：2010/10/13 16:14

No.2 回答者： tohru999 回答日時： 2010/10/06 18:28

No.1の書き忘れ

Class宣言の前に
Imports System.ServiceProcess
のコードを追加してください

この回答への補足

ご回答ありがとうございます

教えていただいたとおり、まずはボタンを押したらストップの部分のみ
動作するようにプログラムを組んだのですが
Class宣言の前においた「Imports System.ServiceProcess」でエラーが出てしまいます
何かが足りないのでしょうか

Windowsアプリケーションでこのようなアプリを作成できればと思います
よろしくお願いします

補足日時：2010/10/12 17:55

No.1 回答者： tohru999 回答日時： 2010/10/06 18:13

System.ServiceProcess を参照設定

で、簡単にコードを書くと

Dim scServices() As ServiceController
Dim scTemp As ServiceController

scServices = ServiceController.GetServices()

For Each scTemp In scServices
If scTemp.DisplayName = "Print Spooler" Then
scTemp.Stop()
End If
Next scTemp

' ****************************************
' 特定のファイルを削除のコードをここに記述
' ****************************************

For Each scTemp In scServices
If scTemp.DisplayName = "Print Spooler" Then
scTemp.Start()
End If
Next scTemp