(1) <% dim cn,rs set cn = server.CreateObject ("ADODB.connection") cn.Open "Provider=SQLOLEDB;Server=127.0.0.1;uid=sa;pwd=;database=bookdb;autotranslate=no;" set rs = server.CreateObject ("ADODB.recordSet") dim sql sql="select * from tnews where sex='女' " rs.Open sql,cn,1 if not rs.EOF then %> 姓名：">

性别：">

<% rs.movenext end if rs.close %> (2） <% dim cn,rs set cn = server.CreateObject ("ADODB.connection") cn.Open "Provider=SQLOLEDB;Server=127.0.0.1;uid=sa;pwd=;database=bookdb;autotranslate=no;" set rs = server.CreateObject ("ADODB.recordSet") dim name,sex name = Request("name") sex = Request("sex") Response.Write name Response.Write sex %> 偶在第一个页面里把数据库里的数据调出来，然后直接在上面修改，想把修改好的的内容（比如把姓名“a”改成“b”）保存到数据库里，代码该怎么写？ 非常菜的问题，大家不要笑我哦

index.asp   将记录列表
update.asp  根据传递的参数选择记录进行更新
delete.asp  根据传递的参数选择记录并删除

[这个贴子最后由冰风在 2003/03/28 04:26pm 第 1 次编辑]

[quote][b]下面引用由[u]orphen1758[/u]在 [i]2003/03/28 02:58pm[/i] 发表的内容：[/b]
index.asp   将记录列表
update.asp  根据传递的参数选择记录进行更新
delete.asp  根据传递的参数选择记录并删除
[/quote]
偶太笨了~~~~~~还是不太明白~~~~~~~~
if not rs.EOF then
    rs.movenext
    nol=round(rnd()*10)
    new1="姓名为"&nol
    rs("name").value=new1
    rs.Update
    Response.Write("修改成：名称＝"&rs("name")&"")
    end if
rs.close
我按照一本书上说的方法写成上面这样，可是提示“rs("name").value=new1”ADODB.Field 错误 '800a0cb3'
对象或提供者不能执行所需的操作。
谁帮帮我啊

这是什么破书，乱写些什么呀

代码应该规范一下，就像老猫给你列的那样
更新呢，应该对应具体的字段
我更喜欢这样写：
conn.execute ("------ ")

[这个贴子最后由天之剑在 2003/03/28 05:05pm 第 1 次编辑] <% dim cn,rs set cn = server.CreateObject ("ADODB.connection") cn.Open "Provider=SQLOLEDB;Server=127.0.0.1;uid=sa;pwd=;database=bookdb;autotranslate=no;" cn.execute (update tnews set name="&request("")&",sex="&request("")&" where id="&request("")&" ) %>

第一，你应该传一个唯一的id值过来

＜input type="hiddlen" name=id value="<%=rs("id")%>"> 姓名：">

性别： ">

第二，你应该将
cn.execute ("update tnews set name='"&request("name")&"',sex='"&request("sex")&"' where id='"&request("id")&"' ")

[quote][b]下面引用由[u]天之剑[/u]在 [i]2003/03/28 05:16pm[/i] 发表的内容：[/b]
第二，你应该将
cn.execute ("update tnews set name='"&request("name")&"',sex='"&request("sex")&"' where id='"&request("id& ...
[/quote]
搞明白了，谢谢剑哥~~~~~~~~~~~~~

[quote][b]下面引用由[u]orphen1758[/u]在 [i]2003/03/28 02:58pm[/i] 发表的内容：[/b]
index.asp   将记录列表
update.asp  根据传递的参数选择记录进行更新
delete.asp  根据传递的参数选择记录并删除
[/quote]
谢谢猫王~~~~~~~~~~对了，还有没有添加数据的表（insert.asp）啊，我想参考一下~~~如果有的话麻烦猫王传一个上来，谢谢拉了 :em25:  :em25: