复制代码代码如下所示：
连接

变量conn =新的ActiveX对象（数据连接）；
康涅狄格州开放（供应商= SQLOLEDB。1；数据源=β；用户ID = SA；
+ 密码=莎莎；初始目录= mybulletin ）；
VaR RS =新的ActiveX对象（ADODB。记录集）；
选择id，从类别；
Rs.open（SQL，Conn）；
警报（RS（0））；
Rs. Close（）；
RS = null；
Conn.close（）；
conn = null；


复制代码代码如下所示：
访问连接

功能连接（）{
无功db_bbs
db_bbs =dd.mdb / /定义数据库
变量conn =新的ActiveX对象（数据连接）；
康涅狄格州开放（商=微软。飞机。OLEDB数据源。4；=+ db_bbs + ）；

VaR RS =新的ActiveX对象（ADODB。记录集）；
从作者中选择名称；数据库作者表，name字段
Rs.open（SQL，Conn）；
警报（RS（0））/第一个出来

Conn.close（）；
conn = null；
}