📄 addfreejs.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Option Explicit%>
<!--#include file="../../../Conn.asp"-->
<!--#include file="../../../SysCls/KS_CommonCls.asp"-->
<!--#include file="../../inc/Session.asp"-->
<%Dim Action,JSID,EditUrl,FolderID
Action=Request.QueryString("Action")
JSID=Request.QueryString("JSID")
FolderID=Request.QueryString("FolderID")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script src="../../JS/Common.js" language="JavaScript"></script>
<link href="../../inc/Admin_Style.CSS" rel="stylesheet" type="text/css">
</head>
<body topmargin="0" leftmargin="0" scroll=no>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="26" class="sort" align="center">
<%IF Action="Edit" Then
Response.Write("<Strong>编辑 JS</Strong>")
Else
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="50%"> 选择自由JS所属系统
<select name="select" Style="width:150" onChange="SelectJSType(options[selectedIndex].value);">
<Option value="AddWordJS.asp?JSID=<%=JSID%>&FolderID=<%=FolderID%>&Action=<%=Action%>">文章中心</option>
<Option value="AddExtJS.asp?JSID=<%=JSID%>&FolderID=<%=FolderID%>&Action=<%=Action%>">扩展JS</option>
</select>
</td>
<td width="50%"><strong>新建自由JS<%=Action%></strong></td>
</tr>
</table>
<%end if%>
</td>
</tr>
<tr>
<td valign="top">
<%IF Action="Edit" Then
EditUrl=Request.Querystring("EditUrl")
Response.Write("<iframe src=""" & EditUrl &""" name=""JSFrame"" width=""100%"" height=""100%"" frameborder=""0"" scrolling=""auto""></iframe>")
else
Response.Write("<iframe src=""AddWordJS.asp?JSID=" & JSID & "&FolderID=" & FolderID & "&Action=" & Action &""" name=""JSFrame"" width=""100%"" height=""100%"" frameborder=""0"" scrolling=""auto""></iframe>")
End IF%>
</td>
</tr>
</table>
</body>
</html>
<script>
function SelectJSType(ObjValue)
{
frames['JSFrame'].location.href=ObjValue;
}
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -