另一个是admin/ks.system.asp(当ks_inc目录禁止修改里需要修改如下代码)
找到如下
RS("TBSetting")=ThumbSetting
RS.Update
Dim FSO, FileObj, FileStreamObj,FileContent,FileName
Set FSO = CreateObject(KS.Setting(99))
FileName = Server.MapPath("../KS_Inc/ajax.js")
Set FileObj = FSO.GetFile(FileName)
Set FileStreamObj = FileObj.OpenAsTextStream(1)
If Not FileStreamObj.AtEndOfStream Then
FileContent = FileStreamObj.ReadAll
FileContent=GetAjaxInstallDir(FileContent,installdir)
Set FileObj = FSO.CreateTextFile(FileName, True)
FileObj.Write FileContent
End If
Set FSO = Nothing:Set FileObj = Nothing:Set FileStreamObj = Nothing
这个是自动获取安装目录,自动修改ks_inc/ajax.js的里安装目录文件,也可以需要删除!
问一下。是需要删除这部分红色代码吗?