I am trying to display oracle DB into DataGrid and facing some problem
when I compile the code I get error.Code:Private Sub Command2_Click() Dim oconn As ADOconnect Dim rs As Recordset Dim strSQL As String strSQL = "SELECT * FROM ZZZJUNKPERSON" Set oconn = New ADOconnect Set rs = New ADODB.Recordset oconn.Open "ODBC;DSN=SSSS;UID=SSSSS;PWD=SSSSS;DATABASE=SSSSS" rs.CursorType = adOpenStatic rs.CursorLocation = adUseClient rs.LockType = adLockOptimistic rs.Open strSQL, oconn, , , adCmdText Set DataGrid1.DataSource = rs End Sub
I am new to VB.




Reply With Quote
