Question

ASP高手请进 一个关于ASP修改ACCESS数据库内容的问题

大家帮帮忙 小弟是新手

目前 连接数据库 添加等 都 弄的"几乎"明白了

就差一个 实现 对数据库 原有数据 !!!修改!!! 的了
预先多谢大家帮忙

我的添加代码如下: 请各位帮忙改改
------------

<!--#include file="conn.asp" -->

<%
whatxm=request.form("xm") <------- xm = 姓名
whatfs=request.form("fs") <------- fs = 分数
%>

<%
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "Select * from pub"
rs.Open sql,conn,3,2
%>

<%
rs.addnew
rs("xm")=whatxm
rs("fs")=whatfs
rs.update
%>
信息添加成功，<a href="showit.asp">浏览</a>
<%
rs.close
Set rs = Nothing
conn.close
set conn=Nothing
%>
第1条的大侠 能把 几个句子解释下么???
最好是 详细一些 的中文解释

Dim UserName
UserName=Trim(Request("UserName"))

我是没看懂的 - -

各位老大~

我没有弄成功呢?????
---------------------
Microsoft JET Database Engine (0x80040E07)
标准表达式中数据类型不匹配。
/shiyan/Modify.asp
---------------------
错误类型：
ADODB.Recordset (0x800A0CB3)
当前记录集不支持更新。这可能是提供程序的限制，也可能是选定锁定类型的限制。
-----------------------------

我的意思是将 输入文本框中的内容 POST 传递到 Modify.asp然后进行操作

劳驾 把 HTML 和 ASP 的 2个 文件的源代码都 给拿出来把 勤苦大家了 承诺 对 最佳回答 + 20 分~

多谢 偶在线等待~!~!

Answer 1

首先定义一个参数UserName 获取某记录的用户名
下面简单看一下用Modify.asp修改evensky的分数 ：）
<a href="Modify.asp?UserName=evensky">修改</a>

Modify.asp 代码
<%
Dim UserName
UserName=Trim(Request("UserName"))

'……省略Conn连接
Dim Rs,Sql
Set Rs=Server.CreateObject("adodb.recordset")
Sql="select * from [pub] where xm="&UserName
Rs.Open Sql,conn,1,3
if Not(Rs.eof or Rs.bof) then
Rs("fs")="新的分数" '这里可以用变量代替
Rs.update
else
Response.write"用户不存在"
end if
Set Rs=nothing
Conn.close
set Conn=nothing
%>

Answer 2

<%
Dim UserName'变量申明
UserName=Trim(Request("UserName")) 'Trim去除Request("UserName")俩边的空字符

'……省略Conn连接
Dim Rs,Sql'变量申明
Set Rs=Server.CreateObject("adodb.recordset") '创建服务器对象
Sql="select * from [pub] where xm="&UserName '查询xm=UserName的所有记录
Rs.Open Sql,conn,1,3 '打开数据库
if Not(Rs.eof or Rs.bof) then '如果存在记录则...
Rs("fs")="新的分数" '这里可以用变量代替 '更新字段fs
Rs.update'进行更新
else '否则
Response.write"用户不存在" '浏览器输出“用户不存在”
end if 'if语句结束
Set Rs=nothing '清空rs
Conn.close '关闭数据库
set Conn=nothing '清空Conn
':)
%>