<% 
public mydataname
public mydatapsw
public must_login
public managerfolder
public newwindow
dim path_back
dim hygrace
dim hyarr

mydataname = "#shop7z.asa"		'设置数据库名，即是DATA文件夹下的数据库名。
mydatapsw = ""                    	'设置数据库密码。如果在数据库里设了密码，在这里修改即可。


'1为必须为会员登陆后才可下订单，0为不需登录而以游客的身份购买
must_login="0"				


'后台管理文件夹名
managerfolder = "admin" 	
'如果这里修改，则要将admin文件夹改为相应名，同时后台路径也相应改变
'具体请查看文件<<说明-必读.txt>>


'点击商品名称或图片是否新开窗口, 设为newwindow="target='_blank'"时新开；设为newwindow=""时有原窗口打开
newwindow=" target='_blank' "	  


'设置会员等级名称，每个会员等级用英文逗号分开，5个等级。
hygrace="普通会员,铜级会员,银级会员,金级会员,钻级会员"



'--------------------以下不要修改。-----------------------
path_back=LCase(request.servervariables("QUERY_STRING"))
if instr(path_back,"insert")<>0 or instr(path_back,"update")<>0 or instr(path_back,"delete")<>0 or instr(path_back,"(")<>0 or instr(path_back,"'")<>0 or instr(path_back," or ")<>0 or instr(path_back,"replace")<>0 or instr(path_back,"eval")<>0 then
response.write "<BR><BR><center>你的网址不合法</a>"
response.end
end if

hygrace = trim(hygrace)
if hygrace<>"" then
	hygrace = replace(hygrace,"，",",")
	hygrace = replace(hygrace,",,",",")
	hygrace = ",,"&hygrace
	hyarr=split(hygrace,",")
end if

function mydot(funshu)	'显示0,但没有格式化数字
	if isnumeric(funshu) then
		if cdbl(funshu)<0 and abs(funshu)<1 then
			mydot="-0"&abs(funshu)
		elseif cdbl(funshu)>0 and cdbl(funshu)<1 then
			mydot="0"&abs(funshu)
		else
			mydot=funshu
		end if
	else
		mydot=funshu
	end if
end function
%>
