txlconst.asp

同学录的设计

<%@ LANGUAGE=VBScript CodePage=936%>
<%Option Explicit
Response.Buffer = True

  If application("SiteEnableFlag")="" Then application("SiteEnableFlag") = 1
  If application("SiteEnableFlag")=0 and application("SiteDisbledescription")<>"" and inStr(Replace(Lcase(Request.ServerVariables("URL")),"\","/"),"/manage/") = 0 Then
    Response.Write" 由于以下原因，本同学录暂时关闭：<br>"&application("SiteDisbledescription")
    Response.End
  End If

  Const	const_admin="网络侠客|855660"
  Const	const_txlname="葛洲坝高级中学2003届2班"
  Const	const_txlurl="index.asp"
  Const	const_homepagename="自由空间"
  Const	const_homepageurl="http://99167.jahee.com/class2"
  Const	const_AccessDatabase="data/txl.mdb"
  Const	const_txllogourl="images/logo.jpg"
  Const	const_copyright="Copyright <font size=2>&copy;</font> 2003&nbsp;-2004 2003届2班  版权所有"
  Const	const_adminname="网络侠客"
  Const	const_adminemail="[e-mail]"
  Const	const_BadWordString="你妈|fuck|奶奶的|傻B|法轮|法轮功"
  Const	const_FaceUploadurl="img/"
  Const	const_photoup_path="upfile/"
  Const	const_faceuploadurl2="upface/"
  Const	const_emoturl="emot/"
  Const	const_banner=""
  Const	const_PhotoFormat=".gif,.jpg,.bmp,.swf"

  Const	const_welcomemessage=1
  Const	const_welcomeemail=1
  Const	const_UserOnlineTimeOut=1200
  Const	const_emailmode=1
  Const	const_uploadcomponent=1
  Const	const_EnableUploadface=1
  Const	const_MaxUploadFaceSize=20
  Const	const_FaceHeight="20|120"
  Const	const_FaceWidth="20|120"
  Const	const_EnableSignUBBCode=1
  Const	const_PhotoMaxSize=300
  Const	const_EnableMessageUBBCode=1
  Const	const_index_chat=0
  Const	const_ordersong_renum=10
  Const	const_ordersong_saveday=20
  Const	const_ordersong_contentnum=250
  Const	const_ordersong_songfmt="mp3|wma|rm|asf"


  Const	const_secret_set=1
  Const	const_friend_regset=1
  Const	const_friend_loginset=1
  Const	const_forum_login_limit=0
  Const	const_bbs_login_limit=0
  Const	const_photo_login_limit=0
  Const	const_classmateinfo_login_limit=1
  Const	const_upphoto_limit=0


%>