⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 join.asp

📁 一个用jsp 编写的个人主页网站哦。希望对大家有所帮助啊
💻 ASP
字号:
<!--#include file = "public.asp"-->
<SCRIPT LANGUAGE=vbscript>
Sub save_onclick 
  if form.SiteName.value="" then
    msgbox " 请输入网站名称 "
    form.SiteName.focus ()
    exit sub
  end if
    if instr(form.SiteName.value,"'") then
    msgbox "  网站名称中不可含有特殊字符,请去掉后重新提交! "
    form.SiteName.focus ()
    exit sub
  end if
    if len(form.SiteName.value)>35 then
    msgbox " 网站名称长度请不要超过35 字! "
    form.SiteName.focus ()
    exit sub  
  end if
  if form.url.value=""or form.url.value="http://" then
    msgbox " 请输入主页地址 "
    form.url.focus ()
    exit sub
  end if
      if instr(form.url.value,"'") then
    msgbox " 主页地址不可含有特殊字符 "
    form.url.focus ()
    exit sub
  end if
      if len(form.url.value)>125 then
    msgbox " 主页地址长度请不要超过125 字! "
    form.url.focus ()
    exit sub  
  end if
      if instr(form.logo.value,"'") then
    msgbox " 网站图标不可含有特殊字符 "
    form.logo.focus ()
    exit sub
  end if
        if len(form.logo.value)>125 then
    msgbox " 图标地址长度请不要超过125 字! "
    form.logo.focus ()
    exit sub  
  end if
  if form.email.value="" then
    msgbox " 请输入E-Mail地址 "
    form.email.focus ()
    exit sub
  end if
  if instr(form.email.value,"@")=0 then
    msgbox " 你的E-Mail输入有误 "
    form.email.focus ()
    exit sub
  end if
        if instr(form.email.value,"'") then
    msgbox " E-Mail中不可含有特殊字符 "
    form.email.focus ()
    exit sub
  end if
        if len(form.email.value)>35 then
    msgbox " E-Mail地址长度请不要超过35 字! "
    form.email.focus ()
    exit sub  
  end if
  if form.linktype.value="请选择类别" or form.linktype.value="" then
    msgbox " 请选择网站类别 "
    exit sub
  end if
  if form.Description.value="" then
    msgbox " 请输入网站简介 "
    form.Description.focus ()
    exit sub
  end if	
        if instr(form.Description.value,"'") then
    msgbox " 网站简介中不可含有部分特殊字符,请去掉后重新提交! "
    form.Description.focus ()
    exit sub
  end if
    if len(form.Description.value)>125 then
    msgbox " 网站简介长度请不要大于125字! "
    form.Description.focus ()
    exit sub  
  end if
  form.submit ()  
End Sub
</SCRIPT>

<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>::加入链接::</title>
<style type="text/css">
<!--
body {
	margin-left: 15px;
	margin-top: 15px;
	margin-right: 15px;
	margin-bottom: 15px;
}
-->
</style>
<link rel="stylesheet" href="css.css" type="text/css">
</head>
<body>
    <!--#include file = "top.asp"-->
<style type=text/css>
<!--
input,textarea {
font-size:9pt;
color:#222222;
font-family:'宋体';
background-color:#F9F9F9;
border-top:1px solid #222222;
border-bottom:1px solid #222222;
border-left:1px solid #222222;
border-right:1px solid #222222;
scrollbar-face-color:#ffffff;
scrollbar-track-color:#ffffff;
scrollbar-arrow-color:#222222;
scrollbar-3dlight-color:#ffffff;
scrollbar-highlight-color:#ffffff;
scrollbar-shadow-color:#222222;
scrollbar-darkshadow-color:#ffffff;}
-->
</style>
<form action="gform.asp" method="post" name="form" id="form"><br>
    
  <table width="387" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
        <td width="91%"> 
          
        <table width="366" border="0" align="center" cellpadding="0" cellspacing="0" >
          <tr class="table003"> 
            <td colspan="2" height="17">&nbsp;</td>
          </tr>
          <tr class="table003"> 
            <td colspan="2"> 
              <p align="center" class="9k">::::加入友情链接:::: 
            </td>
          </tr>
          <tr class="table001"> 
            <td width="127" align="center"> 
              <div align="left" class="9point"><font color="#6CAA0B" class="9point">*</font> 
                网站名称:</div>
            </td>
            <td height="28" align="center" width="241" class="9point"> 
              <div align="left">
                <input name="SiteName" type="text" class="input1" value="" size="32">
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td width="127" align="center"> 
              <div align="left" class="9point"><font color="#6CAA0B" class="9point">*</font> 
                主页地址:</div>
            </td>
            <td height="28" align="center" width="241"> 
              <div align="left">
                <input name="URL" size="32" value="http://" class="input1">
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td align="center" width="127"> 
              <div align="left" class="9point"><font color="#6CAA0B" class="9point">*</font> 
                网站图标:</div>
            </td>
            <td height="28" align="center" valign="top" width="241" class="9point"> 
              <div align="left"> 
                <input name="logo" class="input1" id="logo" value="http://" size="32">
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td width="127" align="center"> 
              <div align="left" class="9point"><font color="#6CAA0B" class="9point">*</font> 
                电子邮件:</div>
            </td>
            <td height="28" align="center" width="239"> 
              <div align="left"> 
                <input name="Email" size="32" class="input1" value="@">
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td width="127" align="center"> 
              <div align="left" class="9point"><font color="#6CAA0B" class="9point">*</font> 
                加入类别:</div>
            </td>
            <td height="28" align="center" valign="top" width="239"> 
              <div align="left"> 
                <select name="linktype" id="linktype">
                  <option>请选择类别</option>
                  <%
			  rssort.movefirst
			   do while not rssort.eof   %>
                  <option value="<%=rssort("sort")%>"><%=rssort("sort")%></option>
                  <%  rssort.movenext    
    loop     
	%>
                </select>
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td align="center" width="127"> 
              <div align="left"><span class="9point"><font color="#6CAA0B" class="9point">*</font> 
                网站简介:<br>
                <font color="#FFFFFF" class="9point">*</font> 限制125字以内</span></div>
            </td>
            <td height="28" align="center" valign="top" width="239"> 
              <div align="left"> 
                <textarea name=Description rows=5 cols=35 class="input1"></textarea>
              </div>
            </td>
          </tr>
          <tr class="table001"> 
            <td height="28" colspan="2" align="center"> 
              <input name="join" type="button" class="input2" id="join" onClick=save_onclick value=" 加 入 " >
                
              <input name="B12" type="reset" class="input2" id="B12"  value=" 重 写 " >
               </td>
          </tr>
        </table>
          <table width="365" border="0" cellspacing="0" cellpadding="0" align="center">
            <tr> 
              <td class="9point"><br>
                注意:网站名称和网站简介不支持某些特殊字符,如果登录不成功,请去掉特殊字符再试。<br>
                如没有LOGO时请填写 images/nobanner.gif<br>
                本站接受单方面链接和推荐链接,<br>
                也欢迎你把喜欢的优秀叶子加入到这里哦~<br>
              如果您是站长,<a href="logo.htm">加入之前阅读本站信息及链接要求 --&gt;&gt;</a><br>
              <a href="index.asp">[返回前页]</a></td>
            </tr>
          </table>
        </td>
      </tr>
    </table>
      <br>
    </form>
<!--#include file = "bottom.asp"-->  
</body>                        
</html>                  

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -