只要楼上这两句肯定也不行dim cn as adodb.connection dim rs as adodb.recordset set cn=new adodb.connection cn.open "provider=Microsoft oledb;user=sd;passwd=sf;database=fjhfshjf;" '(引号里的字符串要写对) set rs=new adodb.recordset rs.open "select * from table",cn datagrid1.datasource=rs
set datagrid1.datasource=rs
先要有一个具体的RS,才能给DATASOURCE呀,你一定义马上给它,当然错了。
TO cloudred(红云): 我在网吧,代码还没试,不过还是先把分给你吧,不对你得把分还给我。 TO icbcnbxs(我来灌水) :你说得有道理,先谢了。
TO cloudred(红云):哎呀!分给不出。以前我打开的我提问的页面在给分的地方是文本框,可这次不是。不知为什么?
to cloudred: 你的代码不行呀,还是会出现老问题。(我联接的是ACCESS表) 代码如下: dim conn as adodb.connection dim rs as adodb.recordset set conn=new adodb.connection set rs=new adodb.recordset conn.open "provider=microsoft.jet.oledb.4.0;data source=c:\my documents\123.mdb;" rs.open "select * from 111",conn datagrid1.datasource=rs
dim rs as adodb.recordset
set cn=new adodb.connection
cn.open "provider=Microsoft oledb;user=sd;passwd=sf;database=fjhfshjf;" '(引号里的字符串要写对)
set rs=new adodb.recordset
rs.open "select * from table",cn
datagrid1.datasource=rs
TO icbcnbxs(我来灌水) :你说得有道理,先谢了。
你的代码不行呀,还是会出现老问题。(我联接的是ACCESS表)
代码如下:
dim conn as adodb.connection
dim rs as adodb.recordset
set conn=new adodb.connection
set rs=new adodb.recordset
conn.open "provider=microsoft.jet.oledb.4.0;data source=c:\my documents\123.mdb;"
rs.open "select * from 111",conn
datagrid1.datasource=rs