Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
Question
Wednesday, October 14, 2015 6:05 AM
Hi,
I just upgraded my Windows 8.1 to Windows 10. I am using Visual Studio Ultimate 2013. In my VB.Net windows application, while loading ADODB recordset, following error is coming.
Request your kind help on this issue.
While running the following code,
Connect()
Rst_History = New ADODB.Recordset
Rst_History.LockType = ADODB.LockTypeEnum.adLockOptimistic
SQL_Str = "Select * from tbl_UserMaster order by User_Name"
Rst_History.Open(SQL_Str, Conn, ADODB.CursorTypeEnum.adOpenKeyset)
If Rst_History.RecordCount <> 0 Then
With Rst_History
.MoveFirst()
Do
lstVw = lstUsers.Items.Add(Rst_History("User_ID").Value)
lstVw.SubItems.Add(Rst_History("User_Name").Value)
lstVw.SubItems.Add(Rst_History("User_Emp_Id").Value)
lstVw.SubItems.Add(Rst_History("User_Role").Value)
.MoveNext()
Loop Until .EOF
End With
End If
Thanks in advance
Arun Madhav
Arun Madhav
All replies (2)
Wednesday, October 14, 2015 6:14 AM ✅Answered
Got Solution..... :)
Go to Reference -> ADODB Properties
Change the following values:
Embed Interop Types: False
Copy Local: True
Specific Version: False
Resolved.....
Arun Madhav
Arun Madhav
Thursday, July 4, 2019 11:20 PM
Thanks to this answer my problem solved... i got this problem after windows update from OS Build 1809 to 1903.... Very much happy and thank you so much...