📄 qtzl_zlxg_2.asp

📁 asp+Access开发的客户资源管理系统,用户名:admin,密码:

💻 ASP

字号:

<%
const adopenkeyset=1
const adlockoptimistic=3

set conn=server.createobject("adodb.connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")
set rs=server.createobject("adodb.recordset")
rs.open "talk",conn,adopenkeyset,adlockoptimistic

rs("name").value=request.form("worker")
rs("sex").value=request.form("guester")
rs("birthday").value=request.form("firsttime") 
rs("nation").value=request.form("nexttime")

rs("card").value=request.form("firstaddress")
rs("degree").value=request.form("nextaddress")
rs("special").value=request.form("qiatan") 
rs("school").value=request.form("program")

rs("funcion").value=request.form("demo")

rs.update
rs.close
set conn=nothing
set rs=nothing
%>

<html><script language="JavaScript">                                                                  </script></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -