config.asp

来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 38 行

<%
if instr(session("manager"),"manager")=0 then
response.write"<SCRIPT language=JavaScript>alert('没有登录不能使用此功能！');"
response.write"javascript:window.close();</SCRIPT>"
End If
%><%
'==========================功能设置=========================
'允许上传的文件大小
Dim File_MaxSize
	File_MaxSize=1024*100	'100k
	

'允许的文件格式
'	所有文件格式之间以"#"号隔开,每个文件类型以“.”开头
Dim TypeOfFile_Enable
	TypeOfFile_Enable=".gif#.jpg#.jpeg#.bmp#.png#.swf"

'预览文件的方式(为ture则是弹出新窗口预览)
	ViewType_Config="flase"


'=========================界面设置=========================
'主窗口系统默认标题
	SoftTitle="<font color='#FFFFFF'></font>风云asp在线：<a href='http://www.fyasp.com' target='_blank'></a>"
'资源管理器的默认宽度
	Win_Min_Width=600
'资源管理器的默认高度
	Win_Min_Height=400
'资源管理器展开部分的高度
	EX_Win_Height=300
'弹出的预览窗口大小
	new_ViewWin_Width=200
	new_ViewWin_Height=200
'窗口边框色彩
	Main_Boder_Color="#aaaaaa"
'窗口标题栏色彩
	Main_Win_Color="#0099CC"
%>