Erdenemandal
Well-known member
Hi, ALL
I have s problem with ADODB.RecordSet . It works in Windows XP but. in Windows 98, gives a error. "System.InvalidExpection"
with RecordSEtClass.Let_ActiveConnection
This is my code
I am using Vb.NET and ADODB.
Please help me
Thanks.
Erdene
I have s problem with ADODB.RecordSet . It works in Windows XP but. in Windows 98, gives a error. "System.InvalidExpection"
with RecordSEtClass.Let_ActiveConnection
This is my code
Code:
Private connectID As Integer = -1
Private Connect As ADODB.Connection
Private Row As ADODB.Recordset
Private row_index As Integer
If Me.checkConnection(ErrorMessage) Then
Try
If (Not Me.Row Is Nothing) Then
Me.Row.Close()
End If
Me.Row = New ADODB.Recordset
Me.Row.Delete(ADODB.AffectEnum.adAffectAll)
MsgBox("Until here is OK")
sQeury = Me.Connect
Me.Row.let_ActiveConnection(Me.Connect.ConnectionString)
Me.Row.let_Source(myQuery)
Me.Row.Open()
Me.Row.Open(myQuery, Me.Connect, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, -1)
MsgBox("Just here")
Me.Row = Me.Connect.Execute(myQuery)
Me.row_index = -1
Catch ex As Exception
MsgBox("Error ::: " & ex.ToString & " " & myQuery & " " & Me.Connect.State)
MsgBox(Me.Connect.ConnectionString)
Me.connectID = -1
End Try
Else
MsgBox("Error :13: " & ErrorMessage)
Me.connectID = -1
End If
I am using Vb.NET and ADODB.
Please help me
Thanks.
Erdene