)
VBScript から Windows PowerShell へ
定義: オートメーション オブジェクトへの参照を作成して返します。 CreateObject Windows PowerShell では、New-Object コマンドレットを使用して、新しい COM オブジェクトを作成します。そのためには、New-Object を呼び出し、このコマンドレットに -comobject パラメータを渡します。これにより、新しい .NET Framework オブジェクトなどではなく、新しい COM オブジェクトが Windows PowerShell で作成されます。-comobject パラメータの後には、COM オブジェクトの ProgID を続けます。 たとえば、次の 2 つのコマンドは、Microsoft Excel のインスタンスを作成してから、最初のコマンドが実際に Excel のインスタンスを作成したことを示すために、2 番目のコマンドで画面上
VBScriptで分かち書きを実行（MS標準機能のみで実装） - Qiita
概要 VBScriptによるInternetExplorerクローラー化サンプルに関連して、 Webサイトのテキストを分かち書き(単語ごとにスペースで区切る形)で出力できたら面白そう。 簡単なテキストマイニングができる。 指定の1文を分かち書きで表示するVBScriptコードを書いた。 Windows・MSOfficeの標準機能のみでの実装で、職場でも安心実行！ 前提 ・MeCab？ 知らない子ですね。 ・MSWordなら知っています。 コード Option Explicit Dim doc Set doc = CreateObject("Word.Application").Documents.Add() Dim rng Set rng = doc.Paragraphs(1).Range rng.Text = "サンプルの文章です。半角スペースで区切られます。" Dim wrd Dim
cocoWrite: misc
' cocoWrite userId = "" userPass = "" Set Ie = WScript.CreateObject("InternetExplorer.Application") Set objADO = CreateObject("ADODB.Connection") objADO.Open "dsn=smartmemo3;uid=" strSqlStmt = "select " & _ "search_key_phrase " & _ "from ACCESS_TRACKER " & _ "where to_char(search_date,'YYYYMMDD') like to_char(current_timestamp -'1 day'::interval,'YYYYMMDD') " & _ "order by search_date" 'obj
自作VBScript復活: misc
Vistaにしてから自作のVBScriptが動かなかったのですが、 リンク先のページのおかげで先に進めそうです。 リンク: 7.11 IEオブジェクトを作る(IE7編) - VBScript & JScript(JavaScript) Tips for WSH.Microsoft VBScript 実行時エラー: リモート サーバ マシンが存在しないか、利用できません。: 'Ie.Busy'
Microsoft Learn: Build skills that open doors in your career
Microsoft Learn. Spark possibility. Build skills that open doors. See all you can do with documentation, hands-on training, and certifications to help you get the most from Microsoft products. Learn by doing Gain the skills you can apply to everyday situations through hands-on training personalized to your needs, at your own pace or with our global network of learning partners. Take training Find
ファイルをダウンロードするスクリプトを VBScript で書く - 自明でない日記
ある案件で, 「エンドユーザーがスクリプトファイルを実行したら, HKCU 配下のレジストリツリーへの書き込みと, クライアントソフトウェアのインストーラーのダウンロードと, インストールの実行がひととおりおこなわれるようにしてほしい」 という要件がありました. 本当は, ウェブページ上のリンクを 1 回クリックするだけで, それら一連の作業がすべて自動的に実行されることを期待されていたのですが, ブラウザーのセキュリティ設定を大幅に緩めることでもしないかぎり難しそうなので, エンドユーザーさんにはせめてスクリプトファイルのダウンロードと実行をおこなうという労力を負担していただくことで妥協することになりつつあります. ちなみに, そういう顧客企業の個別の要望に応じたきめ細かなカスタマイズは日本企業の得意とするところなのかと思いきや, どうも弊社のようなパッケージベンダーの責務らしいというこ
VBSでuser32.dll（Win32API)を使用する方法を教えてください。
はじめてネットで質問します。失礼があったらすみません。 VBSでマウスカーソルの座標を設定する方法を教えてください。 このサイトやあちこち検索してみましたが、VBでのやり方は見つかったのですがVBSでのやり方が見つからなくて心が折れてしまいました。 自分で調べた結果、user32.dll(Win32API )のSetCursorPos を使用する必要があるところまではなんとなく理解しましたがどうやってuser32.dllを使用できように宣言するのかが解りません。 宣言さえできれば SetCursolPos 0,0 で画面左上にマウスカーソルが移動すると思っています。 この問題で会社と家で3日ほどはまってます。 ご回答よろしくお願い致します。
WSHによるDOMの利用について
以下に、WSHを使ったDOMプログラミングのサンプルを示します。 これらのスクリプトはXMLデータとともに、ダウンロードしてから実行してください。 JScriptによるDOMプログラミング Vscript(JavaScript)を使って、住所録のデータを一人づつポップアップウィンドウに表示してみます。 var objXML, fileXML; var nodes, node, items, item, mesg fileXML = 'addr.xml'; objXML = WScript.CreateObject('MSXML.DOMDocument'); objXML.load(fileXML); nodes = objXML.getElementsByTagName('個人情報'); for (i = 0; i < nodes.length; i++) { node = nodes[i
[VBScript]VBScriptでPOSTしてデータをダウンロードする - スベログ/D
フリーライドスキー（フリースキー）とアグレッシブインラインスケートとデジタル機器と、時々、日常のマッタリなブログ Webアプリの動作確認用に作ったものの久しぶりすぎて手間取ったのでメモ。 下記スクリプトはWSHで動作するVBScriptです。 テキストファイルとしてコピペしてファイルの拡張子を.vbsにすると実行できるよーになります。 指定したURLへ複数のパラメータをPOSTしてダウンロードした内容をカレントフォルダに保存しています。 ポイントとしては、複数パラメータのPOSTとServerXMLHTTPを使って動作確認のためタイムアウトを設定してやっているぐらい。 マルチバイトの文字列をPOSTする場合はもちろんエンコードする必要があります。 （その場合は、VBScriptからJScriptのencodeURI関数を呼び出すのが簡単だと思う） Dim objweb Dim objADO
![[VBScript]VBScriptでPOSTしてデータをダウンロードする - スベログ/D](https://cdn-ak-scissors.b.st-hatena.com/image/square/16aa4231be5ccdad9d6886ef4f35106b7d0f804a/height=288;version=1;width=512/http%3A%2F%2Fkazu-360.cocolog-nifty.com%2F.shared-pleasy%2Fnifty_managed%2Fimages%2Fweb%2Fogp%2Fdefault.png)
第12回 WshShellオブジェクトを利用する（1）
第12回 WshShellオブジェクトを利用する（1）：基礎解説 演習方式で身につけるチェック式WSH超入門（2/2 ページ） ウィンドウをアクティブにしてキー・コードを送るAppActivateとSendKeysメソッド AppActivateメソッドを使うと任意の（Runメソッドで起動したものも含め）ウィンドウをアクティブにでき、SendKeysメソッドを使うとアクティブなウィンドウに任意のキー・コードを送信できる。すなわち、キーボードからキーを打ち込む作業を自動化できる。 AppActivateメソッドは引数に指定したウィンドウ・タイトルに一致（完全一致だけでなく、前方一致、後方一致でも可）するものがあればそのウィンドウをアクティブにする（次回以降で述べるExecメソッドを使うとProcessIDを指定できるので起動したアプリケーションを厳密に特定してアクティブ化できる）。アクティブ
MacBSの日常生活的日記: iTunesの再生曲をTwitterに(VBScript編)
先日、WindowsでiTunwsの再生曲をTwitterに投稿できるよう、拙作の フリーソフト「NowTunes」をアップデートしたわけですが、今度はそれを VBScriptだけで実現してみました。 以下の場所からダウンロードして、エディタでユーザー名とパスワードを 編集したら、あとはダブルクリックするだけで投稿できます。 http://saramac.main.jp/fw/nowtunes.vbs ちなみに、そのまま左クリックすると、テキストファイルとして開かれて しまうので、右クリックなどでファイルとして保存してください。 かなり簡易的なので、エラー処理などはほとんどしてませんが、実用上は これで十分かも。 むしろ、NowTunesよりもシンプルなので、使いやすいところもあるかも しれませんね。 ' Twitterのユーザー名(要修正) Const userId =
)
Use regular expressions in VBScript to do search and replace
今回の置換テキストでは、これらの後方参照を使用して、正しい電話番号が再利用されるようにします。この置換テキストは、単に次のような処理を実行するよう指示しています。まず、最初の後方参照 ($1) を取得し、かっこで囲みます。次に空白を空けてから、2 つ目の後方参照 ($2) を挿入し、その後ろにダッシュを挿入します。最後に 3 つ目の後方参照 ($3) を挿入します。 この結果、どのようなデータが返されるでしょうか。次のような電話番号が返されます。 (555) 123-4567 なかなか悪くないでしょう。 では、電話番号のスクリプトの応用編を紹介します。組織に新しい電話体系が導入され、その移行の一環として、すべての電話番号に同じ局番が使用されるようになったとします。元の番号は 666、777、888 などから始まっていましたが、すべての番号が 333 から始まるようになります。この場合、電話
WSHを始めよう － ＠IT
連載目次 わたしたちはコンピュータの奴隷じゃない！ Windows PCを使っていて、あるいはWindowsサーバを管理していて、「何で人間様が、こんなこまごまとした作業を繰り返し、何度も何度もやらないといけないの？」と思うことはないだろうか。例えばこういう作業はどうだろう。 「My Documentsフォルダ内にある2005年に作成されたファイルのうち、最近1カ月更新してないテキスト・ファイルの中身を確認したいので、それらのファイルの1行目を抜き出して1つのテキスト・ファイルにする」 これを手作業でやろうと思うと大変だ。まずエクスプローラでMy Documentsを開き、詳細表示モードにし、作成日時と更新日時をにらめっこしながら該当するファイルを選び、メモ帳で開いて1行目をコピーし、もう1つメモ帳を立ち上げてそれを貼り付け……、という操作を複数のファイルで繰り返す。フォルダが階層化されて
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
[VBScript]指定した時間帯にPCが起動していたらスリープするには: misc
[VBScript]ActiveX コンポーネントはオブジェクトを作成できません。: misc
ココログのアクセスログをEvernoteに自動的に登録する その1: misc
MSXML2.XMLHTTP.3.0でHTTPサーバからのヘッダを取得するには #VBScript: misc
Springframework.org
VBScriptについて質問です。 下記のボタンを自動クリックしたいのですが、どうすればよいでしょうか。…
VBS for WMI サンプル