求助,为什么这个更新不了
pd 这个值可以取到。但是为什么写入不了到数据库。password 这个值,备注的格式<input name="Action" type="hidden" value="Del"><input name="chkAll" type="checkbox"
id="chkAll" onClick=CheckAll(this.form) value="checkbox" style="border:0"></td>
<td colspan="6" bgcolor="f7f7f7"><font color=red>移动到:</font>
<select id="ytype" name="ytype">
<%call Admin_ShowClass_Option()%>
</select>
<input type="submit" value="移动" name="Del" id="Del">
<input name="pd" type="text" size="10" id="pd">
<input type="submit" value="批量改密" name="Del" id="Del">
ID=Trim(Request("ID"))
ytype=Request("ytype")
pd=trim(request.form("pd"))
If ID="" Then
Response.Write("<script language=javascript>alert('请选择文章!');history.back(1);</script>")
Response.End
ElseIf Request("Del")="移动" Then
If ytype="" then
Response.Write("<script language=javascript>alert('请选择类别!');history.back(1);</script>")
Response.End
End if
set rs=conn.execute("update pcook_Article set ClassID = "&ytype&" where ID In(" & ID & ")")
Response.Write("<script>alert(""操作成功!"");history.back(1);</script>")
ElseIf Request("Del")="批量改密" Then
If pd="" then
Response.Write("<script language=javascript>alert('你忘记密码');history.back(1);</script>")
Response.End
End if
set rs=conn.execute("update pcook_Article set PassWord = "&pd&" where ID In(" & ID & ")")
Response.Write("<script>alert(""操作成功!"");history.back(1);</script>")
PassWord 这个字段是备注
移动的时候可以把分类移动到其他栏目,加密就更新不了。点了更新后。
没有点批量改密前是这样的
就没有反应,出现这样的界面
有没有帮忙解答一下。非常感谢
[[it] 本帖最后由 bichaoguo 于 2008-9-23 09:20 编辑 [/it]]
1.gif
(4.14 KB)
2.gif
(824 Bytes)