QUOTE(blee @ 14 Jun, 2008 - 12:51 AM)
Hi
I would like to set data grids Datamember and Datasource.
Here is my Code , but my grid stays empty with no errors.
What Iam I doing wrong ?
CODE
' Refresh DataGrid View
Dim Cnxn2 As ADODB.Connection
Dim adoRecSetA As ADODB.Recordset
set dgOrder.DataSource = Cnxn2
' dgOrder.DataMember = "adoRecSet"
' Open a connection using the Microsoft Jet provider
' Set Cnxn3 = New ADODB.Connection
' Cnxn2.Provider = "Microsoft.Jet.OLEDB.4.0"
' Cnxn2.Open "C:\Protogen.mdb"
'
' Set adoRecSetA = New ADODB.Recordset
' adoRecSet.Open
'
' strSQL = "SELECT * FROM Orderreference "
'
' adoRecSet.Open , Cnxn2, adOpenDynamic, adLockOptimistic, -1
'
' dgOrder.Refresh
' Refresh DataGrid View
dgOrder.Visible = True
Set dgOrder.DataSource = Nothing
dgOrder.Refresh
Set dgOrder.DataSource = Cnx2n
frmCreateOrder.Refresh
' Refresh DataGrid View
Dim Cnxn2 As ADODB.Connection
Dim adoRecSetA As ADODB.Recordset
' Open a connection using the Microsoft Jet provider
Set Cnxn2 = New ADODB.Connection
Cnxn2.Provider = "Microsoft.Jet.OLEDB.4.0"
Cnxn2.Open "C:\Protogen.mdb"
'
Set adoRecSetA = New ADODB.Recordset
strSQL = "SELECT * FROM Orderreference "
adoRecSet.Open strSQL, Cnxn2, adOpenDynamic, adLockOptimistic, -1
' Refresh DataGrid View
Set dgOrder.DataSource = Cnx2n
' i already corrected the code. please check it.
the logic in database connectivity is you have to create first a connection the will open the database, then create a recordset that will open up the table using sql command or the name of query or table and then you use a datagrid as a container of the result of the recordset.
13 Jun, 2008 - 11:51 PM
| 