完整sub end sun程序如下
<%
sub admin_login()
response.cookies(webCookies)("admin_valcode")=session_for&"_"&rnd_value
%>
<script language="javascript">
<!--
if (self.location!=top.location) { top.location=self.location }
//-->
</script>
<div id="login_container" >
<div id="Login_Header" ></div>
<div id="Login_Content" >
<div id="Login" >
<div class="Pimg"><img src="Images/center.jpg" width="289" height="539" /></div>
<div class="form_alogin">
<form name="admin_frm" action="?ok" method="post" class="login_form">
<input type="hidden" name="admin_log" value="ok" />
<h2 class="f14 fbold">登录网站后台管理系统</h2>
<table border="0" cellspacing="0" cellpadding="0" class="login_inputlist">
<tr>
<td class="label1">管 理 员:</td>
<td><input type="text" name="username" value="<%= login_username %>" size="15" maxlength="20" class="input_login" onmouseover="this.focus()" /></td>
</tr>
<tr>
<td class="label1">管理密码:</td>
<td><input type="password" name="password" size="15" maxlength="20" class="input_login" onmouseover="this.focus()" /></td>
</tr>
<tr>
<td class="label1">版本选择:</td>
<td><!-- #include file="../include/inc_seledition.asp" --></td>
</tr>
<tr>
<tr>
<td colspan="2"><input name="login" type="submit" value="登 陆" class="inp_L2" style="cursor: hand;" onclick="javascript:return admin_login_chk();" /> <input name="reset" class="inp_L1" type="reset" value="重 填" /></td>
</tr>
</table>
</form>
</div>
</div>
</div>
<div id="Login_Footer">
<a href="<%= webUrl %>" class="Fonta1aabb"><%= webCopyRight %></a>
</div>
</div>
<%
end sub