• 首页
• 服务器租用
• 企业邮箱
• 虚拟主机
• 网站程序
• 营销推广
• 网站建设
• 域名注册
• 前端开发
• 网站备案

• 当前位置：创新互联 >> 常见问题 >> 虚拟主机 >> 数据库 >> ASP链接数据库

ASP链接数据库

• 作者：创新互联 文章来源：虚拟主机部 点击数： 更新时间：2012-03-11
• 　　数据库连接：
  　　以下为引用的内容：
  <%
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  %>
  　　打开数据库：
  　　以下为引用的内容：
  exec="select * from 数据库表"
  set rs=server.createobject("adodb.recordset")
  rs.open exec,conn,1,1
  　　参数1，1为读取
  　　读取内容格式：<%=rs("字段")%>
  　　添加记录处理程序：
  　　以下为引用的内容：
  <%
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  name=request.form("字段") name,tel,message为提交表单所设置的字段值
  tel=request.form("字段")
  message=request.form("字段")
  exec="insert into 表名(字段)values('"+字段+"')" 多个用逗号隔开
  conn.execute exec 使用execute提交
  conn.close
  set conn=nothing
  %>
  　　搜索处理程序：
  　　以下为引用的内容：
  <%
  name=request.form("字段") name,tel为提交表单所设置的字段值
  tel=request.form("字段")
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  exec="select * from 表 where name='"+字段+"' and tel="+字段
  set rs=server.createobject("adodb.recordset")
  rs.open exec,conn,1,1
  %>
  '页面搜索到的内容导出来
  <%
  do while not rs.eof
  %><tr>
  <td><%=rs("name")%></td>
  <td><%=rs("tel")%></td>
  <td><%=rs("time")%></td>
  </tr>
  <%
  rs.movenext
  loop
  %>
  　　删除记录处理程序:
  　　以下为引用的内容：
  <%
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  exec="delete * from 表名 where 编号="&request.form("id")
  conn.execute exec
  %>
  　　修改记录处理程序:
  　　以下为引用的内容：
  <%
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  exec="select * from 表名 where 编号="&request.form("id")
  set rs=server.createobject("adodb.recordset")
  rs.open exec,conn,1,3 '1,3为修改意思
  rs("name")=request.form("字段") 'name,tel,message为提交表单所设置的字段值
  rs("tel")=request.form("字段")
  rs("message")=request.form("字段")
  rs.update
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing
  %>
  　　修改记录执行程序:输入ID号页面>>>导出相对应ID数据>>>>>>直接修改的处理程序
  　　后台登陆处理程序例子：
  　　以下为引用的内容：
  <%
  dim name,password
  name=request.form("name")
  password=request.form("password")
  dim exec,conn,rs
  exec="select *from 表名 where(name='"&字段&"' and password='"&字段&"')"
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")
  set rs=server.createobject("adodb.recordset")
  rs.open exec,conn
  if not rs.eof then
  rs.Close
  conn.Close
  session("checked")="yes"
  session("check")="right"
  response.Redirect "index.asp"
  else
  session("checked")="no"
  session("check")="wrong"
  response.Redirect "login.asp"
  end if
  %>
  每个后台页面加上:
  <%if not session("checked")="yes" then 'session里面定义一个checked字符串变量
  response.Redirect "login.asp"
  else
  %>
• PostgreSQL客户端处理事务功能详解 :上一篇
  MySQL全文搜索之布尔搜索 :下一篇