?? modi.asp
字號:
<%
if session("password")<>"" then
%>
<html>
<head>
<title>圣誕許愿樹--億網(wǎng)論壇bbs.vcew.com</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="site.css">
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="5">
<!--#include file="conn.asp"-->
<%
'************update.asp************
a_name = Request("name") '取得表單字體數(shù)據(jù)
a_id = Request("id")
a_name2= Request("name2")
a_from01= Request("from01")
a_oicq = Request("oicq")
a_memo = trim(Request("memo")) ' 取得留言內(nèi)容
a_memo = Server.HTMLEncode(Request("memo"))
a_memo = Replace( a_memo, vbCrLf, "<br>")
a_memo = Replace( a_memo, "'", "''")
SQLcmd = "update wish set "
SQLcmd = SQLcmd & "name='" & a_name & "',memo='" & a_memo & "',name2='" & a_name2 & "',from01='" & a_from01 & "',oicq='" & a_oicq & "',addtime=now where id="& a_id
response.write "<table width='100%' border=0 cellspacing=0 cellpadding=0 height='100%'><tr><td>"
response.write "<br><br><table width=250 border=1 cellspacing=2 cellpadding=2 align=center bordercolorlight=7285CF bordercolordark=7285CF height=90 bgcolor=F2F2F2>"
response.write "<tr bordercolor=F2F2F2 bgcolor=F2F2F2 align=center> "
response.write "<td>修改成功！</td>"
response.write "</tr>"
response.write "<tr bordercolor=F2F2F2 bgcolor=F2F2F2 align=center> "
response.write "<td>您修改的記錄已成功加入數(shù)據(jù)庫！</td>"
response.write "</tr>"
response.write "</table>"
response.write "</td></tr></table>"
newconn.Execute SQLcmd
%>
</body>
</html>
<%
else
Response.Redirect "login.asp" '否則轉(zhuǎn)換到login.asp頁面
end if
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -