你看看这样行不行
<%
'请不要轻易修改此文件
'请不要使用回车符号
'如果你对全局变量不了解，请详细查看软件附带的程序使用说明
' 系统的虚拟目录，F4，Test/F4
Const G_VIRTUAL_ROOT_DIR = "corpsite/foosun4/"
'管理目录，Admin、Test/Admin；
Const G_ADMIN_DIR = "corpsite/foosun4//Admin"
'用户目录，User、Test/User；
Const G_USER_DIR = "corpsite/foosun4//User"
'用户文件目录，User、Test/User；
Const G_USERFILES_DIR = "corpsite/foosun4//UserFiles"
'生成文件保存路径，Html，Test/Html；
Const G_HTML_DIR = "corpsite/foosun4//html"
'上传文件保存目录
Const G_UP_FILES_DIR = "corpsite/foosun4//Files"
'模板文件目录，Templets，Test/Templets；
Const G_TEMPLETS_DIR = "corpsite/foosun4//Templets"
'控件加载配置目录名
Const G_DBCONFIGFILE_DIR = "DBConfigFiles"
'请注意不要加虚拟目录；
Const G_DATABASE_CONN_STR = "Foosun_Data/corpsite/foosun4/400.mdb"
'归档数据库；
Const G_Old_News_DATABASE_CONN_STR = "Foosun_Data/OldNews.mdb"
'会员数据库,请注意不要加虚拟目录；
Const G_User_DATABASE_CONN_STR = "Foosun_Data/corpsite/foosun4/_ME.mdb"
'IP地址库,请注意不要加虚拟目录；
Const G_IP_DATABASE_CONN_STR = "Foosun_Data/AddressIp.mdb"
'登录日志、错误日志、操作日志保留天数，默认为7；
Const G_HOLD_LOG_DAY_NUM = "7"
'系统版本信息，"\n\n FoosunCMS V4.0.0301"；
Const G_COPYRIGHT = "\n\n FoosunCMS V4.0.0"
'安全密码参数设置，“0,3,4,2,0”；
'作用：有人通过下载数据库或SQL注入得到了管理员的真正密码后，仍不能进入系统
'第1位 是否启用安全密码 为0时则不启用 为1时启用
'第2位 取验证码中的第几位参与运算，取1-4之间的数字
'第3位 取验证码中的第几位参与运算，取1-4之间的数字
'第4位 将取得的两位验证码作什么运算，1为加法运算；2为乘法运算
'第5位 将得到的结果插入到密码的第几位后面
'
'例如安全码参数设置为1，1，3，2，5 即为启用安全码，将验证码的第一位和第三位相乘的结果插入到
密码的第五位后面
'如果你登陆时 产生的验证码为3568 管理员密码为TryLogin
'则你应该输入的密码为TryLo18gin
'如果开启了验证码中有随机字母，请不要使用此功能
Const G_SAFE_PASS_SET_STR = "0,1,2,2,0"
'主系统是Sql数据库；1SQL,0ACCESS
Const G_IS_SQL_DB = 0
'会员系统是Sql数据库；1SQL,0ACCESS
Const G_IS_SQL_User_DB = 0
'Session超时,1为永不过期，0为10分钟过期
Const G_SESSION_TIME_OUT = 1
'脚本超时
Const G_SERVER_SCRIPT_TIME_OUT = 600
'系统登陆安全是否验证到数据库中,0不验证到数据库中，1验证到数据库中
Const G_SESSION_GETDATA = 0
'新闻刷新频率
'第一参数：表示多少秒刷新一次，第二个参数代表每次刷新多少个记录
Const G_REFRESH_SPEED = "1,5"
'■■■■■■■服务器组件变量开始
'Scripting.Dictionary；
Const G_corpsite/foosun4/_DICT = "Scripting.Dictionary"
'Scripting.FileSystemObject；
Const G_corpsite/foosun4/_corpsite/foosun4/O = "Scripting.FileSystemObject"
'Adodb.Stream；
Const G_corpsite/foosun4/_STREAM = "Adodb.Stream"
'Adodb.RecordSet；
Const G_corpsite/foosun4/_RS = "Adodb.RecordSet"
'Microsoft.XMLHTTP；
Const G_corpsite/foosun4/_HTTP = "Microsoft.XMLHTTP"
'MSXML2.XMLHTTP
Const G_corpsite/foosun4/_XMLHTTP = "MSXML2.XMLHTTP"
'Adodb.Connection；
Const G_FS_CONN = "Adodb.Connection"
'-归档参数设置
Const G_DATA_OLD_PATH = "Foosun_Data/OldNews.mdb"
'归档数据库类型，0为ACCESS数据库，1为SQL数据库
Const G_DATA_SQL = 0
'前台搜索模式,0为普通模式，1为带时间搜索
Const G_SEARCH_TYPE = 1
'归档模板地址,修改模板，请把相应的标签设定好
Const G_OLD_TEMPLET_PATH="/Templets/OldNews/Index.htm"
'广告系统目录
'采集设置
Const G_COLLECT_DATA_STR = "Foosun_Data/Collect.mdb"
Const CollectMaxOfOnePage = 8
'新添加常量
'Const G_VIRTUAL_ROOT_DIR = "" '和主系统中的此变量合并
Const G_NEWS_LIST_PAGES_NUMBER = 300 '采集新闻列表分页最大数量
Const G_SAVE_FILE_PATH = "File"
'response.Charset="gb2312"
%>
