V6取消程序自动获取域名的步骤

由于近期网络的严打,很多空间商都设置了端口号,即不是原来的默认80端口了,这样程序后台基本信息设置里就会变成带端口号的了.导致前台网页打开不对,我们就来说说如何取消自动获取域名的方法:

解决方法:

需要修改三个文件

第一个 admin/login.asp

找到以下代码

Select Case  KS.G("Action")
 Case "LoginCheck"
  Call CheckLogin()
 Case "LoginOut"
  Call LoginOut()
 Case Else
  Call CheckSetting()
  Call Main()
End Select

把上面加红的删除

第二个文件 admin/index.asp

找到以下代码

  Public Sub Kesion()
      Call CheckSetting()
   Select Case KS.G("Action")
    Case "Head" Call KS_Head()
    Case "Left" Call KS_Left()
    Case "Main" Call KS_Main()
    Case "Foot" Call KS_Foot()
    Case "ver"  Call GetRemoteVer()
    Case Else  Call KS_Index()
   End Select
  End Sub

同样把加红色的删除

第三个文件 admin/ks.system.asp

.Write "   <tr valign=""middle"" class=""tdbg"" onMouseOver=""this.className='tdbgmouseover'"" onMouseOut=""this.className='tdbg'"">"
     .Write "    <td width=""32%"" height=""30"" class=""CleftTitle""> <div align='right'><strong>网站地址：</strong></div><font color=""#FF0000"">系统会自动获得正确的路径，但需要手工保存设置</font></td>"
    .Write "    <td height=""30""> <input name=""Setting(2)"" type=""text""  value=""" &KS.GetAutoDomain & """ size=""30"">"
    .Write "      (请使用http://标识),后面不要带&quot;/&quot;符号 </td>"
    .Write "   </tr>"

把上面红色的改成 Setting(2)

通过修改以上三个文件,就可以手工录入你的域名了,而不是程序自动获取