二问奇怪的问题急呀

dong12 2003-12-24 08:48:26
DIM RECDSET AS NEW ADODB.RECORDSET
DIM STR1 AS STRING
DIM STR2 AS STRING
STR1="DSN=ORACLEQQQ;UID=OOO;PWD=90"
STR2="SELECT * FROM AAA"
RECDSET.OPEN STR1,STR2
ADODC1.RECORDSOURCE=STR2
SET DATAGRID1.DATASOURCE=ADODC1------执行到这里出现"未指定数据源急呀
...全文
2 点赞 收藏 12
写回复
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
dong12 2003-12-25
我解决了呀
回复
Fanks 2003-12-24
Dim Conn As new ADODB.Connection
回复
Fanks 2003-12-24
行集合不能做标签,问题出在你打开记录集的方式上,加参数就可以了,正如LemonRain(柠檬雨)代码里的RECDSET.OPRN STR2, Conn, adOpenKeyset, adLockBatchOptimistic
回复
dong12 2003-12-24
to LemonRain(柠檬雨) conn.OPEN STR1此句有错对象变量或WITH块变量未设置
回复
LemonRain 2003-12-24
我也没什么好办法。
换这个代码试试,不用控件。
Dim Conn As ADODB.Connection
DIM RECDSET AS NEW ADODB.RECORDSET
DIM STR1 AS STRING
DIM STR2 AS STRING
STR1="DSN=ORACLEQQQ;UID=OOO;PWD=90"
STR2="SELECT * FROM AAA"
conn.OPEN STR1
RECDSET.OPRN STR2, Conn, adOpenKeyset, adLockBatchOptimistic
Set DataGrid1.DataSource = RECDSET
回复
dong12 2003-12-24
我的ADODC1是控件我把此控件放在窗体上
回复
LemonRain 2003-12-24
你的ADODC1是怎么定义的??
回复
dong12 2003-12-24
to Fanks(凡可) 提示我"行集合不能做标签"呀
回复
Fanks 2003-12-24
把ADODC1.RECORDSOURCE=STR2去掉
回复
dong12 2003-12-24
to mmcgzs(毛毛虫) 不对呀
回复
mmcgzs 2003-12-24
SET DATAGRID1.DATASOURCE=recdset
回复
jone999 2003-12-24
Dim Conn As ADODB.Connection
DIM RECDSET AS NEW ADODB.RECORDSET
DIM STR1 AS STRING
DIM STR2 AS STRING
set conn=new adodb.connection
set recdset=new adodb.recordset
STR1="DSN=ORACLEQQQ;UID=OOO;PWD=90"
STR2="SELECT * FROM AAA"
conn.OPEN STR1
RECDSET.OPRN STR2, Conn, adOpenKeyset, adLockBatchOptimistic
Set DataGrid1.DataSource = RECDSET
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7450

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告