khzl_zltj_ok_1_1.asp

来自「asp+Access开发的客户资源管理系统,用户名:admin,密码:」· ASP 代码 · 共 45 行

ASP

45 行

<%
' 将数据中的单引号改成两个单引号，并且在前后加上单引号
Function SqlStr( data )
   SqlStr = "'" & Replace( data, "'", "''" ) & "'"
End Function


'与数据库*.mdb建立连接
Set conn = Server.CreateObject("ADODB.Connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")
    


		               sql = "Insert Into company (index,easyname,comtel,comfax,comman,address,post,road,http,fanwei,email,state,xiaoshou,allname,bank,bankid,tax,site,demo) Values( "
		               sql = sql & SqlStr(request("index")) & ", "
		               sql = sql & SqlStr(request("easyname")) & ", "
					   sql = sql & SqlStr(request("comtel")) & ", "
		               sql = sql & SqlStr(request("comfax")) & ", "
		               sql = sql & SqlStr(request("comman")) & ", "
		               sql = sql & SqlStr(request("address")) & ", "
		               sql = sql & SqlStr(request("post")) & ", "
		               sql = sql & SqlStr(request("road")) & ", "

		               sql = sql & SqlStr(request("http")) & ", "
		               sql = sql & SqlStr(request("fanwei")) & ", "
					   sql = sql & SqlStr(request("email")) & ", "
		               sql = sql & SqlStr(request("state")) & ", "
		               sql = sql & SqlStr(request("xiaoshou")) & ", "
		               sql = sql & SqlStr(request("allname")) & ", "
		               sql = sql & SqlStr(request("bank")) & ", "
		               sql = sql & SqlStr(request("bankid")) & ", "
		               sql = sql & SqlStr(request("tax")) & ", "
		               sql = sql & SqlStr(request("site")) & ", "
		               sql = sql & SqlStr(request("demo")) & ")"
					   '发送sql指令，加入信息
	                	conn.Execute sql


'=关闭数据库============================
conn.close'关闭数据库
set conn=nothing
response.redirect "khzl_zltj_ok_2.asp"
%>

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

khzl_zltj_ok_1_1.asp - 源码说明

本页面展示了「asp+Access开发的客户资源管理系统,用户名:admin,密码:」中的 khzl_zltj_ok_1_1.asp 源码文件，采用 ASP 编程语言编写，共 45 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与CRM系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?