在page/system/fun.asp里修改,如有问题欢迎讨论.打开搜索'inst这个字符
大概是在231行这样子
public property get inst
dim scriptname,l1,I1,I2,I3,n
if r_inst="" then
'I1=server.mappath("/") 'disabled by xWay
scriptname = lcase(request.servervariables("script_name"))
I2=lcase(server.mappath("../../"))
'r_inst=replace(right(I2,len(I2)-len(I1)),"\","/")&"/"
I3 = split(trim(I2),"\")
l1=ubound(I3)
n= instr(scriptname, I3(l1))
if n>0 then
r_inst = left(scriptname, n +len(I3(l1)))
else
r_inst = "/"
end if
'---------------------------------------------
end if
inst=r_inst
end property
将I2修改为 I2=server.mappath("../../../")
修改理由是,原来的是读出站点物理路径然后再读出文件所在的路径,再计算出实际安装的主目录。