useradd2.asp

来自「这是一个基于WEB的树木分类专家系统asp源代码,对于初学者特别有帮助!」· ASP 代码 · 共 32 行

ASP
32
字号
<%@language=vbscript%>
 
 <% dim conn,rs,sql,constr
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("tree.mdb")
    set rs= server.createobject("adodb.recordset") 
 username = request.form("username")
 password = request.form("password")
 qq=request.form("qq")
 Email=request.form("Email")

sql = "insert into 用户信息表 (username,password,qq,Email) values ('" & username&"','"&password& "','"&qq&"','"&Email&"')"
on error resume next
  conn.Execute sql
  if err<>0 then
    response.write("No insert permissions!")
  else 
    response.write("新用户" & username & " was add!")
  end if 

%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?