AConnection,ARecordSet:OleVariant;
AConnection:=CreateOleObject('ADODB.Connection');
AConnection.Open('DSN=测试');
ARecordSet:=CreateOleObject('ADODB.RecordSet')
ARecordSet.Open('Select * from 测试表',adOpenStatic,adLockOptimistic,adCmdText);
Set DBGrid2.DataSource=ARecordSet;
以上语句想实现在DBGrid2中显示数据源测试中的测试表的数据,但出错。请高手指点。
AConnection:=CreateOleObject('ADODB.Connection');
AConnection.Open('DSN=测试');
ARecordSet:=CreateOleObject('ADODB.RecordSet')
ARecordSet.Open('Select * from 测试表',adOpenStatic,adLockOptimistic,adCmdText);
Set DBGrid2.DataSource=ARecordSet;
以上语句想实现在DBGrid2中显示数据源测试中的测试表的数据,但出错。请高手指点。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货