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

📄 soft_add.asp

📁 欢迎使用《雨点下载系统 2.0》! 本系统仅提供给个人网站免费使用
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<!--#include file="chkadmin.asp"-->
<!--#include file="inc/code.asp"-->
<%dim ClassID
ClassID=CInt(Trim(Request.QueryString("id")))%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="../style.css" rel="stylesheet" type="text/css">
</head>

<body>
<form name="form1" method="post" action="soft_add_save.asp">
  <table width="580" border="0" align="center" cellpadding="2" cellspacing="0" bgcolor="#EEEEEE">
    <tr bgcolor="#708090"> 
      <td colspan="2" align="center" class="TdBorderB"><font color="#FFFFFF">添 
        加 软 件</font></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">所属分类</td>
      <td class="TdBorderB"> <%dim sql,rs,ClassName,ParentStr,ParentNum,i
		sql="select ClassName,ParentStr from Class where ID="&ClassID
		set rs=conn.execute(sql)
		ClassName=rs(0)
		ParentStr=Split(rs(1),",")
		ParentNum=UBound(ParentStr)
		if ParentStr(0)="0" then
			response.write " \ "&ClassName&""
		else
			response.write " \ "	
			for i=0 to ParentNum
				sql="select ID,ClassName from Class where ID="&CInt(ParentStr(i))
				set rs=conn.execute(sql)
				response.write "<a href=soft_nav.asp?id="&rs(0)&">"&rs(1)&"</a> \ "
			next
			response.write ClassName
		end if
	%> <input name="ClassID" type="hidden" id="ClassID" value="<%=ClassID%>"> 
      </td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB"><font color="#FF0000">*</font>软件名称</td>
      <td class="TdBorderB"> <input name="FileName" type="text" class="input" id="FileName" size="50"> 
        <font color="#FF0000">*</font>关键字 
        <input name="Keyword" type="text" class="input" id="Keyword" size="20"></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB"><font color="#FF0000">*</font>软件大小</td>
      <td class="TdBorderB"><input name="FileSize" type="text" class="input" id="FileSize" size="15"> 
        &nbsp;运行平台 
        <select name="RunSystem" class="input" id="select">
          <option value="Windows9X/ME/NT/2000/XP" selected>Windows9X/ME/NT/2000/XP</option>
          <option value="Windows9X/ME">Windows9X/ME</option>
          <option value="WindowsNT/2000/XP">WindowsNT/2000/XP</option>
          <option value="WindowsNT/2000">WindowsNT/2000</option>
          <option value="WindowsNT">WindowsNT</option>
          <option value="Windows2000">Windows2000</option>
          <option value="WindowsXP">WindowsXP</option>
          <option value="Dos">Dos</option>
          <option value="Unix/Linux">Unix/Linux</option>
          <option value="Unix">Unix</option>
          <option value="Linux">Linux</option>
          <option value="Mac">Mac</option>
        </select> &nbsp;软件评级 
        <select name="Grade" class="input" id="select2">
          <option value="5">★★★★★</option>
          <option value="4" selected>★★★★</option>
          <option value="3">★★★</option>
          <option value="2">★★</option>
          <option value="1">★</option>
          <option value="0">不评级</option>
        </select></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">FTP下载</td>
      <td class="TdBorderB"> 
     <%response.write "<select name='FTP' class='input' id='select3' style='font-size:12px'>"
	 dim FtpSetting,j,FtpNum
	 sql="select top 1 FtpSetting from Config"
	 set rs=conn.execute(sql)
	 FtpSetting=rs(0)
	 if isnull(FtpSetting) or FtpSetting="" then
	 	response.write "<option value=no>您还没有设置FTP服务器</option></select>&nbsp;文件名 <input name='FtpFile' type='text' class='input' id='FtpFile' size='28' onFocus='this.blur()'>"
	 else
	 	FtpSetting=Split(FtpSetting,VBCrLf)
		FtpNum=Ubound(FtpSetting)
		for j=0 to FtpNum
			response.write "<option value="&j&">"&FtpSetting(j)&"</option>"
		next
		response.write "</select>&nbsp;文件名 <input name='FtpFile' type='text' class='input' id='FtpFile' size='28'>"
	 end if
	 set rs=nothing	
	 %>
        </td>
    </tr>
    <tr>
      <td align="right" class="TdBorderRB">&nbsp;</td>
      <td class="TdBorderB"><font color="#FF0000">每个下载地址用回车隔开,如果下载地址有说明,请用“|”隔开,说明文字在前面。</font></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">下载地址</td>
      <td class="TdBorderB"><textarea name="URL" cols="80" rows="3" id="URL"></textarea></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">汉化补丁</td>
      <td class="TdBorderB"><textarea name="Chinese" cols="80" id="Chinese"></textarea></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">注册破解</td>
      <td class="TdBorderB"><textarea name="Crack" cols="80" id="Crack"></textarea></td>
    </tr>
    <tr> 
      <td align="right" class="TdBorderRB">UBB</td>
      <td class="TdBorderB"><img onclick=bold() src="images/icon_editor_bold.gif" width="22" height="22" alt="粗体" border="0"> 
        <img onclick=italicize() src="images/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0"> 
        <img onclick=underline() src="images/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0"> 
        <img onclick=center() src="images/icon_editor_center.gif" width="22" height="22" alt="居中" border="0"> 
        <img onclick=hyperlink() src="images/icon_editor_url.gif" width="22" height="22" alt="超级连接" border="0"> 
        <img onclick=email() src="images/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0"> 
        <img onclick=image() src="images/icon_editor_image.gif" width="23" height="22" alt="图片" border="0"> 
        <img onclick=flash() src="images/swf.gif" width="23" height="22" alt="Flash图片" border="0"> 
        <img onclick=showcode() src="images/icon_editor_code.gif" width="22" height="22" alt="编号" border="0"> 
        <img onclick=quote() src="images/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0"> 
        <img onclick=list() src="images/icon_editor_list.gif" width="23" height="22" alt="目录" border="0"> 
        <IMG onclick=setfly() height=22 alt=飞行字 src="images/fly.gif" width=23 border=0> 
        <IMG onclick=move() height=22 alt=移动字 src="images/move.gif" width=23 border=0> 
        <IMG onclick=glow() height=22 alt=发光字 src="images/glow.gif" width=23 border=0> 
        <IMG onclick=shadow() height=22 alt=阴影字 src="images/shadow.gif" width=23 border=0><br>
        字体: 
        <SELECT style="font-size:12px" onchange=showfont(this.options[this.selectedIndex].value) name=font>
          <option value="宋体" selected>宋体</option>
          <option value="楷体_GB2312">楷体</option>
          <option value="新宋体">新宋体</option>
          <option value="黑体">黑体</option>
          <option value="隶书">隶书</option>
          <OPTION value="Andale Mono">Andale Mono</OPTION>
          <OPTION value=Arial>Arial</OPTION>
          <OPTION value="Arial Black">Arial Black</OPTION>
          <OPTION value="Book Antiqua">Book Antiqua</OPTION>
          <OPTION value="Century Gothic">Century Gothic</OPTION>
          <OPTION value="Comic Sans MS">Comic Sans MS</OPTION>
          <OPTION value="Courier New">Courier New</OPTION>
          <OPTION value=Georgia>Georgia</OPTION>
          <OPTION value=Impact>Impact</OPTION>
          <OPTION value=Tahoma>Tahoma</OPTION>
          <OPTION value="Times New Roman" >Times New Roman</OPTION>
          <OPTION value="Trebuchet MS">Trebuchet MS</OPTION>
          <OPTION value="Script MT Bold">Script MT Bold</OPTION>
          <OPTION value=Stencil>Stencil</OPTION>
          <OPTION value=Verdana>Verdana</OPTION>
          <OPTION value="Lucida Console">Lucida Console</OPTION>
        </SELECT> &nbsp; 字体大小 
        <select name="size" style="font-size:12px" onChange="showsize(this.options[this.selectedIndex].value)">
          <option value="1">1</option>
          <option value="2">2</option>
          <option value="3" selected>3</option>
          <option value="4">4</option>
        </select> &nbsp;<font face="宋体" color=#333333>颜色:</font> <SELECT style="font-size:12px" onchange=showcolor(this.options[this.selectedIndex].value) name=color>
          <option style="background-color:#F0F8FF;color: #F0F8FF" value="#F0F8FF">#F0F8FF</option>
          <option style="background-color:#FAEBD7;color: #FAEBD7" value="#FAEBD7">#FAEBD7</option>
          <option style="background-color:#00FFFF;color: #00FFFF" value="#00FFFF">#00FFFF</option>
          <option style="background-color:#7FFFD4;color: #7FFFD4" value="#7FFFD4">#7FFFD4</option>
          <option style="background-color:#F0FFFF;color: #F0FFFF" value="#F0FFFF">#F0FFFF</option>
          <option style="background-color:#F5F5DC;color: #F5F5DC" value="#F5F5DC">#F5F5DC</option>
          <option style="background-color:#FFE4C4;color: #FFE4C4" value="#FFE4C4">#FFE4C4</option>
          <option style="background-color:#000000;color: #000000" value="#000000">#000000</option>
          <option style="background-color:#FFEBCD;color: #FFEBCD" value="#FFEBCD">#FFEBCD</option>
          <option style="background-color:#0000FF;color: #0000FF" value="#0000FF">#0000FF</option>
          <option style="background-color:#8A2BE2;color: #8A2BE2" value="#8A2BE2">#8A2BE2</option>
          <option style="background-color:#A52A2A;color: #A52A2A" value="#A52A2A">#A52A2A</option>
          <option style="background-color:#DEB887;color: #DEB887" value="#DEB887">#DEB887</option>
          <option style="background-color:#5F9EA0;color: #5F9EA0" value="#5F9EA0">#5F9EA0</option>

⌨️ 快捷键说明

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