为什么这样做不能改到数据里面的值那?

a19891030 2008-11-21 11:37:29

<%dbdns="../../"%>

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

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

<%if request("action")="save" then

'--------------------取数据-----------------------------

zt=request("zt")

'--------------------存数据-----------------------------

set rs=Server.CreateObject("Adodb.Recordset")

sql="select * from es_smsmt where id="&request("id")

rs.open sql,conn,1,4

rs("es_zt")=zt

rs.update

rs.close

set rs=nothing

response.write"<script>parent.mm.rows='0,10,*';</script>"

response.write"<script>parent.main.document.location.reload();</script>"

end if

%>

<%=citycss%>

<body style="margin:5">

<%set rs=Server.CreateObject("Adodb.Recordset")

sql="select * from es_smsmt where id="&request("id")

rs.open sql,conn,1,1

zt=rs("es_zt")%>

<table width="500" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">

<form name="form1" method="post" action="sent.asp">

<input name="id" type="hidden" value="<%=request("id")%>">

<input name="action" type="hidden" value="save">

<%

if rs("es_id")=0 then

user="系统平台"

else

set rs1=server.createobject("adodb.recordset")

sql1="select * from es_smsuser where es_id="&rs("es_id")

rs1.open sql1,conn,1,1

user=rs1("es_user")

rs1.close

end if%>

<tr><td height=105 colspan="4"> 内容:<%=rs("es_msg")%><p> 时间:<%=rs("es_date")%><p> 用户:<%=user%></td>

</tr>

<tr>

    <td height=22 width=324 colspan="2"><input type="radio" name="zt" value="0" style="border:0"<%if zt=0 then%> checked<%end if%>>一</td>

    <td height=22 width=324 colspan="2"><input type="radio" name="zt" value="1" style="border:0"<%if zt=1 then%> checked<%end if%>>二</td>

</tr>

<tr>

    <td height=22 width=324 colspan="2"><input type="radio" name="zt" value="2" style="border:0"<%if zt=2 then%> checked<%end if%>>三</td>

    <td height=22 width=324 colspan="2"><input type="radio" name="zt" value="3" style="border:0"<%if zt=3 then%> checked<%end if%>>四</td>

</tr>

<tr>

    <td height=22 colspan="2"> </td>

    <td width=324 colspan="2"> </td>

</tr>

<tr align=center><td height=22 colspan="5"><input type="submit" name="Submit" value=" 提 交 "></td></tr>

</form>

</table>

	</td>

  </tr>

</table>

<%rs.close

set rs=nothing%>

我这样写为什么不能更改数据库ZT里面的值那!

...全文

26 点赞收藏 6

写回复

6 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

飞扬残月 2008-11-22

直接conn.execute("update table set a="&a&" where id="&id)

回复赞

virgo2008 2008-11-21

你就改个数值就可以了，这些你都很好改的！

回复赞

a19891030 2008-11-21

[Quote=引用 3 楼 zhuyongzhao 的回复:]
rs.open sql,conn,1,4
改成rs.open sql,conn,1,3

RS.OPEN SQL,CONN,A,B

A:

ADOPENFORWARDONLY(=0)
只读,且当前数据记录只能向下移动

ADOPENKEYSET(=1)
只读,当前数据记录可自由移动

ADOPENDYNAMIC(=2)
可读写,当前数据记录可自由移动

ADOPENSTATIC(=3)
可读写,当前数据记录可自由移动,可看到新增记录

B:

ADLOCKREADONLY(=1)
缺省锁定类型，记录集是只读的，不能修改记录

ADLO…
[/Quote]

能帮我改一下吗?

回复赞

zhuyongzhao 2008-11-21

rs.open sql,conn,1,4
改成rs.open sql,conn,1,3

RS.OPEN SQL,CONN,A,B

A:

ADOPENFORWARDONLY(=0)
只读,且当前数据记录只能向下移动

ADOPENKEYSET(=1)
只读,当前数据记录可自由移动

ADOPENDYNAMIC(=2)
可读写,当前数据记录可自由移动

ADOPENSTATIC(=3)
可读写,当前数据记录可自由移动,可看到新增记录

B:

ADLOCKREADONLY(=1)
缺省锁定类型，记录集是只读的，不能修改记录

ADLOCKPESSIMISTIC(=2)
悲观锁定，当修改记录时，数据提供者将尝试锁定记录以确保成功地编辑记录。只要编辑一开始，则立即锁住记录。

ADLOCKOPTIMISTIC(=3)
乐观锁定，直到用Update方法提交更新记录时才锁定记录。

ADLOCKBATCHOPTIMISTIC(=4)
批量乐观锁定，允许修改多个记录，只有调用UpdateBatch方法后才锁定记录。

当不需要改动任何记录时，应该使用只读的记录集，这样提供者不用做任何检测。
对于一般的使用，乐观的锁定可能是最好的选择，因为记录只被锁定一小段时间，
数据在这段时间被更新。这减少了资源的使用。

回复赞