conn.asp
来自「能进行网上购物的需求」· ASP 代码 · 共 33 行
ASP
33 行
<%@ LANGUAGE = VBScript.Encode %>
<%
dim conn
dim connstr
dim db
db="../database/#56770shopv23lan.asp"
Set Conn=Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动,请用下面连接方法'
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
%>
<SCRIPT LANGUAGE=JAVASCRIPT>
<!--
function checkclick(msg)
{
if(confirm(msg))
{
event.returnValue=true;
}
else
{
event.returnValue=false;
}
}
-->
</SCRIPT>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=css.css rel=STYLESHEET type=text/css>
</head>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?