• 締切済み

VBScriptで

サーバ・クライアントの運用管理をすることになりました。 そこでVBScript(WMI含む)を学習し、運用の効率を上げたいと思います。 現在、以下のようなスクリプトを作成しました。 ・ある端末10数台のOSとSPを調べるもの ・指定したファイルを、指定の端末から探すスクリプト そこで ・このVBScriptは用意しておくと良い。 ・こんなことを注文されたので、VBScriptを作成し作業を行った という事例や経験がありましたらご教授のほうよろしくお願いします。 ただ、VBScript(WMI)を使用しているものに限定させていただきたいと思います。

みんなの回答

  • Lchan0211
  • ベストアンサー率64% (239/371)
回答No.1

http://www.wmifun.net/sample/ が参考になると思います。

関連するQ&A

  • VBScriptについて

    ネットワーク運用を行うに伴って VBScriptかPowerShellかWMIを学習したいと考えております。 以下内容を上の三つ(できればどれかひとつ)で出来る様になりたいと考えております。 ・リモート端末の調査(インストールアプリや、ドライブ、ファイル調査) ・AD関係の操作(OU情報を出力したり、権限の追加、権限の削除等) 1点目:今後ネットワーク運用していく上でどれを学習すれば 一番よいのかわからないのです。 2点目:参考書の購入を考えております。値段は気にしません。 そこで、「三つのうちのお勧め」と、「お勧めの参考書」を ご教授お願いできないでしょうか。 また、プログラム関係に関してはまったくの素人ではなく、 Java、C、PHPは触ったことがありますので根元の部分に関しては問題ありません。

  • VBscriptについて。シェルが機能しない。。

    VBscriptについて。シェルが機能しない。。 Windows XPです。 メモ帳でTEST.wshというファイルを作成しました。 そこに Msgbox("TEST HEllow")とかいて保存しました。 Windows Script Host スプリクトファイルが指定されていません。 とエラーが出ます。どうすれシェルが機能しますか?

  • Windows Server 2003

    Windows Server 2003 Standard Edition ver.5.2 SP2 を使用しています。 ユーザーのプロパティからの個別設定ではなく、 OU単位でログオンスクリプトを設定しているのですが、 特定のクライアントPCが2台あり、その端末からログオンした際は ログオンスクリプトを実行させないという設定をしたいと考えています。 ログオンスクリプト内で特定のクライアントをIPアドレスまたはName等で指定し、 その端末からログオンした際はそのスクリプト以下は実行しない、 といったスクリプトを作成することは可能でしょうか。 なお特定クライアントのOSは Windows2000 1台と Windows Vista 1台 です。 お知恵を拝借できれば幸いです。よろしくお願いいたします。

  • コンピュータアカウントの作成について

    はじめまして。どうぞよろしくお願いいたします。 ドメインに参加していないコンピュータを、 ADの指定のOUにコンピュータアカウントを作成したいと思っております。 ドメイン名:ABC.net OU:tokyo コンピュータ名:PC-01 どうしてもVBScriptでプログラムを作成しなければならないのですが、 WMIかコマンドを使用することでADの指定OUにコンピュータアカウントの作成はできますでしょうか? 知識がなく困っております。 何か参考になるサイトやサンプルを教えて頂けると大変嬉しいです。 どうぞよろしくお願い致します。

  • VBScriptで、ローカルに存在するユーザをサーバに送る方法

    ---前提条件------- まず、下記の方法にて確認できる情報を、仮に【情報A】とします。 【情報A】 「マイコンピュータ右クリック ⇒ 管理 ⇒ (コンピュータの管理画面より)ローカル ユーザとグループ ⇒ ユーザ」 で確認できる、その時点でPCに存在するローカルのユーザアカウントの情報 ---ここまで------- 管理用ADサーバとクライアント約500台が存在するドメイン環境で、クライアントのログオン時にVBScript(いわゆるログオンスクリプト)を用いて、「端末名(ホスト名)+【情報A】」の形でにテキストファイル等のログ(下記の【ログの例】参照)として管理用ADサーバに送信します。 そしてサーバ側では、全クライアントに存在する全ユーザアカウントを端末別で一覧にて確認する。 このようなことは可能でしょうか?またどのようにすればよいでしょう? ※今回サーバに送信したい情報Aですが、有効になっているユーザアカウントだけでも、全てのアカウントでもOKです。 【ログの例】 ------------- PC001 Administrator Guest user01 user02 user03 PC002 Administrator Guest user01 PC003 Administrator Guest user03 user04 PC004 ・ ・ ・ -------------

  • vbscriptでhtmlのソース保存

    vbscriptにてIEを操作し、指定URLのhtmlソースコードをファイルに保存するスクリプトを作成しています。 ですが、サイトによっては取得に失敗するケースがあり、原因が分かりません。 下記の例では、yahooのトップページは取得できますが、amazonのトップページは 取得できませんでした。 申し訳ありませんが、原因と解決策を教えていただきたいです。 よろしくお願いいたします。 尚、環境はWinXP(SP3) 、IEはver8を使用しています。 '--------------------------------------------' Option Explicit Dim objIE Dim strBody Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.Navigate "http://www.amazon.com/" 'objIE.Navigate "http://www.yahoo.co.jp/" Do Until objIE.Busy = False WScript.sleep(250) Loop' strBody = objIE.Document.Body.InnerHtml msgbox strBody Dim fso, tf Set fso = CreateObject("Scripting.FileSystemObject") Set tf = fso.CreateTextFile("test.txt", True) tf.Write strBody tf.Close Set objIE = Nothing '--------------------------------------------'

  • WINXP SP2端末からファイルアップロードができません。

    あるシステムで、Windows XP SP2のクライアント端末から、テキストファイルをサーバへアップロードしたいのですが、うまくいきません。 状況としましては、一連の動作は何も問題なく行われ、きちんとファイルもサーバ側の指定ディレクトリに作成されるのですが、中身が0byteとなってしまいます。 アップロード部分はjavaで書かれており、他バージョンのOS(例えばWindows XP SP1)のクライアント端末からだと、問題なくアップロードができています。 Windows Firewallの設定をOFFにしてみても解決せず、また、Windows Updateを全てインストールしてみたのですが、それでも解決しませんでした。 何か他に原因があるのでしょうか、思い当たる事がもしありましたら、教えていただきたいと思います。他の端末からきちんと動作するので、やはりクライアントの問題ではないかとは思うのですが・・・ どうぞ宜しくお願い致します。

  • VBScriptでのExcelブックのプロパティ参照について

    VBScriptでのExcelブックのプロパティ参照について 先達のみなさまこんにちは。 VBScript(ExcelVBAではなく)を使って、Excelブック内のName (Excelで、[挿入]-[名前]-[定義...]で表示される一覧) を削除したいと思いコーディングしてみましたが、実行すると ブックのBuiltInプロパティを参照しようとする箇所で エラーとなってしまいます。 エラーメッセージは「オブジェクトでサポートされていない プロパティまたはメソッドです。:'objName.BuiltIn'」と 表示しています。 次のようなコードです。 *** Option Explicit Sub DelNames() Dim objArgs Dim objXls Dim objBook Dim objName Dim I Set objArgs = WScript.Arguments Set objXls = CreateObject("Excel.Application") Set objBook = objXls.ActiveWorkbook For I = 0 to objArgs.Count - 1 ' 引数内容確認 Wscript.Echo objArgs(I) objXls.Workbooks.Open objArgs(I) objXls.Visible = True For Each objName in objXls.ActiveWorkbook.Names If (objName.BuiltIn = True) Then objName.Delete End If Next Next Set objXls = Nothing Set objBook = Nothing Set objName = Nothing End Sub *** これをlesson03.vbsとして保存し、これを呼び出すwsfファイルを作成しました。 *** <job id = "DelNamesDD"> <script language = "VBScript" src = ".\lesson03.vbs"></script> <!-- Excel参照設定 --> <reference guid="{00020813-0000-0000-C000-000000000046}"></reference> <!-- メイン処理 --> <script language = "VBScript"> Option Explicit Call DelNames() </script> </job> *** たとえばこれをDelName.wsfとして保存し、DelName.wsfにExcelファイル(*.xls) をドラッグドロップして、「ビルトインではない」名前を削除させたい、と 考えたのです。 しかし、 If (objName.BuiltIn = True) Then の部分で上記のエラーとなってしまい、解決方法がわかりませんでした。 解決方法を教えていただきたくよろしくお願いいたします。 利用しているExcelのバージョンは2003(SP3)、WSHのバージョンは5.6 です。OSはWindows XP SP3です。 お手数をおかけしますが、よろしくお願い申し上げます。

  • JSP/サーブレットを用いたWebアプリケーションでVBScript

    諸事情から、現在開発を行っているWebアプリケーションではVBScriptでIPアドレスを取得しようとしています。 そこで以下のようなJSPを組んだところ 「ActiveXコンポーネントはオブジェクトを作成することができません:WScript.Shell」 とエラーが表示されました。 <HTML> <HEAD> <META http-equiv="Content-Type" content="text/html; charset=SHIFT_JIS"> <META name="GENERATOR" content="IBM WebSphere Studio"> <META http-equiv="Content-Style-Type" content="text/css"> <SCRIPT Language="VBScript"> <!-- Set objShell = CreateObject("WScript.Shell") Set objExec = objShell.Exec("ipconfig.exe") Do Until objExec.StdOut.AtEndOfStream strLine = objExec.StdOut.ReadLine If InStr(strLine, "IP Address") <> 0 Then iColon = Instr(strLine, ":") strAddress = Mid(strLine, iColon + 2) document.myform.IPAddress.value = strAddress End If Loop // --> </SCRIPT> <SCRIPT TYPE="text/javascript"> <!-- function init() { document.myform.submit(); } // --> </SCRIPT> </HEAD> <BODY onload="init()"> <FORM name="myform" action="servlet/com.fujitsu.personal.sd2.common.SD2SYS001Bean" method="post"> <INPUT type="hidden" name="IPAddress"> クライアント認証中 </FORM> </BODY> </HTML> このHTMLをローカルで実行するとエラーは出ませんでした。 なのでローカルの環境面での問題ではないと思われます。 どなたかご教授おねがいいたします。

  • 特定のファイルを他のプロセスが編集中か確認する方法

    VBScriptで指定フォルダにあるファイルに対して処理を行っています。 その指定フォルダにファイルがコピー中であったり、 他のプロセスがファイルを作成中だったりする場合、 このスクリプトを実行すると、コピー中や作成中のファイルに対して処理を行ってしまうため、 正しく処理ができません。 コピー中だったり、他のプロセスが作成や編集を行っている場合、 そのファイルに対しては処理を行わず、次回実行時に編集中でなければ 処理を行うようにしたいと思います。 コピー中だったり、他のプロセスが作成や編集を行っているかどうかを VBScriptで識別する方法を探したのですが、分からなかったため、教えてください。 なお、ファイルは数GBのものが多く、他プロセスが作成を行っている場合、 30~3時間程度行っています。