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

📄 addarticle.asp

📁 红金羚v1.5办公自动化软件是基于大型数据库系统开发的应用系统
💻 ASP
字号:
<!--#include file="dbpath/dbpath.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>自动链接系统</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="css/style.css">
<script LANGUAGE="javascript">
<!--

function FrmAddLink_onsubmit() {
if (document.FrmAddLink.username.value=="")
	{
	  alert("对不起,姓名没有输入!")
	  document.FrmAddLink.username.focus()
	  return false
	 }
else if(document.FrmAddLink.TxtEmail.value=="")
	{
	  alert("对不起,E_Mail没有输入!")
	  document.FrmAddLink.TxtEmail.focus()
	  return false
	 }
else if (document.FrmAddLink.TxtName.value=="")
	{
	  alert("对不起,站名没有输入!")
	  document.FrmAddLink.TxtName.focus()
	  return false
	 }
else if(document.FrmAddLink.TxtHomepage.value=="" || document.FrmAddLink.TxtHomepage.value.toUpperCase()=="HTTP://")
	{
	  alert("对不起,请输入您的主页网址!")
	  document.FrmAddLink.TxtHomepage.focus()
	  return false
	 }
else if(document.FrmAddLink.txttitle.value=="")
	{
	  alert("对不起,请输入你的主页简介!")
	  document.FrmAddLink.txttitle.focus()
	  return false
	 }
else if(document.FrmAddLink.txttitle.value.length>100)
	{
	  alert("对不起,简介请控制在50字以内!")
	  document.FrmAddLink.txttitle.focus()
	  return false
	 }
else if(document.FrmAddLink.txtcontent.value=="")
	{
	  alert("对不起,请输入你的主页说明!")
	  document.FrmAddLink.txtcontent.focus()
	  return false
	 }
else if(document.FrmAddLink.txtcontent.value.length>500)
	{
	  alert("对不起,说明请控制在250字以内!")
	  document.FrmAddLink.txtcontent.focus()
	  return false
	 }
}

//-->
</script>
</head>

<body>
<div align="center">
  <center>
    
<form align="center" method="post" name="FrmAddLink" LANGUAGE="javascript"
    onsubmit="return FrmAddLink_onsubmit()" action="savearticle.asp">
      <div align="center"><center>
          <font color="#ffffff"><strong><span
          class="smallFont">自 动 加 入 友 情 链 接</span></strong></font> 
          <table border="0" cellpadding="0" cellspacing="0" bgcolor="#ab6c00" align="center" bordercolorlight="#000000" bordercolordark="#FFFFFF">
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><span class="smallFont"><strong><img src="images/nc.GIF" width="24" height="24"></strong></span></div>
              </td>
              <td width="37"> 
                <div align="center"><span class="smallFont">站 长</span></div>
              </td>
              <td width="230" height="32"> 
                <div align="left"> 
                  <input name="username" size="20" class="smallInput" maxlength="20" style="BACKGROUND-COLOR:#FFffff;font-family: 宋体; font-size: 9pt">
                </div>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><span class="smallFont"><strong><img src="images/email.GIF" width="24" height="24"></strong></span></div>
              </td>
              <td width="37"> 
                <div align="center"><span class="smallFont">信 箱</span></div>
              </td>
              <td width="230" height="32"> 
                <div align="left"> 
                  <input name="TxtEmail" size="20" class="smallInput" maxlength="50" style="BACKGROUND-COLOR:#FFffff;font-family: 宋体; font-size: 9pt">
                </div>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><span class="smallFont"><strong><img src="images/lb.GIF" width="24" height="24"></strong></span></div>
              </td>
              <td width="37"> 
                <div align="center">类 别</div>
              </td>
              <td width="230" height="32"> 
                <select class="smallSel" name="typeid" size="1" style="BACKGROUND-COLOR:#FFffff;font-family: 宋体; font-size: 9pt">
                  <%
dim rs,sql,sel
 set rs=server.createobject("adodb.recordset")
  sql="select * from linktype"
 rs.open sql,conn,1,1
			  do while not rs.eof
                                sel="selected"    
		             response.write "<option " & sel & " value='"+CStr(rs("typeID"))+"' name=typeid>"+rs("type")+"</option>"+chr(13)+chr(10)
		             rs.movenext
    		          loop
			rs.close
			  %> 
                </select>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><strong><font color="#003399"><img src="images/link.GIF" width="24" height="24"></font></strong></div>
              </td>
              <td width="37"> 
                <div align="center"><span
              class="smallFont">站 名</span></div>
              </td>
              <td width="230" height="32"> 
                <div align="left"> 
                  <input name="TxtName" size="20" class="smallInput" maxlength="20" style="BACKGROUND-COLOR:#FFFFFF;font-family: 宋体; font-size: 9pt">
                </div>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><strong><font color="#003399"><img src="images/zt.GIF" width="24" height="24"></font></strong></div>
              </td>
              <td width="37"> 
                <div align="center"><span
              class="smallFont">图 标</span></div>
              </td>
              <td width="230" height="32"> 
                <div align="left"> 
                  <input name="TxtHomelogo" size="20" class="smallInput" value="http://" maxlength="100" style="BACKGROUND-COLOR:#FFFFFF;font-family: 宋体; font-size: 9pt">
                  88X31</div>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><strong><font color="#003399"><img src="images/homepage.gif" width="24" height="24"></font></strong></div>
              </td>
              <td width="37"> 
                <div align="center"><span
              class="smallFont">主 页</span></div>
              </td>
              <td width="230" height="32"> 
                <input name="TxtHomepage" size="30" class="smallInput" value="http://" maxlength="50" style="BACKGROUND-COLOR:#FFFFFF;font-family: 宋体; font-size: 9pt">
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td width="28" height="32" align="right"> 
                <div align="center"><img src="images/ly.GIF" width="24" height="24"></div>
              </td>
              <td width="37"> 
                <div align="center"><span
              class="smallFont">简 介</span></div>
              </td>
              <td width="230" height="32"> 
                <input type="text" name="txttitle" size="30"
class="smallinput" maxlength="100" style="BACKGROUND-COLOR:#FFFFFF;font-family: 宋体; font-size: 9pt">
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="32" colspan="3" align="right"> 
                <div align="center"></div>
                <div align="center">网 站 详 细 介 绍<span
              class="smallFont">(不得超过250字)</span></div>
              </td>
            </tr>
            <tr align="center" valign="top" bgcolor="#FFFFFF"> 
              <td height="80" colspan="3"> 
                <div align="center"></div>
                <p align="center"> 
                  <textarea
rows="4" name="txtcontent" cols="40" class="smallarea" style="BACKGROUND-COLOR:#FFFFFF;font-family: 宋体; font-size: 9pt"></textarea>
                
              </td>
            </tr>
          </table>
      </center></div><div align="center"><center><p><br>
              
            <input type="submit" value=" 确 定 " name="cmdOk" class="buttonface" style="BACKGROUND-COLOR:#AB6C00;font-family: 宋体; font-size: 9pt;" >
              &nbsp; 
              
            <input
      type="reset" value=" 重 填 " name="cmdReset" class="buttonface" style="BACKGROUND-COLOR:#AB6C00;font-family: 宋体; font-size: 9pt;" >
            </p>
      </center></div>
    </form>
<!--#include file="function/ads.inc"-->

</center></div>
</body>
</html>

⌨️ 快捷键说明

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