📄 msg_sz.asp
字号:
<%if session("checked")<>"yes" then
response.Redirect "../login.asp"
else
%>
<!--#include file="dataconn2.asp"-->
<%set data5=server.createobject("adodb.recordset")
sq_5="select * from web_admin where id = '1'"
data5.open sq_5,conn,1,3%>
<%select case Request.QueryString("op")
case "msg_sz"
call sz()
case "okay"
call okay()
case else
call main()
end select%>
<%sub main()%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>hehe</title>
<base target="_self">
<style type="text/css">
<!--
body,td,th {font-family: 宋体, Arial;
font-size: 12px;}
body {margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;}
a {font-size: 12px;}
a:link {text-decoration: none;}
a:visited {text-decoration: none;}
a:hover {text-decoration: none;}
a:active {text-decoration: none;}
-->
</style>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0">
<table cellpadding="0" cellspacing="0" width="100%">
<tr>
<td>
<div align="center">
<table cellpadding="0" cellspacing="0" width="624">
<tr>
<td height="260" align="center">
<form method="POST" action="?op=msg_sz">
<div align="center">
<table cellpadding="0" width="412" height="178" style="border-collapse: collapse" border="1" bordercolor="#C0C0C0">
<tr>
<td height="35" width="108" align="center" bgcolor="#9900FF">
<b><font color="#FFFFFF">留言本名称</font></b></td>
<td height="35" width="300">
<input type="text" name="web_name" size="20" style=" border:1px solid #FFFFFF; ; background-color:#E6E6E6" value="<%=data5("web_name")%>"><font color="#FF0000"> *</font></td>
</tr>
<tr>
<td height="35" width="108" align="center" bgcolor="#9900FF" >
<b><font color="#FFFFFF">网站地址</font></b></td>
<td height="35" width="300">
<input type="text" name="web_index" size="20" style=" border:1px solid #FFFFFF; ; background-color:#E6E6E6" value="<%=data5("web_index")%>"><font color="#FF0000"> *</font></td>
</tr>
<tr>
<td height="35" width="108" align="center" bgcolor="#9900FF">
<b><font color="#FFFFFF">网站LOGO地址</font></b></td>
<td height="35" width="300">
<input type="text" name="web_logo" size="20" style=" border:1px solid #FFFFFF; ; background-color:#E6E6E6" value="<%=data5("web_logo")%>"> 图片格式</td>
</tr>
<tr>
<td height="35" width="108" align="center" bgcolor="#9900FF">
<b><font color="#FFFFFF">公告</font></b></td>
<td height="35" width="300">
<input type="text" name="web_gg" size="20" style=" border:1px solid #FFFFFF; ; background-color:#E6E6E6" value="<%=data5("web_gg")%>"> 是否显示:
<%if data5("disp_gg")="1" then %>
<input type="radio" value="1" checked name="disp_gg">是<input type="radio" name="disp_gg" value="2">否</td>
<%else%>
<input type="radio" value="1" name="disp_gg">是<input type="radio" checked name="disp_gg" value="2">否
<%end if%></tr>
<tr>
<td height="36" width="108" align="center" bgcolor="#9900FF">
<b><font color="#FFFFFF">每页留言显示条数</font></b></td>
<td height="36" width="300">
<input type="text" name="msg_num" size="20" style=" border:1px solid #FFFFFF; ; background-color:#E6E6E6" value="<%=data5("msg_num")%>"></td>
</tr>
</table>
</div><br>
<input type="submit" value="保存" name="B1" style="border: 1px solid #C0C0C0; background-color: #E6E6E6 ;width:60;height:16"> <input type="reset" value="重写" name="B2" style="border: 1px solid #C0C0C0; background-color: #E6E6E6 ;width:60;height:16"></form>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<%end sub%>
<%sub okay()%>
<script language=vbs>
<!--
msgbox"保存完毕!",vbInformation,"提示"
window.location.href="msg_sz.asp"
-->
</script>
<%end sub%>
<%sub sz()
data5("web_name")=request.form("web_name")
data5("web_index")=request.form("web_index")
data5("web_logo")=request.form("web_logo")
data5("web_gg")=request.form("web_gg")
data5("disp_gg")=request.form("disp_gg")
data5("msg_num")=request.form("msg_num")
data5.update
data5.close
set data5=nothing
conn.close
set conn=nothing
response.Redirect "msg_sz.asp?op=okay"
end sub%>
<%data5.close
set data5=nothing
conn.close
set conn=nothing%>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -