?? addsite.asp
字號:
<%response.expires=0%>
<!--#include file="function.asp"-->
<%
sitenumber=trim(request.form("sitenumber"))
siteurl=trim(request.form("siteurl"))
sitename=trim(request.form("sitename"))
if sitenumber<>"" and siteurl<>"" and sitename<>"" then
if find_online_site(sitenumber)<=0 then
application.lock
onlineuser=application("onlinesite")
number=ubound(onlineuser)
redim preserve onlineuser(number+1)
onlineuser(number+1)=sitenumber&"$"&siteurl&"$"&sitename
application("onlinesite")=onlineuser
application.unlock
response.write("<center><font color=#ff0000 size=+2>成功加入該站點！</font></center>")
else
response.write("<center><font color=#ff0000 size=+2>該站點已經存在，不能增加！</font></center>")
end if
end if
%>
<html>
<head>
<title>增加在線站點</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center">
<p><font color="#FF0000" size="+2">增加在線站點</font> </p>
<form name="form1" method="post" action="">
<table width="333" cellpadding="0" cellspacing="0">
<tr>
<td width="95">站點ID號：</td>
<td width="222">
<input type="text" name="sitenumber">
</td>
</tr>
<tr>
<td width="95">站點網址：</td>
<td width="222">
<input type="text" name="siteurl">
</td>
</tr>
<tr>
<td width="95">站點名稱： </td>
<td width="222">
<input type="text" name="sitename">
</td>
</tr>
</table>
<br>
<input type="submit" name="ok" value=" 確 定 ">
</form>
<p> </p>
</div>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -