ellva 发表于 2006-8-31 12:40:17

ASP中如何与ACESS建立连接

ASP中与数据库相连除了要建一个数据库外,还需要什么做什么工作呢。
下面这是个与数据库相连的一段,不知道是哪有问题,就是不可以成功与数据库相连,请高手指点一下。

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head><title>同学录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body background=1-1.jpg>
<p align="center"><font face=华文仿宋 size=6>同学录</font><br>
<a href="add.htm">添加</a>
<a href="del.asp">删除</a>
<%
   Set Conn=Server.CreateObject("ADODB.Connection")
       Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&
       "Data Source="& Server.MapPath("classmate.mdb")
       Conn.Open
       Set RS=Server.CreateObject("ADODB.Recordest")
       sql="select * from classmate"
       rs.open sql,conn,1,1
       if rs.EOF or rs.BOF then
       Response.Write"<hr>数据库中暂无资料!"
       else
       do while not rs.EOF or rs.BOF
%>
<table border=1 align=center bordercolor=#0099cc cellspacing=0
cellpadding=4>
<tr><td width=220 align=center><FONT face=录书 size=4>
   <STRONG><%=rs("姓名")%></STRONG></td>
   <td align=center width=40><%rs=("性别")%></td>
       <td width=260>生日:<%rs=("出生日期")%></td>
<tr><td colspan=2>所在单位<%=rs("单位")%></td>
   <td>联系电话:<%rs=("电话")%></td>
<tr><td colspan=2>手机号:<%=rs("手机")%></td>
   <td>电子邮箱:<%=rs("Email")%></td>
<tr><td colspan=3>家庭住址:<%=rs("住址")%></td></tr>
<%
rs.movenext
loop
end if
set rs=nothing
set conn=nothing
%>
</table>
</body>
</html>

nobel 发表于 2006-8-31 13:10:11

Set Conn=Server.CreateObject("ADODB.Connection")
         Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&
         "Data Source="& Server.MapPath("classmate.mdb")
红色字体就是连接数据库的代码

ellva 发表于 2006-8-31 15:09:21

问题是在实际运行中,上面的那一页不能正常显示,不知道问题出在哪
其实,其它几个页面中,似乎有数据库那段代码的,都不能正常显示

nobel 发表于 2006-8-31 19:08:18

那可能是数据库连接错误,你数据库路径是怎样的

ellva 发表于 2006-8-31 22:00:06

网页和数据库都放在一个文件夹中,路径应该没有问题。

nobel 发表于 2006-8-31 22:14:24

数据库里的表是你自己建的吗/

ellva 发表于 2006-8-31 22:15:29

是的
先建了一数据库,在其中又建了一表

nobel 发表于 2006-8-31 22:20:03

表的内容是如何?发上来看看
现在怎么开始学做网页了?

ellva 发表于 2006-8-31 22:26:18

不能上传附件
大概是这样的。

classmate:
namesexborndatephonepolicy   addresscompanyEmail


以前只会静态的,想提高一下能力。

这是另一页的代码,也放上来吧:
<%
   name1=request("text1")
   sex=request("sell")
   borndate=request("text2")
   phone=request("text3")
   policy=request("text4")
   address=request("text5")
   company=request("text6")
   Email=request("text7")
   Set Conn=Server.CreateObject("ADODB.Connection")
   Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&
   "Data Source="& Server.MapPath("classmate.mdb")
   Conn.Open
   set rs=server.createobject("adodb.recordset")
   set rs1=server.createobject("adodb.recordset")
   sql="select * from classmate where 姓名='"& name1"'"
   rs.Open sql,conn,1,1
   if rs.EOF or rs.bof then
      rs1.Open"classmate",conn,1,2
          rs1.addnew array("姓名","性别","出生日期","电话","手机","住址","单位","Email"),
          array(name1,sex,borndate,phone,policy,address,company,Email)
%>
<script language="vbscript">
alert("信息添加成功!!!")
window.location.href="index.asp"
</script>
<%
rs1.close
set rs1=nothing
else
%>
<script language="vbscript">
alert("此同学以添加!")
history.back
</script>
<%
end if
rs.Close
set rs=nothing
%>

[ 本帖最后由 ellva 于 2006-9-4 17:31 编辑 ]

nobel 发表于 2006-8-31 22:42:21

代码都是你自己写的吧,那建表时内容是怎样的?有没有参照教材
上传数据库给我看看
页: [1] 2
查看完整版本: ASP中如何与ACESS建立连接