dim con as new connection
dim rs as new recordset
con.connectring ="provider =sqloledb;data source =sall;user id= sa; password =yourpassword"
con.open
rs.open "select * from sada",con,3,2
set dbgrid1.datasource=rs
有些地方你要自己修改一下。比如密码,表名。添加一个datagrid控件,名字为dbgrid1
dim rs as new recordset
con.connectring ="provider =sqloledb;data source =sall;user id= sa; password =yourpassword"
con.open
rs.open "select * from sada",con,3,2
set dbgrid1.datasource=rs
有些地方你要自己修改一下。比如密码,表名。添加一个datagrid控件,名字为dbgrid1
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货