VB에서 MySQL의 text type의 Field를 가져오려는에 Error가 납니다.
아무리 찾아봐도 찾을 수가 없더라구요.
그래서 Field의 Type을 varChar(255)로 변경했더니
Error 가 나지 않더라구요.
에러메세지 :
40002
SL009: [Microsoft][ODBC 커서 라이브러리]
SQLFetchScroll/SQLExtendedFetch를 호출하기 전에 바운드된 열
이 없습니다.
이거야 참....
Field의 Type이 Text이면 Error 가 발행하고
Type이 varChar(255)형이면 Error 가 나지 않는 이유는 무엇인지...
해결방법이 있는지 알고 싶습니다.
'// 선언문
Public EN As rdoEnvironment
Public DBProd As rdoConnection
Public Const GDsn = "MySQL_jobman" 'Linux MySQL DSN명
Public Const GConn = "UID=admin;PWD=***;" 'DB Connect User/Pass
Private TempDB As rdoResultset
Private tQs As String
Dim a As TextBox
Dim tQs As String
'//DB 연결
Set DBProd = EN.OpenConnection(DSname:=GDsn, Prompt:=rdDriverNoPrompt,
_
ReadOnly:=False, Connect:=GConn, Options:=rdAsyncEnable)
tQs = "Select History From tb_Hst" & vbCr
'//Quary 실행
Set TempDB = DBProd.OpenResultset(tQs, rdOpenKeyset, _
rdConcurReadOnly, rdAsyncEnable + rdExecDirect)
If TempDB.RowCount > 0 Then
a = TempDB(History).Value
End If
TempDB.Close
Set TempDB = Nothing
이렇게 했는데 에러가 발행합니다.
한번 봐 주십시요