J
Josh
This code isn't working:
'open connection to database
Dim ADOcon As New ADODB.Connection()
Dim rsOverdue As New ADODB.Recordset()
Dim sql As String
ADOcon.Open("allstaff_contact")
'query for high priority overdue prospects
sql = "SELECT * from contactdetail"
rsOverdue.Open(sql, ADOcon,ADODB.CursorTypeEnum.adOpenStatic)
MsgBox(rsOverdue.RecordCount)
I get -1 in the message box. Can you suggest some code that will work please?
Thanks,
Josh
'open connection to database
Dim ADOcon As New ADODB.Connection()
Dim rsOverdue As New ADODB.Recordset()
Dim sql As String
ADOcon.Open("allstaff_contact")
'query for high priority overdue prospects
sql = "SELECT * from contactdetail"
rsOverdue.Open(sql, ADOcon,ADODB.CursorTypeEnum.adOpenStatic)
MsgBox(rsOverdue.RecordCount)
I get -1 in the message box. Can you suggest some code that will work please?
Thanks,
Josh