佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 1129|回复: 14

asp 的问题

[复制链接]
发表于 20-5-2009 08:24 PM | 显示全部楼层 |阅读模式
html的coding
<html>
<head>
<title>Guestbook Form</title>
</head>
<body bgcolor="white" text="black">
<!-- Begin form code -->
<form name="form" method="post" action="add_to_guestbook.asp">
  Name: <input type="text" name="name" maxlength="20">  
  <br>
  Comments: <input type="text" name="comments" maxlength="60">
  <input type="submit" name="Submit" value="Submit">
</form>
<!-- End form code -->
</body>
</html>

[ 本帖最后由 geminiliow88 于 20-5-2009 08:37 PM 编辑 ]
回复

使用道具 举报


ADVERTISEMENT

 楼主| 发表于 20-5-2009 09:13 PM | 显示全部楼层
'asp coding...........save as file name "add_to_guestbook.asp"..............
<%
Dim adoCon
Dim rsAddComments
Dim strSQL

Set adoCon = Server.CreateObject("ADODB.Connection")

adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("guestbook.mdb")

Set rsAddComments = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT tblComments.Name, tblComments.Comments FROM tblComments;"

rsAddComments.CursorType = 2

rsAddComments.LockType = 3

rsAddComments.Open strSQL, adoCon

rsAddComments.AddNew

rsAddComments.Fields("Name") = Request.Form("name")
rsAddComments.Fields("Comments") = Request.Form("comments")

rsAddComments.Update

rsAddComments.Close
Set rsAddComments = Nothing
Set adoCon = Nothing

Response.Redirect "guestbook.asp"
%>
回复

使用道具 举报

发表于 20-5-2009 09:19 PM | 显示全部楼层
你到底是在拿资料, 还是在ADD/更新资料?
回复

使用道具 举报

 楼主| 发表于 20-5-2009 09:22 PM | 显示全部楼层
asp coding.........save as file "guestbook.asp"..................
<%
Dim adoCon
Dim rsGuestbook
Dim strSQL                       

Set adoCon = Server.CreateObject("ADODB.Connection")

adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("guestbook.mdb")


Set rsGuestbook = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT tblComments.Name, tblComments.Comments FROM tblComments;"

rsGuestbook.Open strSQL, adoCon

Do While not rsGuestbook.EOF
       
        Response.Write ("<br>")
        Response.Write (rsGuestbook("Name"))
        Response.Write ("<br>")
        Response.Write (rsGuestbook("Comments"))
        Response.Write ("<br>")

        rsGuestbook.MoveNext

Loop

rsGuestbook.Close
Set rsGuestbook = Nothing
Set adoCon = Nothing
%>
回复

使用道具 举报

 楼主| 发表于 20-5-2009 09:27 PM | 显示全部楼层

回复 3# jasonmun 的帖子

不好意思学校internat太慢
要add新资料去microsoft access 2003

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.
/guestbook_example/add_to_guestbook.asp, line

[ 本帖最后由 geminiliow88 于 20-5-2009 09:33 PM 编辑 ]
回复

使用道具 举报

发表于 20-5-2009 09:34 PM | 显示全部楼层
原帖由 geminiliow88 于 20-5-2009 09:27 PM 发表
不好意思学校internat太慢
要add新资料去microsoft access 2003


初学者, 就别想一步登天..
先学习如何读资料出来.
肯定没问题后, 再来想如何insert..
然后再update..
甚至delete..

去找本ebook看, 学 ASP, SQL, ADO..
还access? 也学一学mysql 吧..
回复

使用道具 举报

Follow Us
发表于 20-5-2009 09:39 PM | 显示全部楼层
原帖由 geminiliow88 于 20-5-2009 09:27 PM 发表
不好意思学校internat太慢
要add新资料去microsoft access 2003

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database  ...


http://www.pagedowntech.com/faq/faq.asp?faqid=18

如果你要成为[强]的programmer, 建议你善用 google..
学习如何处理问题/bug, 那也是重要的功课之一..
回复

使用道具 举报

 楼主| 发表于 21-5-2009 01:52 PM | 显示全部楼层

回复 7# jasonmun 的帖子

谢谢前辈指点先在可以add data了
那些ebook是免费的吗?
回复

使用道具 举报


ADVERTISEMENT

发表于 21-5-2009 05:24 PM | 显示全部楼层
原帖由 geminiliow88 于 21-5-2009 01:52 PM 发表
谢谢前辈指点先在可以add data了
那些ebook是免费的吗?


当然, 不然会有那么多人下载与寻找吗?
回复

使用道具 举报

发表于 21-5-2009 11:35 PM | 显示全部楼层
我觉得是你的permission 问题,

请参考这个link尝试设定您的permission.

http://www.webwizguide.com/kb/asp_knowledgebase/server_permissions.asp
回复

使用道具 举报

 楼主| 发表于 22-5-2009 04:32 AM | 显示全部楼层
我的在iis里6.0的 local computer-->Web Site-->Default Web Site-->guestbook_example(我的folder) right click-->properties-->Directory Security-->Edit-->然后untick Anonymous access就可以了.
但我朋友的电脑就不可以?
回复

使用道具 举报

 楼主| 发表于 22-5-2009 04:37 AM | 显示全部楼层

回复 10# zhixuen 的帖子

意思是说连directory也要sharing然后permission它?
回复

使用道具 举报

发表于 22-5-2009 12:07 PM | 显示全部楼层

回复 11# geminiliow88 的帖子

you friend PC will be the host or you just want to test by using your friend PC connecting to your PC web base application ?

If you want setup new web base application in your friend's PC as HOST . You need to reset the IIS.

The example above resolved your problem in your personal computer ?
回复

使用道具 举报

 楼主| 发表于 22-5-2009 01:09 PM | 显示全部楼层

回复 13# zhixuen 的帖子

我门都是做同样的东西用用同样的方法, 并没有link在一起.
回复

使用道具 举报

发表于 22-5-2009 09:18 PM | 显示全部楼层
那么你朋友的database permission 有设定好吗?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 11-12-2025 11:43 PM , Processed in 0.166114 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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