
VBスクリプトでDBにアクセスし、ストアドプロシージャを実行したいのですが、実行できなくて困っています。ADODB.Commandを使わずに、ADODB.Connection.ExecuteでCommandTextを実行するとレコードを取得することができるので、DBにコネクトすることはできているようなのですが、ストアドプロシージャを実行することができません。どなたか原因分かる方いらっしゃいますでしょうか。このスクリプトはASPではなく、バッチで実行します。よって参照設定ができないので、ComandTypeにadCmdStoredProcを値で入れるようにしています。サーバはWindows2003Server,DBはSQLServer2005です。よろしくお願いします。
Option Explicit
On Error Resume Next
Dim blnRetCode ' 戻り値
Dim objAdoCon ' ADO 接続
Dim objComm ' コマンドオブジェクト
'Dim return_value 'DBバックアップの成功、失敗の戻り値
' ADO 定数の読み込み
Set objAdoCon = WScript.CreateObject("ADODB.Connection")
If Err.Number = 0 Then
'ADODBを使用してDBにアクセスする
objAdoCon.ConnectionString = "Provider=SQLOLEDB.1;Password=aaaa;User ID=user2;Catalog=dbname;Data Source=192.168.8.2"
objAdoCon.Open
Set objComm = CreateObject("ADODB.Command")
objComm.ActiveConnection = objAdoCon
objComm.CommandType = 4
objComm.CommandText = "ExportData"
objComm.Execute
If (Err.Number <> 0) Then
MsgBox Err.Number
End If
objAdoCon.Close
End If
Set objComm = Nothing
Set objAdoCon = Nothing
A 回答 (1件)
- 最新から表示
- 回答順に表示

No.1
- 回答日時:
「実行できなくて」ではなんとも言えないのでもう少し具体的な現象(エラーメッセージ等)を書いていただいたほうが良いかと。
ぱっと見て一箇所だけ気になったのは、
objComm.ActiveConnection = objAdoCon
は
Set objComm.ActiveConnection = objAdoCon
ではないのでしょうか?
この回答への補足
ご回答ありがとうございます。
分かりにくい表現で申し訳ありません。エラーは、エラーコード-2147217900で、メッセージを調べてみると、ランタイムエラーやSQLサーバにオブジェクトがみつからないなど、いろいろなメッセージがあり、どのエラーだか分からない状態です。また、
>objComm.ActiveConnection = objAdoCon
>は
>Set objComm.ActiveConnection = objAdoCon
>ではないのでしょうか?
に関して、
Set objComm = CreateObject("ADODB.Command")
でobjComm にオブジェクトを設定しているので
プロパティの値設定はSETが無くてもいいかと思ったのですが、
Setの使い方が間違えておりますでしょうか。
objComm.ActiveConnection = objAdoCon
を
Set objComm.ActiveConnection = objAdoCon
と書き直すと、同じくエラーコード-2147217900があがります。
初心者的な質問で大変申し訳ありませんが、ご存知の方教えていただけますようお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドプロンプトのエラーに...
-
[teraterm] waitコマンドで停止...
-
バッチファイルの内容を表示さ...
-
NASに移したBATファイルからセ...
-
エクセル フォルダの画像を画...
-
VBscriptが起動しない?
-
ホームページのリンクからプロ...
-
exeファイルを実行するとコマン...
-
これってパソコンの最適化が完...
-
「読み取りと実行」と「読み取...
-
16進数の変換処理
-
imacroで組んだマクロをバッチ...
-
COBOLのイニシャライズとバリュ...
-
Excel(エクセル) VBA プロシー...
-
VBScriptでコマンドプロンプト...
-
[VBScript]ファイルの削除
-
バッチファイル実行時のプロン...
-
PDFファイルを開き、印刷し、閉...
-
バッチファイルが不正終了して...
-
複数のbatファイルを自動実行し...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
コマンドプロンプトのエラーに...
-
[teraterm] waitコマンドで停止...
-
複数のbatファイルを自動実行し...
-
これってパソコンの最適化が完...
-
Windows System32 Security Hea...
-
「読み取りと実行」と「読み取...
-
バッチファイルの内容を表示さ...
-
VBscriptが起動しない?
-
exeファイルを実行するとコマン...
-
Access の VBA 実行中に他の操...
-
Excel(エクセル) VBA プロシー...
-
PDFファイルを開き、印刷し、閉...
-
ネットワーク名が見つかりません
-
pythonスクリプトを管理者権限...
-
エクセル フォルダの画像を画...
-
VBScriptでコマンドプロンプト...
-
Excel VBA ステップインが途中...
-
WSH.Run の処理内容をテキスト...
-
バッチファイルが不正終了して...
-
ExcelのVBAが特定のPC上でのみ...
おすすめ情報