12-04-2012, 10:05 PM
Hi,
I'm getting unspecified error while opening a recordset and it is not happening for all the tables. The datatype used for tables are only INT, CHAR and VARCHAR. the only possibility i see is huge volume of data, but the error is thrown even for table with 4000 records. FYI .. password is not encrypted
I'm getting unspecified error while opening a recordset and it is not happening for all the tables. The datatype used for tables are only INT, CHAR and VARCHAR. the only possibility i see is huge volume of data, but the error is thrown even for table with 4000 records. FYI .. password is not encrypted
Code:
Dim strConn
strConn = "Driver= {Microsoft ODBC for Oracle}; " &_
"ConnectString=(DESCRIPTION=" &_
"(ADDRESS=(PROTOCOL=TCP)" &_
"(HOST=) (PORT=1521))" &_
"(CONNECT_DATA=(SERVICE_NAME=)));uid=; pwd=;"
Dim obConnect
Dim obRecset
Set obConnect =CreateObject("ADODB.Connection")
Set obRecset = CreateObject("ADODB.Recordset")
obConnect.Open strConn
Dim queryStr
queryStr = "select * from mv_product"
Set obRecset = obConnect.Execute(queryStr)
obRecset.MoveFirst
GetDBField = obRecset.Fields(0).Value
msgbox GetDBField