📄 denglu.asp
字号:
<html>
<head>
<title>登陆</title>
<SCRIPT LANGUAGE="vbScript">
<!--
Sub Button1_onClick
window.location="\liaotian\ts.htm"
end sub
Sub Button2_OnClick
Dim TheForm
Set TheForm =document.tt
If trim(TheForm.name.Value) =""then
sssss = MsgBox("你还没有名字！！！！", vbOKOnly + vbExclamation, "警告")
TheForm.name.Focus
exit sub
end if
TheForm.Submit
End Sub
-->
</script>
</head>
<%ts=trim(request("ts"))
session("ts")=ts
if ts="" then
ts="2.jpg"
session("ts")="2.jpg"
end if
%>
<body bgcolor="#C8FFC8">
<p> </p>
<p> </p>
<form method="post" action="liao.asp" name="tt">
<div align="center">
<center>
<table border="0" width="38%" height="93" >
<tr>
<td width="100%" colspan="2" height="36" align="middle"><font face="楷体_GB2312" size="5">
<font color="#FF0000" size="5" face="楷体_GB2312"><blink>登陆</blink></font></font></td>
</tr>
<tr>
<td width="59%" height="33">
<p align="center"><font face="楷体_GB2312" size="4" color="#006600">用户名：</font></p>
</td>
<td width="67%" height="33">
<input name="name" size="13" maxlength="6" >
</td>
</tr>
<tr>
<td width="59%" height="18">
<p align="center"><font color="#006600">头像:</font></p></td>
<td width="67%" height="18" ><IMG height=19 src="ico/<%=ts%>" width=17 name=ts > <INPUT style="LEFT: 17px; WIDTH: 70px; TOP: 1px; HEIGHT: 24px" type=button size=11 name="button1" value=另选...></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" width="30%">
<tr>
<td width="300%" align="middle"> <input type="button" value="登陆" name="button2"></td>
</tr>
</table>
</center>
</div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -