| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 642 人关注过本帖
标题:没有修改直接提示修改成功的错误在哪里?
取消只看楼主 加入收藏
kgdipbyve
Rank: 2
等 级:论坛游民
帖 子:346
专家分:35
注 册:2008-5-4
结帖率:92.31%
收藏
 问题点数:0 回复次数:0 
没有修改直接提示修改成功的错误在哪里?
<!--#include file="inc/conn.asp"-->
    <%
url=request("url")
    web=request("web")
    contnet=request("contnet")
    title=request("title")
set rsl=server.CreateObject("adodb.recordset")
    sql="select * from products"
    rsl.Open sql,conn,3,3
    rsl("url")=url
    rsl("web")=web
    rsl("contnet")=contnet
    rsl("title")=title
    if request("sf")="yes " then
    rsl("sf")=true
    else
    rsl("sf")=false
    end if
    rsl.update
     if rsl.state=1 then
    rsl.close
    set rsl=nothing
  end if
    response.Write("<Script>alert('修改成功');window.location='Job_manages.asp'</Script>")
    response.End()
    %>
<style type="text/css">
<!--
body {
    background-color: #d6dff7;
}
-->
</style>
<% id=request("id")
set rs=server.CreateObject("adodb.recordset")
sql="select * from products where id ="&id
rs.open sql,conn,3,3
%><table width="650" height="363" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#e4e4e4">
    <tr>
      <td height="24" align="center" valign="middle" bgcolor="658ad8" class="tetle_top2">产品添加</td>
    </tr>
    <tr>
      <td width="100%" height="142">
        <form name="formname" id="formname" method="POST" action="?on=yes" onClick="return checkForm();">
          <div align="center">
            <table width="100%" height="266" border="0" cellpadding="2" cellspacing="1" bgcolor="#e4e4e4">
              <tr bgcolor="e4edf9">
                <td width="11%" height="23" align="center">标题</td>
                <td height="23">
                  <input type="text" name="title" size="50"  value="<%=rs("title")%>">
                *<font color="#FF0000">标题可必须填写呀!</font>                &nbsp; </td>
              </tr>
              <tr bgcolor="e4edf9">
                <td width="11%" height="21" align="center">图片</td>
                <td height="21">
<input type="text" name="url"  value="<%=rs("url")%>"><iframe src="upinc.asp?n=url&x=0" height="30" width="100%" frameborder="0"></iframe></td>
              </tr>
          <tr bgcolor="e4edf9">
          <tD><div align="center">网址</div></tD>
          <td><input name="web" type="text" id="web" value="<%=rs("web")%>" sysle="border-style:solid; border-width:1 " size="30"></td>
          </tr>
              <tr bgcolor="#FFFFFF">
                <td width="11%" height="90" align="center" bgcolor="e4edf9">内容</td>
                <td height="90" bgcolor="e4edf9"><textarea name="contnet" cols="50"  rows="15" ><%=rs("contnet")%></textarea>
                </td>
              </tr>
              <tr bgcolor="#FFFFFF">
                <td height="29" align="center" bgcolor="e4edf9">是否显示</td>
<td height="29" align="left" bgcolor="e4edf9">
<input name="sf" type="checkbox" value="yes" checked>
                </td>
              </tr>
              <tr bgcolor="e4edf9"><INPUT TYPE="hidden" name="add" value="yes">
                <td height="29" colspan="2" align="center">
                  <input type="submit" value="修改内容" name="submit">
                  &nbsp;
                  <input type="button" name="Submit" onclick=history.go(-1) value="返回">
                </td>
              </tr>
            </table>
          </div>
        </form>
      </td>
    </tr>
</table>

<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
搜索更多相关主题的帖子: 提示 
2008-08-13 11:25
快速回复:没有修改直接提示修改成功的错误在哪里?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021600 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved