?? link.asp
字號:
<!--#include file="conn.asp"-->
<%
if request("act")="upd" then
sql="update data set link='"&request("link")&"'"
conn.execute sql
response.write "<script language=javascript>alert('修改成功');location='main.asp';</script>"
end if
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select link from data"
rs.open sql,conn,1,1
%>
<html>
<head>
<title>后臺管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/css.css" type="text/css">
</head>
<body bgcolor="#9CC7EF" text="#000000" leftmargin="0" topmargin="0">
<%if not (rs.eof or err) then %>
<table width="100%" height="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight=#145AA0 bordercolordark=#9CC7EF>
<form name="form1" action="?act=upd" method="post">
<tr bgcolor="#4296E7">
<td height="26"> <div align="center" class="unnamed1"><font color="#FFFFFF">【友情連接】</font></div></td>
</tr>
<tr>
<td nowrap> <div align="center">
<span class="unnamed1">
<textarea name="link" cols="80" rows="15" id="text"><%=rs("link")%></textarea>
</span></div></td>
</tr>
<tr bgcolor="#4296E7">
<td height="24"> <div align="center"> <span class="unnamed1">
<input type="submit" name="Submit" value="修改">
</span></div></td>
</tr></form>
</table>
<%else %>
<span class="unnamed1">無該記錄，請<a href="Javascript:window.history.go(-1)">返回</a></span>
<%end if %>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -