📄 ad2.asp
字号:
<!--#include file="session.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<LINK href="style.css" rel=stylesheet>
</head>
<script language="VBScript">
<!--
Sub Checkdata()
If ad.ad_web.value = empty then
Window.Alert"网站名字没有填写"
Exit Sub
end if
If ad.ad_url.value = empty then
Window.Alert"网站URL没有填写"
Exit Sub
end if
If ad.ad_text.value = empty then
Window.Alert"网站简介没有填写"
Exit Sub
end if
ad.submit
end sub
-->
</script>
<body>
<div align="center">
<center>
<form name="ad" method="post" action="ad_to.asp">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="500">
<tr>
<td width="121" align="center">网站名字：</td>
<td width="375"><input type="text" name="ad_web" size="25" style="border: 1 solid #000000"></td>
</tr>
<tr>
<td width="121" align="center">网站 URL：</td>
<td width="375"><input type="text" name="ad_url" size="25" style="border: 1 solid #000000" value="http://"></td>
</tr>
<tr>
<td width="121" align="center">网站简介：</td>
<td width="375"><input type="text" name="ad_text" size="25" style="border: 1 solid #000000"></td>
</tr>
<tr>
<td width="121"></td>
<td width="375"><input type="button" value="确定提交" name="B1" ONCLICK="Checkdata"></td>
</tr>
</table>
</center>
</div>
</form> </center>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -