• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:VBS【プリンタドライバのインストール・設定】)

VBSでプリンタドライバのインストール・設定を簡単にする方法

このQ&Aのポイント
  • 数十台のパソコンにプリンタドライバをインストール・設定する必要がありますが、時間短縮のためにVBSスクリプトを作成したいです。
  • 管理者権限のパスワードを入力してもインストールできない問題が発生しています。初心者なので間違っている部分があるかもしれません。
  • また、インストール後に特定のセキュリティ設定を自動的に変更したいです。どこが問題なのか、修正する方法、またはより効果的な方法を教えてください。

質問者が選んだベストアンサー

  • ベストアンサー
  • kazuma299
  • ベストアンサー率100% (4/4)
回答No.2

こんにちは。 >あともう一つ、やりたいことが、インストール出来た後に、 >「プロパティ」「セキュリティ」タブの「Everyone」のアクセス許可の「プリンタの管理」と「ドキュメントの管理」にもチェックが入っている状態にしたいのですが…。 以下のコマンドで、プリンタのセキュリティ情報をファイルに保存できます。 以下を実行すると、printerのセキュリティ情報がfile.datに保存されます。 rundll32 printui.dll,PrintUIEntry /Ss /n "printer" /a "file.dat" s 以下のコマンドで、プリンタのセキュリティ情報をファイルから復元します。 以下を実行すると、file.datのセキュリティ情報がprinterに復元されます。 rundll32 printui.dll,PrintUIEntry /Sr /n "printer" /a "file.dat" s 手順を簡単に纏めると 1.Everyoneのアクセス許可の「プリンタの管理」、「ドキュメントの管理」にチェックを入れる。 2.セキュリティ情報をファイルに保存。 3.追加したプリンタに、セキュリティ情報を復元。 【注意】 セキュリティ情報に保存・復元される内容は、設定されているすべてのユーザのものになります。 展開するセキュリティ情報を作るときに、不要なユーザが混ざらないように気をつけてください。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • kazuma299
  • ベストアンサー率100% (4/4)
回答No.1

こんにちは。 >Option Explicit > >Dim WshShell >Dim install > >install = "rundll32 printui.dll,PrintUIEntry /if /b ""プリンタ名"" /f ""infファイルがある場所"" /r ""P0.0.0.0"" /m ""モデル名""" > >install = "runas /user:ドメイン名\管理者名 ""install""" > >Set WshShell = Wscript.CreateObject("Wscript.Shell") >WshShell.Run install WindowsXPで上のスクリプトを実行してみました。DOS画面が一瞬表示されて消えました。 このスクリプトで実行されるコマンドは、以下になります。 runas /user:ドメイン名\管理者名 "install" プリンタ追加コマンドではなく、installというコマンドを実行しようとしています。 管理者でプリンタ追加を実行するコマンドを書いて見ました。 バッチファイルにすれば、プリンタを追加する目的を達成できると思います。 runas /user:ドメイン\管理者名 "rundll32 printui.dll,PrintUIEntry /if /b \"プリンタ名\" /f \"infファイルがある場所\" /r \"ポート名\" /m \"プリンタモデル名\"" 【例】 runas /user:domain\administrator "rundll32 printui.dll,PrintUIEntry /if /b \"Test Printer\" /f \"%windir%\inf\oem10.inf\" /r \"lpt1:\" /m \"EPSON PM-A750\"" >あともう一つ、やりたいことが、インストール出来た後に、 >「プロパティ」「セキュリティ」タブの「Everyone」のアクセス許可の「プリンタの管理」と「ドキュメントの管理」にもチェックが入っている状態にしたいのですが…。 やったことが無いのでわかりませんが、ちょっと調べてみます。 よろしくお願いします。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • プリンタ名の変更

    WindowsXPSP3の端末の管理をしています。 管理者権限を持たないユーザーでプリンター名の変更を行いたく runas /user:adminuser "rundll32 printui.dll,PrintUIEntry /Xs /n "Prnname before changes" PrinterName "prnname1"" adminuserは管理者権限を持つユーザー。パスワードは暗号化したWSHのsendkeysで送信する予定です。 というBATファイルを作成したのですがうまくいきません。 現在存在するプリンタ名 "Prnname before changes" にスペースが含まれていることが原因だと思っているのですが、指定の仕方がわかりません。 ご教示のほどよろしくお願い致します。

  • VBScriptで外部プログラム実行中に「処理中」のダイアログボックスを表示したい

    IPPプリンタを自動的にインストールするスクリプトを作成しています。プリンタドライバのインストールに時間がかかるので、その間に「処理中です。しばらくお待ちください」というダイアログボックスを表示したいのですがどのように実装したら宜しいでしょうか。 具体的には11行目の「WshShell.Run install, 1, True」が実行されてから終了するまでダイアログを表示したいと思っています。 以下作成したスクリプトです ------------------------------------ Option Explicit Dim WshShell Dim install Dim open_window install = "rundll32 printui.dll,PrintUIEntry /b ""プリンタ"" /x /n ""プリンタ"" /if /f ""RCBED12K.INF"" /u /r ""https://192.168.1.1""" open_window = "control printers" Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Popup "プリンタドライバをインストールします。この処理には10秒以上かかる場合があります。しばらくお待ち下さい",10,"インストール" WshShell.Run install, 1, True WshShell.Popup "プリンタドライバのインストールが完了しました。この後自動的に開くウィンドウの中に「プリンタ」のアイコンが表示されていればインストール完了です。",10,"インストール" WshShell.Run open_window WScript.Quit ------------------------------------

  • jscriptの質問

    拡張子が「js」のファイルでWshShell.Runでサーバにアクセスできません。 var WshShell= new ActiveXObject("WScript.Shell"); WshShell.Run("runas /user:ドメイン名\\administrator \\サーバ名\Adobe Reader9をサイレントインストールする.bat"); while(!WshShell.AppActivate("runas.exe")){ WScript.Sleep(100); } ・ ・ ・ WshShell.Run("runas /user:ドメイン名\\administrator \\サーバ名… を WshShell.Run("runas /user:ドメイン名\\administrator cmd にすると上手くいきました。 たぶん、「\\サーバ名」の「\」の部分がうまくいってないような気がします どなたかご教授お願いします。

  • WshShell.Runでサーバにアクセスできません。

    拡張子が「js」のファイルでWshShell.Runでサーバにアクセスできません。 var WshShell= new ActiveXObject("WScript.Shell"); WshShell.Run("runas /user:ドメイン名\\administrator \\サーバ名\Adobe Reader9をサイレントインストールする.bat"); while(!WshShell.AppActivate("runas.exe")){ WScript.Sleep(100); } ・ ・ ・ どなたかご教授お願いします。

  • プリンタドライバを別パソコンへ同じ設定でセットアップ。

    プリンタドライバを別パソコンへ同じ設定でセットアップ。 あるパソコンにインストールされているドライバを 同じ設定で他のパソコン(ユーザー権限)にインストールするための セットアップディスクを作成するためのツールで、 NECのMultiWriterスタートアップツールというのをみつけましたが、 こちらはポートは設定できるのですが、 セキュリティのアクセス許可は引き継がれませんでした。 (エブリワンでフル許可にしたいです) 新しいプリンタを導入するので、 ドライバも2、30台インストールせねばならず、 パソコンはユーザー権限なので、 管理者権限に直して…というのを出来れば省きたいです。 ユーザーでインストールでき、かつポートもアクセス許可も思うようにできる方法はないものでしょうか?

  • プリンタドライバがインストール出来ません。

    会社の同僚が使用しているPCなのですが、 プリンタドライバをインストール出来ません。 私はWindowsXPを使ったことがないので よく分からないのですが、 CD-ROMをセットして開けようとすると、 「Administratorの権限がありません」と 表示されてしまいます。 (XP以外のOSのように、Administrator」 現在2つのuser名(?)が登録されている ようなのですが、コントロールパネルの中の 「ユーザーアカウント」で見る限り、 そのどちらも「アカウントの種類」は 「コンピューターの管理者」になっていて、 プログラムのインストールが出来るようなことは 書いてあるのですが…? どのようにすればインストールが出来るように なるのでしょうか?

  • プリンタドライバがインストールできない

    初心者のため、よろしくお願いします。 ウィンドウズビスタを使用しています。 プリンタが壊れ、新しい物に取り替えました。 USB接続にて認識してくれるもの・・と信じていましたが、 「不明な・・」 が出てきてしまい、添付CDからドライバをインストールしようとしても できません。 これは「管理者権限」というものでしょうか。 会社で係で皆で使っているPCで、だれにAdministrator権限(管理者権限)があるのかも不明です。 (1)だれに管理者権限がつけてあるのか(XPでいう、Admimnistrator権限の見方)をどうやって知るのかを教えてください。 (2)インストールもこの権限がついているひとでないとインストールできないと思います。その方法も教えてください。 本当に申し訳なく思っております。忙しいところすみませんが、よろしくお願い致します。

  • 一般ユーザが、PCにプリンタドライバを入れるには

    一般ユーザがPCにプリンタドライバを入れる方法を探しています。 50台程度のノートPCにプリンタドライバをインストールしたいのですが、(プリンタは3種類) 各ユーザには、ソフトのインストールや設定変更の権限がありません。 ネットワーク担当者には、ソフトのインストール権限があります。ネットワーク担当者が、何らかのソフトを利用して、特定のインストール不要で実行可能なファイルを作り、それを一般ユーザが実行するとネットワーク上のプリンタがインストールされるようにしたいのですが、何か方法をご存じの方はありませんでしょうか。 ノートPCのOSはXP Proで、設定変更やプログラムのインストールなどの権限を持たないユーザでログインして使います。 (もちろん、ネットワーク担当者のパスワードを公開することはできません。また、ネットワーク担当者もドライバや一般的なソフトをインストールする権限はありますが管理者権限はありません)

  • VBS runas実行時のパスワードを隠す方法について

    VBS runas実行時のパスワードを隠す方法について こんにちわ! いつもお世話になっております。 VBSでIPアドレスを変更するスクリプト(netshコマンドを実行する)を作成しました。 このコマンドを実行するためには管理者権限が必要なため、runasコマンド+SendKeys にて、自動的にパスワードを入力して実行するような形になっております。(下記) -----・-----・-----・-----・-----・-----・-----・-----・-----・-----・----- shshell.Run "cmd.exe", 0 WshShell.Run "runas /user:%computername%\administrator ""コマンド""" WshShell.SendKeys("{Enter}") WScript.Sleep(1500) WshShell.AppActivate "C:\Windows\System32\runas.exe" WshShell.SendKeys("パスワード") WshShell.SendKeys("{Enter}") -----・-----・-----・-----・-----・-----・-----・-----・-----・-----・----- [質問] このスクリプトのパスワードの部分を隠すまたは暗号化する方法を教えてください。 [背景] このスクリプトを作成者と使用者が違います。作成者は、管理者のパスワードを 把握していますが、使用者には管理者権限のパスワードを知られたくありません。 つまり、スクリプトを見れば分かってしまうという状況は避けたいのです。 [調査状況] ・ネットワーク上にパスワードを格納したテキスト等を置いておき、それを  読み取る。⇒これは、今回実行するスクリプトがIPアドレスを変更するもの  であるため、ネットワーク上の端末から情報を得ることができません。 ・タスクに登録する。⇒タスクに登録するために使用者のコンピュータ上に  スクリプトをおく必要があるため、これも不可です。 ・スクリプト自体を暗号化する。⇒最終手段として考えてはいますが、できれば  スクリプト内で処理を行いたいというのが現状です。(監督者の要望のため) [実行環境] ・Windows7 皆様、お忙しいとは思いますが、ご教授いただけると助かります。 以上 よろしくお願い致します。

  • コマンドプロンプトからプリンタドライバの削除がしたい

    困っています ローカルプリンタのドライバをコマンドプロンプトの操作で 削除したいのですがうまくいきません。 下記のコードをバッチファイルとして実行すると、 ------------------------------------------------------ @echo off rundll32 printui.dll,PrintUIEntry /dd /m "モデル名" ------------------------------------------------------ 「操作を完了できませんでした。指定されたプリンタドライバは現在、使用中です。」というエラーが出てしまいます。 プリンタとファックスで確認したところ ドライバの状態は「準備完了」で、 印刷待ちのジョブはありません。 ドライバの状態を一時停止に変えてみても、 同じエラーが出ます。 OSはwindowsXP プリンターはFUJITSUのレーザープリンターです。 説明不足名ところがありましたら補足します。 よろしくお願いします。

このQ&Aのポイント
  • V -160HDを使用してオンライン配信中に音声出力トラブルが発生しました。
  • オーディオ入力レベルとマスターアウトプットの設定を確認しましたが問題はありませんでした。
  • リセット後、マスターアウトプットの調整で音声が認識されるようになりました。しかし、同様のトラブルが再び発生する可能性があり、原因を知りたいです。
回答を見る

専門家に質問してみよう