submodhf.asp

来自「网站源代码」· ASP 代码 · 共 62 行

<!--#include file="conn.asp"-->
<!--#include file="chkuser.asp"-->
<link href="css.css" rel="stylesheet" type="text/css">
<%
'sql="update fangyuan set bianhao='"&request("bianhao")&"' where id="&request("id")
'conn.execute(sql)

dim rs
dim sql
dim id
id=request("id")

set rs = server.createobject("adodb.recordset")
sql = "SELECT * from book where id="&id   
rs.open sql,conn,1,3 
if request("name")="" or request("huifu")=""  then

%>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td class="z13"><div align="center">
        <% response.Write("请把表格填写完整！") %>
        <a href="vbscript:history.back"  class="z13"><font color="#990099">返回</font></a></div></td>
  </tr>
</table>




<%
else
rs("name")=request("name")
rs("huifu")=request("huifu")

'response.Write(request("flag"))
rs.update

%>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td><div align="center"><%response.Write("修改成功！")%> </div></td>
  </tr>
</table>

<%response.Write("")%><script language="javascript">
<!--
function clock(){i=i-1
document.title="本窗口将在"+i+"秒后自动关闭!";
if(i>0)setTimeout("clock();",1000);
else self.close();}
var i=3
clock();
//-->
</script>

<%
end if
%>