showSysJsPath.asp
上传用户:jisenq
上传日期:2014-06-29
资源大小:7216k
文件大小:2k
源码类别:

数据库编程

开发平台:

ASP/ASPX

  1. <% Option Explicit %>
  2. <!--#include file="../../../FS_Inc/Const.asp" -->
  3. <!--#include file="../../../FS_InterFace/MF_Function.asp" -->
  4. <!--#include file="../../../FS_InterFace/ns_Function.asp" -->
  5. <!--#include file="../../../FS_Inc/Function.asp" -->
  6. <%'Copyright (c) 2006 Foosun Inc. Code by awen  UeUo.cn
  7. Dim Conn,sRootDir
  8. Function getCodePath(selectedJS)
  9. Dim Path,tmprs,MF_Domain
  10. MF_Domain = Request.Cookies("FoosunMFCookies")("FoosunMFDomain")
  11. MF_Default_Conn
  12. set tmprs = Conn.execute("Select FileSavePath,FileName from FS_NS_Sysjs where ID="&selectedJS&"")
  13. if  tmprs.eof then 
  14. getCodePath = "无效的ID"
  15. else
  16. path = tmprs("FileSavePath")&"/"&tmprs("FileName")&".js"
  17. path = replace(path,"//","/")
  18. if left(path,1) = "/" then path = mid(path,2)
  19. path = "http://"&MF_Domain&"/"&path
  20. getCodePath="<script src='"&path&"' language=""javascript""></script>"
  21. end if
  22. Conn.close
  23. Set Conn=nothing
  24. End function
  25. %>
  26. <HTML>
  27. <HEAD>
  28. <TITLE>CMS4.0</TITLE>
  29. <link href="../../images/skin/Css_<%=Session("Admin_Style_Num")%>/<%=Session("Admin_Style_Num")%>.css" rel="stylesheet" type="text/css">
  30. </HEAD>
  31. <BODY>
  32. <table width="75%" border="0" align="center" cellpadding="0" cellspacing="1">
  33.   <tr> 
  34.     <td>该JS调用代码为:</td>
  35.   </tr>
  36.   <tr> 
  37.     <td>&nbsp;</td>
  38.   </tr>
  39.   <tr> 
  40.     <td colspan="2"> 
  41. <div align="center"> 
  42.         <textarea name="textfield" cols="60" id="codepath" rows="4"><%=getCodePath(Trim(NoSqlHack(request.queryString("jsid"))))%></textarea>
  43.       </div></td>
  44.   </tr>
  45.   <tr> 
  46.     <td> <div align="center"> 
  47.         <input type="button" name="Submit" value=" 关 闭 " onClick="window.close();">
  48.       </div></td>
  49.   <td> <div align="center"> 
  50.         <input type="button" name="copy" value=" 复 制 " onClick="copyToClipBoard();">
  51.       </div></td>
  52.   </tr>
  53.   <tr> 
  54.     <td height="10" colspan="2">&nbsp;</td>
  55.   </tr>
  56. </table>
  57. </BODY>
  58. <script  language="JavaScript">  
  59. <!--  
  60. function copyToClipBoard()
  61. {
  62. var clipBoardContent=document.getElementById("codepath").value
  63. window.clipboardData.setData("Text",clipBoardContent);
  64. alert("复制成功n<%=G_COPYRIGHT%>");
  65. }
  66. //-->  
  67. </script>  
  68. </HTML>
  69. <!-- Powered by: FoosunCMS4.0系列,Company:Foosun Inc. -->