开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 数据库编程 > 查看源码
Products_Label_styleread.asp
资源名称：eat.rar　[点击查看]
上传用户：jisenq
上传日期：2014-06-29
资源大小：7216k
文件大小：2k
源码类别：

数据库编程

开发平台：

ASP/ASPX

Products_Label_styleread.asp：源码内容
  1. <% Option Explicit %>
  2. <!--#include file="../../FS_Inc/Const.asp" -->
  3. <!--#include file="../../FS_Inc/Function.asp"-->
  4. <!--#include file="../../FS_InterFace/MF_Function.asp" -->
  5. <!--#include file="../../FS_InterFace/MS_Function.asp" -->
  6. <!--#include file="../../FS_Inc/Func_page.asp" -->
  7. <%
  8. Response.Buffer = True
  9. Response.Expires = -1
  10. Response.ExpiresAbsolute = Now() - 1
  11. Response.Expires = 0
  12. Response.CacheControl = "no-cache"
  13. Dim Conn,obj_label_Rs,SQL,regEx,result
  14. MF_Default_Conn
  15. 'session判断
  16. MF_Session_TF 
  17. If Request("id")="" Then
  18. Response.Write "<script language=""JavaScript"" type=""text/javascript"" src=""../../FS_Inc/PublicJs.js""></script>"&vbcrlf
  19. Response.Write "<SCRIPT LANGUAGE=""JavaScript"">ShowErr(""错误：n参数错误"");</SCRIPT>"
  20. Response.End
  21. End If
  22. %>
  23. <html>
  24. <head>
  25. <title>商城标签管理</title>
  26. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  27. <link href="../images/skin/Css_<%=Session("Admin_Style_Num")%>/<%=Session("Admin_Style_Num")%>.css" rel="stylesheet" type="text/css">
  28. <base target=self>
  29. </head>
  30. <body>
  31. <script language="JavaScript" src="../../FS_Inc/PublicJS.js" type="text/JavaScript"></script>
  32. <table width="98%" height="81" border="0" align="center" cellpadding="4" cellspacing="0">
  33.   <tr > 
  34.     <td width="100%" align="center">  
  35. <table width="100%" border="0" align="center" cellpadding="3" cellspacing="1" class="table">
  36.         <%
  37. Set obj_label_Rs = server.CreateObject(G_FS_RS)
  38. SQL = "Select  StyleName,Content,AddDate from FS_MF_Labestyle where id=" & Request.QueryString("id")
  39. obj_label_Rs.Open SQL,Conn,1,3
  40. if not obj_label_Rs.eof then
  41. Set regEx = New RegExp '
  42. regEx.Pattern = "<img(.+?)>" '  
  43. regEx.IgnoreCase = false ' 
  44. regEx.Global = True '  
  45.     result = regEx.replace(obj_label_Rs("Content"),"<img src='../images/default.png'/>") 
  46. %>
  47.         <tr style="display:"  class="hback"> 
  48.           <td height="42" colspan="2"  class="hback"><div><%= result%></div></td>
  49.         </tr>
  50.         <%
  51. obj_label_Rs.close:set obj_label_Rs = nothing
  52.   End if
  53. %>
  54.       </table>
  55.       <div align="center"> 
  56.         <input name="button2" type="button" onClick="window.returnValue='';window.close();" value="关闭窗口">
  57.       </div></td>
  58.   </tr>
  59. </table>
  60. </body>
  61. </html>
  62. <!-- Powered by: FoosunCMS4.0系列,Company:Foosun Inc. -->