2013-01-23 67 views
0

我是新來Visual Basic 6,我試圖執行存儲過程並將結果獲取到文本字段變量。Visual Basic 6:錯誤91和13執行存儲過程時

下面的代碼說明了這一錯誤:錯誤91 「對象變量或With塊變量未設置」 運行時錯誤

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類型不匹配

請告訴我我做錯了什麼?

謝謝!

+1

是你的完整代碼嗎? (請不要改變任何postiong代碼和請求幫助)如果是,那麼你錯過了'Set Cone = New ADODB.Connection' – Deanna

+0

與你的問題不相關,但我會建議conn甚至cn對於連接而言,它是比錐形更好的變量名稱。 – jmoreno

回答

3

正如錯誤所述,您實際上並沒有將Cone設置爲任何值。 您錯過了Set Cone = New ADODB.Connection