ODBC driver does not support the requested properties
Posted by:
Erik Torp
Date: October 18, 2013 07:54AM
I have rewritten the source part and now I get this error:
ODBC driver does not support the requested properties
Run time error '-2147217887 (80040e21)
Code:
Set cnnConnect = New ADODB.Connection
On Error GoTo error_handle
cnnConnect.Open "Driver={MySQL ODBC 3.51 Driver};" _
& "Server=999.999.999.999;Port=3306;" _
& "Database=capacitydb;" _
& "User=cmid; Password=********;"
On Error GoTo 0
Set rstRecordset = New ADODB.Recordset
' old code & _
SELECT issuedb.issue_id, tb_system.systemnavn, issuedb.sys_server," & _
" overviewdb.cur_severity, issuedb.sys_issue, issuedb.sys_cause, issuedb.sys_recommend, " & _
" issuedb.sys_date" & _
" FROM tb_system INNER JOIN (issuedb" & _
" INNER JOIN overviewdb ON issuedb.issue_id = overviewdb.issue_id) " & _
" ON tb_system.system_id = issuedb.sys_name" & _
" WHERE (issuedb.issue_id in ( SELECT issuedb.issue_id " & _
" FROM issuedb " & _
" INNER JOIN overviewdb ON issuedb.issue_id = overviewdb.issue_id " & _
" WHERE ((issuedb.kunde_id= " & SelectedCustomer & ") " & _
" AND (overviewdb.cur_status=" & status & ")) " & _
" ORDER BY issuedb.sys_name, issuedb.issue_id ));"'
'New code:
rstRecordset.Open _
Source:="SELECT a.issue_id, b.systemnavn, a.sys_server," _
& " c.cur_severity, a.sys_issue, a.sys_cause, a.sys_recommend," _
& " a.sys_date , e.keytxt" _
& "FROM issuedb a JOIN tb_system b ON b.system_id = a.sys_name" _
& " JOIN overviewdb c ON c.issue_id = a.issue_id" _
& " JOIN rel_keyword d ON d.issue_id = a.issue_id" _
& " JOIN tb_keyword e ON e.keyword_id = d.keyword_id" _
& "WHERE ((a.kunde_id= " & SelectedCustomer & ")" _
& "AND (c.cur_status=" & status & "));", _
ActiveConnection:=cnnConnect, _
CursorType:=adOpenDynamic, _
LockType:=adLockReadOnly, _
Options:=adCmdText
Regards
Erik