最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
精简asp数据库连接程序
时间：2022-07-02 23:01:27 编辑：袖梨 来源：一聚教程网
'option explicit
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="bbhtgl/%^&$%/#.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
数据库教程连接代码
set rs_2=server.CreateObject("adodb.recordset")
rs_2.open "select * from system",conn,1,1
if not rs_2.eof then
banquan=rs_2("banquan")
beian=rs_2("beian")
zzywz=rs_2("zzywz")
kfqq=rs_2("qq")
kfemail=rs_2("email")
kftel=rs_2("tel")
kfdpdz=rs_2("dpdz")
kfww=rs_2("ww")
shuchu=rs_2("shuchu")
fang=rs_2("fang")
end if
rs_2.close
set rs_2=nothing
%>
HomeUrl=url
Session("HomeUrl")=HomeUrl %>
相关文章
- poipiku网站如何打开-poipiku官网网页版访问入口 01-06
- uc网盘网页版官方入口-UC网盘网页版快捷登录 01-06
- 全免费影视软件哪个最好用-全免费电视电影软件推荐 01-06
- 悟空浏览器怎样直接打开网页-悟空浏览器一键直达网页技巧分享 01-06
- 谷歌google官方入口-Google官方网站入口 01-06
- 漫画天堂最新版本下载入口-漫画天堂官方正版下载入口汇总 01-06