Dim adoconn As ADODB.Connection
Dim adors As ADODB.Recordset
Set adoconn = New ADODB.Connection
Set adors = New ADODB.Recordset
adoconn.Open "dsn=oracle;uid=system;pwd=manager"
adors.Open "clerktbl", adoconn, adOpenDynamic, adLockOptimistic
不知道怎样在程序中怎样对datagrid进行赋值,也不知道datagrid.datasourse=?
请多多指教
set datagrid.datasourse = adors
adors.refresh
Dim adoconn As NEW ADODB.Connection
Dim adors As NEW ADODB.Recordset
adoconn.Open "dsn=oracle;uid=system;pwd=manager"
adors.Open "clerktbl", adoconn, adOpenDynamic, adLockOptimistic
SET DATAGRID1.DATASOURSE=ADORS