0

Visual Basic 6を初めて使用し、ストアドプロシージャを実行して、結果をテキストフィールド変数に変換しようとしています。

以下のコードは、このエラーを示しています。エラー91「オブジェクト変数またはブロック変数が設定されていません」ランタイムエラー

Dim auxInfo As rdoResultset
Dim Cone As ADODB.Connection
    SQL = "EXEC  [mybase].[dbo].[myStoredProcedure] '" & var1 & "', '" & var2 & "','" & var3 & "'"
    Set auxInfo = Cone.Execute(SQL)
    myTextField.Text = Trim(auxInfo("fistColumn"))
    auxInfo.Close

そして、私が以下を変更した場合：

Set auxInfo = Cone.Execute(SQL)

の中へ

   Set auxInfo = UAN.OpenResultset(SQL, rdOpenDynamic, rdConcurValues, 0)
'with UAN I call the funcion that connects to my database. The connection works, I've tested it.

新しいエラーが発生します：エラー13タイプの不一致

私が間違っていることを教えてください。

ありがとう！！

4

1 に答える 1

3

エラーが言うように、あなたは実際にはCone何も設定していません。がありませんSet Cone = New ADODB.Connection。

于 2013-01-23T12:21:39.240 に答える