东陆风华BBS

 找回密码
 注册东陆风华通行证
东陆风华论坛18周年庆(2005.3.28-2023.3.28)东陆风华-云南大学各专业历年考研复试信息汇总帖送人玫瑰手留余香-云南大学历年考研复试信息汇总
东陆风华-云南大学各学院考研QQ群号码
申请东陆风华实名认证免费领取云大考研考博真题如何申请云南大学考研论坛VIP会员?VIP特权?
东陆风华-云南大学各省校友&云南省各地州校友QQ群云南大学呈贡校区图片 &宿舍图片&图片云大 东陆风华送人玫瑰手留余香-云南大学2021年考研复试信息分享
12下一页
返回列表 发新帖
查看: 5517|回复: 12

ASP中如何与ACESS建立连接

[复制链接]

该用户从未签到

发表于 2006-8-31 12:40:17 | 显示全部楼层 |阅读模式

东陆风华帐号全站通用,包括论坛、商城、网络家园等站点,登陆查看更精彩内容

您需要 登录 才可以下载或查看,没有帐号?注册东陆风华通行证

x
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>
东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html
云南大学2016年考研复试信息分享
  • TA的每日心情
    无聊
    2021-2-26 01:51
  • 签到天数: 104 天

    连续签到: 1 天

    [LV.6]常住居民II

    发表于 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")
    红色字体就是连接数据库的代码
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html

    该用户从未签到

     楼主| 发表于 2006-8-31 15:09:21 | 显示全部楼层
    问题是在实际运行中,上面的那一页不能正常显示,不知道问题出在哪
    其实,其它几个页面中,似乎有数据库那段代码的,都不能正常显示
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html
  • TA的每日心情
    无聊
    2021-2-26 01:51
  • 签到天数: 104 天

    连续签到: 1 天

    [LV.6]常住居民II

    发表于 2006-8-31 19:08:18 | 显示全部楼层
    那可能是数据库连接错误,你数据库路径是怎样的
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html

    该用户从未签到

     楼主| 发表于 2006-8-31 22:00:06 | 显示全部楼层
    网页和数据库都放在一个文件夹中,路径应该没有问题。
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html
  • TA的每日心情
    无聊
    2021-2-26 01:51
  • 签到天数: 104 天

    连续签到: 1 天

    [LV.6]常住居民II

    发表于 2006-8-31 22:14:24 | 显示全部楼层
    数据库里的表是你自己建的吗/
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html

    该用户从未签到

     楼主| 发表于 2006-8-31 22:15:29 | 显示全部楼层
    是的
    先建了一数据库,在其中又建了一表
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html
  • TA的每日心情
    无聊
    2021-2-26 01:51
  • 签到天数: 104 天

    连续签到: 1 天

    [LV.6]常住居民II

    发表于 2006-8-31 22:20:03 | 显示全部楼层
    表的内容是如何?发上来看看
    现在怎么开始学做网页了?
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html

    该用户从未签到

     楼主| 发表于 2006-8-31 22:26:18 | 显示全部楼层
    不能上传附件
    大概是这样的。

    classmate:
    name  sex  borndate  phone  policy   address  company  Email


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

    这是另一页的代码,也放上来吧:
    <%
       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 编辑 ]
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html
  • TA的每日心情
    无聊
    2021-2-26 01:51
  • 签到天数: 104 天

    连续签到: 1 天

    [LV.6]常住居民II

    发表于 2006-8-31 22:42:21 | 显示全部楼层
    代码都是你自己写的吧,那建表时内容是怎样的?有没有参照教材
    上传数据库给我看看
    东陆风华APP客户端 http://bbs.ynutx.net/appbyme_app-download.html

    本版积分规则

    关闭

    站长推荐上一条 /2 下一条

    QQ|小黑屋|手机版|Archiver|东陆风华,凝聚云大人的力量 ( 滇ICP备07500061号-1 )

    GMT+8, 2024-5-4 07:20 , Processed in 0.109375 second(s), 37 queries , Gzip On, Redis On.

    Powered by Discuz! X3.4

    © 2001-2017 Comsenz Inc.

    快速回复 返回顶部 返回列表