C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 14 を表示中)
■4406 / )  VBSからストアドプロシージャの戻り値を取得
□投稿者/ Question (1回)-(2007/06/16(Sat) 11:35:59)

分類:[VBScript] 

VBSからSQL Server2005のストアドプロシージャ(『SELECT COUNT (*)〜』でレコード数を取得)
を実行したのですが、戻り値(COUNTの結果)を取得する為の処理でCreateParameterを実行して
いる行に対して以下のエラーが発生しています。

 エラー : 引数が間違った型、許容範囲外、または競合しています
 コード : 800A0BB9
 ソース : ADODB.Command

CreateParameterの書式に関して、MSDNや他のフォーラムで検索してみたところ特に問題は無さ
そうなのですが・・・。

コードを記載しますので問題点をご指摘願います。

【補足】
 ・DBへの接続は正常に完了している
 ・ストアドプロシージャの実行は正常に完了している

********** 以下がコードになります **********

dim strConnection

strConnection = "接続文字列"

Set objConn = CreateObject("ADODB.Connection")

objConn.Open strConnection

Set objComm = CreateObject("ADODB.Command")

With objComm
.ActiveConnection = objConn
.CommandType = 4
.CommandText = "プロシージャ名"
Set Param = .CreateParameter("RetValue",adEmpty,adParamReturnValue,2,4)  ←←← エラー行
Parameters.Append Param
.Execute()
TEST = .Parameters("RetValue").Value)
Wscript.echo TEST
End With

set objcomm = Nothing
Set objConn = Nothing

返信 編集キー/


管理者用

- Child Tree -