環境
Windows 2000
Visual Basic 6.0
WSH 5.6

VBSでsetup.exe(インストーラパッケージ)を起動する
プログラムを作成し、そのVBSをVisual Basic 6.0で
動かすとエラー「システム コンポーネントをインストールしたり
構成するには、コントロール パネルを使ってください。」が出ます。

しかしVisual Basic 6.0からではなくエクスプローラからVBSを起動すると
正常にセットアップが開始されます。

Visual Basic 6.0→VBS→setup.exeを開始できる方法が分かる方
いましたら、ご教授願います。

A 回答 (2件)

田吾作さんの為に補足しちゃいましょう。


http://oshiete1.goo.ne.jp/kotaeru.php3?q=204531
が前回の質問と思われます。

VBSの実行方法の一例は私が書きました。VB5、Win98SEでの動作確認済み。
VBSの起動は場合によってはWinAPIで実行させる方が良いかも知れませんね。

問題はVB6からVBSを実行し、更にEXEを実行した場合Windows2000上の振る舞いはどうなるのでしょうか?この辺りが怪しい気もします。(ソフト実行ユーザによるセキュリティとかの問題)

もっともなぜVBSなのかが不明なのですね。VB6使っていいのならVB6で作ってしまうのが簡単でいいのですけどね。

因みに先にあげた質問の回答+
----vbs-----
Dim WSH
SET WSH = CreateObject("WScript.Shell")
WSH.Run "Notepad.exe"
SET WSH = Nothing
------------
でちゃんとメモ帳は起動出来ますね。
当方Win98+VB5

VBSがちゃんと実行されているとすれば実行するソフトを変えてみるとか(メモ帳辺りがベター)
    • good
    • 0

1.スクリプトを呼ぶVBのコードの記述が知りたいです。



2.setup.exeを呼ぶスクリプトの記述が知りたいです。

3.setup.exeはオリジナルのソフトのセットアップですか?
もしそうなら・・・setup.exeはどんなソフトでsetup.exeを作成しましたか?
違うなら・・・・・セットアップしたいソフトは何ですか?どんなsetup.exeでも同じ状況になるのですか?
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qバッチ、vbs等でのソフトウェアをアンインストールについて

あるソフトウェアをアンインストールしたいのですが、手間がかかるためバッチ、vbs等で一括でアンインストールしたいと思います。方法を教えていただけないでしょうか。

「やりたいこと」
・レジストリの編集(あるキーの値を変更しないとプログラムの削除ができないため)
・プログラムの追加と削除より、あるソフトウェアの削除
・プログラムの追加と削除より、あるソフトウェアアップデートプログラムの削除
・プログラムの追加と削除より、あるソフトウェアの関連のプログラムを削除
※アンインストールexeは無いです

コマンド、vbs共にある程度の知識はありますが、アンインストールexeのないソフトウェアの削除方法がわかりません。よろしくお願いします。

Aベストアンサー

試してはいませんが、自分ならどう試みるかを書きます。OSの提示がないので、Win XP Home と仮定。他のOSなら適宜読み替えてください。

> ※アンインストールexeは無いです

これはどこで判断されたのでしょうか。

[アンインストールプログラムの確認]
レジストリエディタを起動すると HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall に[プログラムの追加と削除]に登録されているアプリが見えます。その中から、削除対象のアプリを探して選択し、値の名前が『UninstallString』である行のデータに注目。
[プログラムの追加と削除]で特定のアプリの[削除]を選んだときに起動するプログラムはこれと思われます。実際に起動してみて、当たりであれば、これをスクリプトなどで呼べば良いわけです。
(例)Mozilla Firefox (2.0.0.11)であれば、UninstallString は C:\Program Files\Mozilla Firefox\uninstall\helper.exe

[どのスクリプトを使うか]
私は、バッチとVBScriptとUWSCが使えますが、UWSC を採用するでしょう。確認メッセージ(y/n)の選択が処理しやすいからです。

[レジストリの編集]
Windows Script Host - RegWrite メソッド
http://msdn.microsoft.com/ja-jp/library/cc364417.aspx

参考URL:http://www.microsoft.com/japan/technet/scriptcenter/resources/wmifaq.mspx#EABAE

