Config.asp
上传用户:jiajie98
上传日期:2020-04-24
资源大小:1206k
文件大小:1k
源码类别:

网格计算

开发平台:

PHP

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
  2. <%
  3. Option Explicit
  4. Session.CodePage=65001
  5. Response.ContentType = "text/html"
  6. Response.Charset = "utf-8"
  7. Response.Expires=-999
  8. Session.Timeout=999
  9. Dim StartTime,EndTime
  10. StartTime=Timer()
  11. '==========================================
  12. '文 件 名:Config.asp
  13. '文件用途:系统配置
  14. '版权所有:方卡在线
  15. '==========================================
  16. %>
  17. <!--#Include File="../Class/Cls_DB.asp"-->
  18. <!--#Include File="../Class/Cls_Fso.asp"-->
  19. <!--#Include File="../Class/Cls_Fun.asp"-->
  20. <%
  21. '定义页面常量
  22. Dim Id,i,j,PageErr,Types,Temp,TempArr,Login,Fso,F,objAdoStream,SearchStr,SearchType
  23. Dim Conn,Rs,Sqlstr
  24. Dim PageNow,PageCounts,PageSizes,PageAll
  25. Dim SiteName,SiteUrl,SiteKeyword,SiteDescription,SiteOpen,SiteTemplate,SiteHtml,SiteData,SiteDir,SiteToPinyin,FetionNum,FetionPass
  26. Dim FKDB,FKFun,FKFso
  27. Dim FKModuleId,FKModuleName
  28. '置默认值
  29. Set FKDB=New Cls_DB
  30. Set FKFun=New Cls_Fun
  31. Set FKFso=New Cls_Fso
  32. Login=False
  33. FKModuleId=Split("0,1,2,7,3,4,5,6",",")
  34. FKModuleName=Split("静态模块,文章模块,产品模块,下载模块,信息模块,留言模块,转向链接,招聘模块",",")
  35. %>
  36. <!--#Include File="Site.asp"-->
  37. <!--#Include File="Conn.asp"-->
  38. <!--#Include File="System.asp"-->