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 + -
显示快捷键?