試してはいませんが、自分ならどう試みるかを書きます。OSの提示がないので、Win XP Home と仮定。他のOSなら適宜読み替えてください。

> ※アンインストールexeは無いです

これはどこで判断されたのでしょうか。

[アンインストールプログラムの確認]
レジストリエディタを起動すると HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall に[プログラムの追加と削除]に登録されているアプリが見えます。その中から、削除対象のアプリを探して選択し、値の名前が『UninstallString』である行のデー...続きを読む

QVBscriptからバッチに変数を渡すには?

VBscriptからバッチに文字列を渡したいのですが、どう書いたらいいでしょうか?

VBscriptにWscript.Quit 1と数字を入れた場合、バッチ側は%errorlevel%で取得できると思うのですが、文字列は出来ませんでした。

よろしくお願いします。

Aベストアンサー

こんな感じでできると思います。

[VBS側]
'環境変数に格納したい値をEchoして終了
WScript.Echo kekka

[バッチ側]
for /f "usebackq tokens=*" %%i IN (`call cscript //nologo <vbsフルパス>\hoge.vbs`) DO @set vbskekka=%%i

※INの中のクォートはバッククォートである点に注意

私はこんな感じでよく使っていて、もちろん文字列もOK
ですが、日本語が扱えるかどうかは未検証です。
(半角英数以外はつかった事がない)

Qvbsでからプログラムを、オプションを指定して起動したい。

vbsから、プログラムを実行する歳に、オプションを指定する方法を教えてください。

Firefoxを起動する際に以下のオプションをつけて実行したいのですが
上手くいきません。
(1)-new-tabオプション
(2)URL

===================================

Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"""
Set objWshShell = Nothing


Firefoxを起動するだけであれば上の記述でいけますが
(1)と(2)は
objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"""
の後ろにどのように記述すればいいのでしょうか。

vbsから、プログラムを実行する歳に、オプションを指定する方法を教えてください。

Firefoxを起動する際に以下のオプションをつけて実行したいのですが
上手くいきません。
(1)-new-tabオプション
(2)URL

===================================

Option Explicit
Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"""
Set objWshShell = Nothing


Firefoxを起動...続きを読む

Aベストアンサー

オプションやURLをすべてRunの第1引数で指定します。

objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"" -new-tab http://www.google.co.jp"

Qwindows script encoder ダウンロードできない

script encoderのダウンロードページが
存在しないとのメッセージで
ダウンロードできません。

もうできなくなってしまったのでしょうか
またwindows script encoder に代わる
無料ソフトの代用品は何かないでしょうか

Aベストアンサー

調べてみた・・・。
https://social.technet.microsoft.com/Forums/scriptcenter/en-US/7711b75b-4793-43b0-a5e1-6efa8b7bd00e/where-can-i-download-microsoft-script-encoder?forum=ITCG
の最後のレス(Moscさん)に英語版ですがリンク先が紹介されています。

https://social.technet.microsoft.com/Forums/scriptcenter/en-US/1d132da1-2014-4f34-87f5-d787e764995f/save-encrypted-password-in-vbscript?forum=ITCG#ed557f4e-471e-456d-af81-43c77ef1c318
の、James Whitlowさんのレスです。
(ダウンロードの直リンクを避けるためにこのような回答に)

で、1番目のリンクの、jrv さんによれば
『 script encoder into scrrun.dll 』ということなので、さらにGoogleと
https://gallery.technet.microsoft.com/Encode-and-Decode-a-VB-a480d74c#content
スクリプトファイルを作ってドラッグ・ドロップすればできますよ。
{script encoder(sce10en や sce10jp は必要ない)}
ということです。

調べてみた・・・。
https://social.technet.microsoft.com/Forums/scriptcenter/en-US/7711b75b-4793-43b0-a5e1-6efa8b7bd00e/where-can-i-download-microsoft-script-encoder?forum=ITCG
の最後のレス(Moscさん)に英語版ですがリンク先が紹介されています。

https://social.technet.microsoft.com/Forums/scriptcenter/en-US/1d132da1-2014-4f34-87f5-d787e764995f/save-encrypted-password-in-vbscript?forum=ITCG#ed557f4e-471e-456d-af81-43c77ef1c318
の、James Whitlowさんのレスです。
(ダウンロード...続きを読む


人気Q&Aランキング

おすすめ情報