• 締切済み

vbscriptで新しいウィンドウを開きたい

タイトルの件、下記URLのサンプルを参考にさせていただいたのですが、思うような結果が得られません。 http://homepage1.nifty.com/kodayan/vbs/app1/window01.html 上記サンプルの内容をそのまま使うと、 Microsoft VBScript 実行時エラー (0x800A01F4) この変数は宣言されていません。: 'Window' というエラーが表示されます。 そこで、変数として宣言すると今度は Microsoft VBScript 実行時エラー (0x800A01A8) オブジェクトがありません。: 'window' というエラーが表示されます。 いったいどうしたら良いのでしょうか?助けてください。 よろしくお願いします。

みんなの回答

  • Bonjin
  • ベストアンサー率43% (418/971)
回答No.1

リンク切れしているので書いたソースを補足してみてください。

searching
質問者

お礼

すいません。 ソースの見直し中に自己解決しました。 ありがとうございました。

searching
質問者

補足

申し訳ございません。 URLを間違えていました。 http://homepage1.nifty.com/kodayan/vbs/app1/window01.htm よろしくお願いします。

関連するQ&A

  • VBScript でのformat

    VBScript で、数値をフォーマットしたいのですが、 以下のようなエラーになります。 Microsoft VBScript 実行時エラー: この変数は宣言されていません。: 'Format' スクリプトの内容は以下のとおりです。 Wscript.Echo Format(13, "0000") OSはWindowsXPホームエディション(SP2)です。 よろしくお願いします。

  • HTML + VBScript で Sleep できない

    お世話になります。ご教授ください。 類似の質問が既にあるのかもしれませんが、質問させていただきます。。。 HTML上に記述するVBScriptでは、WScriptは使用できないという記事を見かけます。 実際、HTML+VBScriptで使用すると、 変数は宣言されていません:'WScript' とエラーが出ました。 WSH は WScript のインスタンスを読み込むことができないうんぬん、と書かれていました。 書きたいことは、 WScript.Sleep 1000 です。 もしくは、これに変わる何かがしたいです。 外部ファイル化(.vbs)を試してみましたが、ダメでした。 ==== サンプル(Sample.vbs) ==== Option Explicit MsgBox "start" Dim Idx = 0 Do While Idx <> 3 WScript.Sleep 1000 MsgBox Idx Idx = Idx + 1 Loop WScript.Sleep 1000 MsgBox "end" ================ <html> <head> <meta http-equiv="Content-Script-Type" content="text/vbscript"> <script language="VBScript" type="text/vbscript" src="sample.vbs"></script> </head> … という感じです。 上記はあくまでサンプルですが、最終的には「ループの中で」待ち状態、になるようにしたいです。 Do While ある条件 1秒待ち ある条件に、なるかならないか Loop (setTimeout を使用する例が書かれていましたが、それではループ制御は走り続け、CPUが痛い目に合いました。。。) もしかして、WScript は使用できるのに、記述ミスかもしれませんし。。。 できない場合は、それに変わる案などいただけるとありがたいです。 よろしくお願いします。

  • VBScriptの実行完了を待ってからDOSのプログラムを実行したい。

    DOSのバッチからVBScriptを実行しています。 VBScriptの実行が完了してから次のDOSコマンドを実行させたいのですが、 START /WAIT SAMPLE.vbs では 実行完了を待ってくれないみたいです。 どうしたらよいでしょうか?ご教授お願いいたします。

  • VBScript

    VBScriptを使って文字表示を整えるにはどうしたらいいでしょうか? 例えば WScript.StdOut.WriteLine "変数1" & ":" & "変数2" のような場合だと 繰り返し表示したときに、変数の大きさによって表示がずれてしまいます。 ・ずれた例 aaa:bbb a:b ・整える例 aaa:bbb a :b こんな感じにしたいです。

  • 【VBScript】※渡したい変数のみ抜粋

    【VBScript】※渡したい変数のみ抜粋 WScrip quit(1) 【バッチスクリプト】 for %%i ("パラメータファイル") do ( cscript a.vbs %%i if not %errorlevel%==0 goto err ) 上記VBSが異常終了した際に返す、戻り値1を そのままバッチスクリプトのerrorlevelに返したい のですが、errorlevel==0となってしまいます。 for文を使わず、vbsを実行していた際には、 旨く引き渡せていたのですが、構文の修正が 必要なのでしょうか? どなたかご教示下さい。 宜しくお願いします。

  • VBScriptで別ドライブにフォルダを移動できません

    VBScriptで別ドライブにフォルダを移動できません VBScriptで別ドライブにあるフォルダを移動したいのですが、以下のエラーで異常終了してしまいます。 Microsoft VBScript 実行時エラー: 書き込みできません。 移動はファイルシステム関連オブジェクトのMoveFolderメソッドを使用しています。 VBScriptで別ドライブにフォルダを移動する方法をご存知でしたらご教示頂けませんでしょうか。 よろしくお願いいたします。

  • VBScriptのプロセス名について

    お世話になります。 VBScript(拡張子がvbs)をWindows環境で実行すると、 タスクマネージャーのプロセスタブに、「wscript」と表示されますが、 これを任意の名前にする事は可能でしょうか? どうぞ宜しくお願いします。

  • VBscriptで「改行」と「"」を置換させる

    VBスクリプトを使ってファイルを置換したいと考えています。 以下のVBSファイルとコマンドを使って、置換することはできました。 が、置換対象が「改行」と「"」の場合、エラーとなって置換できません。 どうすればいいのでしょうか。 よろしくおねがいします。 ********コマンド******** (1)cscript replace.vbs "C:\test.txt" "Jim" "Jane" (2)cscript replace.vbs "C:\test.txt" ""_\n" "a_test" ********VBSファイル(replace.vbs)******** Const ForReading = 1 Const ForWriting = 2 strFileName = Wscript.Arguments(0) strOldText = Wscript.Arguments(1) strNewText = Wscript.Arguments(2) Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile(strFileName, ForReading) strText = objFile.ReadAll objFile.Close strNewText = Replace(strText, strOldText, strNewText) Set objFile = objFSO.OpenTextFile(strFileName, ForWriting) objFile.WriteLine strNewText objFile.Close (1)のコマンドを実行すると、 「Jim」は「Jane」に置換されますが、 (2)のコマンドを実行すると、エラーになり置換されません。 エラーメッセージ: 「Microsoft VBScript 実行時エラー: インデックスが有効範囲にありません。」 よろしくおねがいします。

  • VBscriptからIE11起動

    windows7(x64) IE11 IEを起動するスクリプトを.vbs作成しました。 vbsファイルをダブルクリックすると、↓エラーが発生するときがあります。 「 WScript.CreateObject: "InternetExplorer.Application" というオブジェクトを作成 できませんでした。」 ↓SRCです。 Dim IE Set IE = WScript.CreateObject("InternetExplorer.Application", "Event_") IE.Visible = True IE.Navigate ("http://www.yahoo.co.jp") set IE = nothing 数秒待ったり、vbsを連打すると起動します。 プロパティ(vbs右クリック)のスクリプトタブで実行時間を10秒にしてみても起動できないことがあります。 オブジェクトを作成しない方法はありますか? また、失敗している原因はなんでしょう?

  • VBScriptの変数宣言

    ASPでvbscriptを使って処理をしているページの修正を行っていたのですが、その中で不思議な状態が発生しています。 <% Option Explicit On Error Resume Next %> ===== 省略 ===== <% filename = Trim(bobj.Form(bin,"filename")) Dim filename ===== 省略 ===== 普通、上記のような記述ではfilenameの代入のところでエラーが発生すると思うのですが、代入処理の直後にerr.numberを判定しても、エラーが発生していないんです。 includeしてあるファイルの内部も検索しましたが、filenameの変数宣言は見つかりませんでした。 VBScriptって、どこで変数宣言を行っても有効になるのでしょうか? 正常に動いているので、今のところ問題は無いのですが、何か気持ち悪くて。。。 似たような現象が起こった事のある方や、これが正しい動きだというご指摘をお願いいたします。

専門家に質問してみよう