Date: Fri, 07 Feb 2003 22:04:36 +0900
From: Akira Takahashi <who@example.co.jp>
あっきぃです。
事故レスです。
> Dim RS as ADODB.Recordset
> Set RS = New ADODB.Recordset
> SQL = "exec ストアド1 @引数='" & Trim(文字列変数) & "'"
> RS.Open SQL, Connection
どうやら、Connectionが接続数の限界(とでも言うのでしょうか?)に達していた
みたいで、新しいConnectionを作成して実行したらうまくいきました。
Dim newConnection as ADODB.Connection, RS as ADODB.Recordset
Set newConnection = New ADODB.Connection
newConnection.ConnectionString = Connection.ConnectionString
newConnection.Open
Set RS = New ADODB.Recordset
SQL = "exec ストアド1 @引数='" & Trim(文字列変数) & "'"
RS.Open SQL, newConnection
…なんだか、思いっきりタコですね(^^;;;;;;
[MSDE/SQLServerに関して、今、どんなことにお困りですか?] |
よろしければお困りの内容を、電子メールで教えて下さい。 |
質問を電子メールで作成する
|
[ウィンドを閉じる][MSDE/SQLServer FAQ ][MSDE / MSDE2000 技術サポート情報一覧]
|