📄 admin_getsoft.asp
字号:
<tr class="tdbg">
<td align="right" class="tdbg" ><strong>是否新窗口打开下载连接设置：</strong></td>
<td class="tdbg">
<input type="radio" name="DownNewType" value="0" <% if DownNewType<>1 then Response.Write("checked")%> onClick="picl222.style.display='none'">
不作设置
<input type="radio" name="DownNewType" value="1" <% if DownNewType=1 then Response.Write("checked")%> onClick="picl222.style.display=''">
新窗口打开</td>
</tr>
<tr class="tdbg" id="picl222" style="display:none" >
<td align="right" class="tdbg" >
<strong><font color=blue>下载地址列表开始代码(新窗口)：</font></strong><p> </p>
<strong><font color=blue>下载地址列表结束代码(新窗口)：</font></strong><p> </p>
<strong><font color=blue>获取下载连接开始代码(新窗口)：</font></strong><p> </p>
<strong><font color=blue>获取下载连接结束代码(新窗口)：</font></strong>
</td>
<td class="tdbg">
<textarea name="DownNewlist_s" cols="70" rows="5" class="lostfocus"><%= DownNewlist_s %></textarea><br>
<textarea name="DownNewlist_o" cols="70" rows="5" class="lostfocus"><%= DownNewlist_o %></textarea><br>
<textarea name="DownNewUrl_s" cols="70" rows="5" class="lostfocus"><%= DownNewUrl_s %></textarea><br>
<textarea name="DownNewUrl_o" cols="70" rows="5" class="lostfocus"><%= DownNewUrl_o %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>软 件 图 片 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_007" <% if ZdType_007<>1 then Response.Write("checked") %> onClick="ZD007.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_007=1 then Response.Write("checked") %> name="ZdType_007" onClick="ZD007.style.display=''">设置标签 </tr>
<tr class="tdbg" id="ZD007" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>获取软件图片开始代码：</font></strong>
<p> </p>
<strong><font color=blue>获取软件图片结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_007" cols="70" rows="5" class="lostfocus"><%= Zds_007 %></textarea><br>
<textarea name="Zdo_007" cols="70" rows="5" class="lostfocus"><%= Zdo_007 %></textarea></td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>软 件 大 小 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_001" <% if ZdType_001<>1 then Response.Write("checked") %> onClick="ZD001.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_001=1 then Response.Write("checked") %> name="ZdType_001" onClick="ZD001.style.display=''">设置标签 </tr>
<tr class="tdbg" id="ZD001" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>获取软件大小开始代码：</font></strong>
<p> </p>
<strong><font color=blue>获取软件大小结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_001" cols="70" rows="5" class="lostfocus"><%= Zds_001 %></textarea><br>
<textarea name="Zdo_001" cols="70" rows="5" class="lostfocus"><%= Zdo_001 %></textarea></td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>软 件 语 言 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_002" <% if ZdType_002<>1 then Response.Write("checked") %> onClick="ZD002.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_002=1 then Response.Write("checked") %> name="ZdType_002" onClick="ZD002.style.display=''">设置标签
</td>
</tr>
<tr class="tdbg" id="ZD002" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>软件语言开始代码：</font></strong>
<p> </p>
<strong><font color=blue>软件语言结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_002" cols="70" rows="5" class="lostfocus"><%= Zds_002 %></textarea><br>
<textarea name="Zdo_002" cols="70" rows="5" class="lostfocus"><%= Zdo_002 %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>授 权 方 式 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_003" <% if ZdType_003<>1 then Response.Write("checked") %> onClick="ZD003.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_003=1 then Response.Write("checked") %> name="ZdType_003" onClick="ZD003.style.display=''">设置标签
</td>
</tr>
<tr class="tdbg" id="ZD003" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>授权方式开始代码：</font></strong>
<p> </p>
<strong><font color=blue>授权方式结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_003" cols="70" rows="5" class="lostfocus"><%= Zds_003 %></textarea><br>
<textarea name="Zdo_003" cols="70" rows="5" class="lostfocus"><%= Zdo_003 %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>运 行 环 境 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_004" <% if ZdType_004<>1 then Response.Write("checked") %> onClick="ZD004.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_004=1 then Response.Write("checked") %> name="ZdType_004" onClick="ZD004.style.display=''">设置标签
</td>
</tr>
<tr class="tdbg" id="ZD004" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>运行环境开始代码：</font></strong>
<p> </p>
<strong><font color=blue>运行环境结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_004" cols="70" rows="5" class="lostfocus"><%= Zds_004 %></textarea><br>
<textarea name="Zdo_004" cols="70" rows="5" class="lostfocus"><%= Zdo_004 %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>演 示 地 址 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_005" <% if ZdType_005<>1 then Response.Write("checked") %> onClick="ZD005.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_005=1 then Response.Write("checked") %> name="ZdType_005" onClick="ZD005.style.display=''">设置标签
</td>
</tr>
<tr class="tdbg" id="ZD005" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>演示地址开始代码：</font></strong>
<p> </p>
<strong><font color=blue>演示地址结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_005" cols="70" rows="5" class="lostfocus"><%= Zds_005 %></textarea><br>
<textarea name="Zdo_005" cols="70" rows="5" class="lostfocus"><%= Zdo_005 %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>注 册 地 址 设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="ZdType_006" <% if ZdType_006<>1 then Response.Write("checked") %> onClick="ZD006.style.display='none'">不作设置
<input type="radio" value="1" <% if ZdType_006=1 then Response.Write("checked") %> name="ZdType_006" onClick="ZD006.style.display=''">设置标签
</td>
</tr>
<tr class="tdbg" id="ZD006" style="display:none">
<td width="20%" align="right" class="tdbg" >
<strong><font color=blue>注册地址开始代码：</font></strong>
<p> </p>
<strong><font color=blue>注册地址结束代码：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="Zds_006" cols="70" rows="5" class="lostfocus"><%= Zds_006 %></textarea><br>
<textarea name="Zdo_006" cols="70" rows="5" class="lostfocus"><%= Zdo_006 %></textarea>
</td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>解 压 密 码
设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="CopyFromType" <% If CopyFromType=0 Or CopyFromType="" Then Response.Write("checked") %> onClick="CopyFrom1.style.display='none';CopyFrom2.style.display='none'">不作设置
<input type="radio" value="1" name="CopyFromType" <% If CopyFromType=1 Then Response.Write("checked") %> onClick="CopyFrom1.style.display='';CopyFrom2.style.display='none'">设置标签
<input type="radio" value="2" name="CopyFromType" <% If CopyFromType=2 Then Response.Write("checked") %> onClick="CopyFrom1.style.display='none';CopyFrom2.style.display=''">指定解压密码</td>
</tr>
<tr class="tdbg" id="CopyFrom1" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>解压密码开始标记：</font></strong><p> </p>
<p> </p>
<strong><font color=blue>解压密码结束标记：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="FsString" cols="70" rows="7" class="lostfocus"><%= FsString %></textarea><br>
<textarea name="FoString" cols="70" rows="7" class="lostfocus"><%= FoString %></textarea></td>
</tr>
<tr class="tdbg" id="CopyFrom2" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>请指定解压密码：</font></strong></td>
<td width="75%" class="tdbg">
<input name="CopyFromStr" type="text" class="lostfocus" id="CopyFromStr" value="<%= CopyFromStr %>"> </td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>时 间
设 置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="DateType" <% If DateType<>1 Then Response.Write("checked") %> onClick="Date1.style.display='none'">不作设置
<input type="radio" value="1" <% If DateType=1 Then Response.Write("checked") %> name="DateType" onClick="Date1.style.display=''">设置标签 </tr>
<tr class="tdbg" id="Date1" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>时间开始标记：</font></strong><p> </p>
<strong><font color=blue>时间结束标记：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="DsString" cols="70" rows="5" class="lostfocus"><%= DsString %></textarea><br>
<textarea name="DoString" cols="70" rows="5" class="lostfocus"><%= DoString %></textarea></td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>作<span lang="en-us"> </span>者<span lang="en-us">
</span>设<span lang="en-us"> </span>置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" <% If AuthorType=0 Or AuthorType="" Then Response.Write("checked") %> name="AuthorType" onClick="Author1.style.display='none';Author2.style.display='none'">不作设置
<input type="radio" value="1" <% If AuthorType=1 Then Response.Write("checked") %> name="AuthorType" onClick="Author1.style.display='';Author2.style.display='none'">设置标签
<input type="radio" value="2" name="AuthorType" <% If AuthorType=2 Then Response.Write("checked") %> onClick="Author1.style.display='none';Author2.style.display=''">指定作者</td>
</tr>
<tr class="tdbg" id="Author1" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>作者开始标记：</font></strong><p> </p>
<p> </p>
<strong><font color=blue>作者结束标记：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="AsString" cols="70" rows="7" class="lostfocus"><%= AsString %></textarea><br>
<textarea name="AoString" cols="70" rows="7" class="lostfocus"><%= AoString %></textarea></td>
</tr>
<tr class="tdbg" id="Author2" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>请指定作者：</font></strong></td>
<td width="75%" class="tdbg">
<input name="AuthorStr" type="text" class="lostfocus" id="AuthorStr" value="<%= AuthorStr %>"> </td>
</tr>
<tr class="tdbg">
<td width="20%" align="right" class="tdbg" ><b>关键字词设置：</b></td>
<td width="75%" class="tdbg">
<input type="radio" value="0" name="KeyType" <% If KeyType=0 Or KeyType="" Then Response.Write("checked") %> onClick="Key1.style.display='none';Key2.style.display='none'">标题生成
<input type="radio" value="1" name="KeyType" <% If KeyType=1 Then Response.Write("checked") %> onClick="Key1.style.display='';Key2.style.display='none'">标签生成
<input type="radio" value="2" name="KeyType" <% If KeyType=2 Then Response.Write("checked") %> onClick="Key1.style.display='none';Key2.style.display=''">自定义关键字</td>
</tr>
<tr class="tdbg" id="Key1" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>关键词开始标记：</font></strong><p> </p>
<p> </p>
<strong><font color=blue>关键词结束标记：</font></strong></td>
<td width="75%" class="tdbg">
<textarea name="KsString" cols="70" rows="7" class="lostfocus"><%= KsString %></textarea><br>
<textarea name="KoString" cols="70" rows="7" class="lostfocus"><%= KoString %></textarea></td>
</tr>
<tr class="tdbg" id="Key2" style="display:none">
<td width="20%" align="right" class="tdbg" ><strong><font color=blue>请指定关键：</font></strong></td>
<td width="75%" class="tdbg"><input name="KeyStr" type="text" class="lostfocus" id="KeyStr" value="<%= KeyStr %>">
<br>
格式：关键字之间用<font color=red>|</font>分隔，如：<%= CjName%>|IT </td>
</tr>
<%
'------自定义-----------
Response.Write GetField(1,ModuleID)
%>
<tr class="tdbg">
<td height="30" colspan="2" align="center" class="tdbg">
<input name="ItemID" type="hidden" value="<%=ItemID%>">
<%
Response.Write "<input name=""Action1"" type=""hidden"" id=""Action"" value="& action1 &">"
%>
<input name="Action" type="hidden" id="Action" value="demo">
<input type="hidden" name="UrlTest" id="UrlTest" value="<%=UrlTest%>">
<input name="button1" type="button" class="lostfocus" onClick="window.location.href='javascript:history.go(-1)'" value="上 一 步">
<input name="Submit" type="submit" class="lostfocus" value="下 一 步"> <input type="checkbox" name="ShowCode" value="checkbox">进行采集测试</td>
</tr>
</form>
</table>
<%
End If
End Sub'第二完
Sub demo()'测试页
If ItemID="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>参数错误，项目ID不能为空</li>"
Else
ItemID=Clng(ItemID)
End If
If FoundErr<>True Then
Req_Err_msg 3
End If
If FoundErr<>True And Action="demo" And ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -