datagrid的赋值
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=?
请多多指教
问题点数:20、回复次数:2Top
1 楼wzsswz(岌岌荆棘)回复于 2002-06-05 18:05:55 得分 10
set datagrid.datasourse = adors
adors.refreshTop
2 楼jz_zxl()回复于 2002-06-05 19:32:02 得分 10
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=ADORSTop




