Error:
Code:
Private Sub Form_Load ()
Dim CNN As Object
Dim RSS As Object
Set the CNN=CreateObject (" ADODB. Connection ")
The Set of RSS=CreateObject (" ADODB. You ")
CNN. Open "the Provider=msdaora; Data Source=PROD; User Id=ABC; Password=ABC123;"
RSS. Open the "select * from TBL", CNN, 1, 1
Set Me. You=RSS
RSS. Close
CNN. Close
The Set of RSS=Nothing
The Set of CNN=Nothing
End Sub