asp操作数据库access

最初领导分配任务是使用vb连接数据库,后来因为本人不了解vb,又使用js

vb,js作为客户端语言,只能在本地运行。无法再服务器上运行

原因是本地连接数据库地址可以使用相对或者绝对路径,而放在数据库是是无法通过本地获取服务器文件的地址!

本人在网上查阅各大论坛和贴吧,找到server对象方法MapPath可以获取文件路径

经小编测试server获取路径,提示报错信息server对象未定义!改成asp代码后,运行正常!

获取数据库连接

<%
Set conn = Server.CreateObject("ADODB.Connection")    //获取服务驱动
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("#abc.mdb")   //设置连接数据库为access驱动,   指定数据库文件 
set rs=Server.CreateObject("ADODB.recordset")   //创建服务返回对象

%>

添加数据

<%
user=request.form("po.loginname")
pwd=request.form("password")

sql="select * from [user] where user=‘"+user+"‘ and pwd = ‘"+pwd+"‘"
rs.open sql,conn,1,1

%>

更新数据

<%

user=request.form("user")
pwd=request.form("pwd")

sql="select * from [user] where user=‘"+user+"‘"
rs.open sql,conn,1,3
if rs.recordcount>0 Then
response.write ("<script>alert(‘用户已注册,请登录!‘);javascript:window.location.href=‘login.asp‘</script>")
response.End()
end if
rs.addnew
rs("user")=user
rs("pwd")=pwd

rs.update
response.write ("<script>alert(‘注册成功!);javascript:window.location.href=‘login.asp‘</script>")
response.End()
rs.close
conn.close
%>

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。