conn.asp

来自「个性网名转换-繁体字转换-qq强制聊天-qq秀查看-空间留言代码编辑器-等其他常」· ASP 代码 · 共 16 行

<!-- #include file="config.asp"-->
<%
'字符串连接数据库方法
set conn=Server.CreateObject("ADODB.Connection")
conn.open "DRIVER=Driver do Microsoft Access (*.mdb);UID=admin;PWD=;DBQ="&Server.MapPath(mdbpath)
set rs12=Server.CreateObject("ADODB.RecordSet")
sql="select * from admin"
rs12.open sql,conn,1,1
sitetitle=rs12("sitetitle")
sitemeta=rs12("sitemeta")
sitekey=rs12("sitekey")
sitehead=rs12("sitehead")
sitefoot=rs12("sitefoot")
rs12.close
set rs12=nothing
%>