解决办法:
打开 syscls/Common.asp ,然后找到 第498行
'**************************************************
'函数名:GetAutoDoMain()
'作 用:取得当前服务器IP 如:http://127.0.0.1
'参 数:无
'**************************************************
Function GetAutoDomain()
Dim TempPath
If Request.ServerVariables("SERVER_PORT") = "80" Then
GetAutoDomain = Request.ServerVariables("SERVER_NAME")
Else
GetAutoDomain = Request.ServerVariables("SERVER_NAME") & ":" & Request.ServerVariables("SERVER_PORT")
End If
TempPath = Request.ServerVariables("APPL_MD_PATH")
TempPath = Right(TempPath, Len(TempPath) - InStr(TempPath, "Root") - 3)
GetAutoDomain = "http://" & GetAutoDomain & TempPath
End Function
把最后加红的三行删除即可
[此贴子已经被作者于2006-4-17 22:12:55编辑过]