软件采集时 如果下载地址是在新窗口打开的话

对下载地址的采集会出现链接错误

比如 你下载内容页的地址在二级页面 如   http://www.域名/一级路径/软件页面

新窗口打开的是一级页面 如 http://www.域名/下载页面

下载链接在下载页面要是 href="down.asp?xxxxx"

这种情况就会出现错误 采集回来的地址将会是 http://www.域名/一级路径/down.asp?xxxxx

解决方法 找到 Plus\SK_Cj\Inc\cj_cls.asp

打开文件 在开始部分  加入代码  dim NewsUrl2

找到 870行 上下 If DownNewType=1 then'新窗口打开下载连接
  If DownNewlist_s<>"" or  DownNewlist_o<>"" or DownNewUrl_s<>"" or DownNewUrl_o<>"" then

改下上句下面代码为  红色部分为新加跟修改的代码

NewsUrl2=Trim(Skcj.FormatRemoteUrl(DownUrls,NewsUrl))   
   DownUrls=Skcj.ReplaceTrim(Skcj.GetHttpPage(DownUrls,selEncoding))      
   DownUrls=Skcj.GetBody(DownUrls,DownNewlist_s,DownNewlist_o,False,False)
   If DownUrls<>"$False$" then
   
    DownUrls=Skcj.GetBody(DownUrls,DownNewUrl_s,DownNewUrl_o,False,False)
    IF DownUrls<>"$False$" then
     DownUrls=Trim(Skcj.FormatRemoteUrl(DownUrls,NewsUrl2))              
    Else
     FoundErr=True

1619 行 上下 If DownNewlist_s<>"" or  DownNewlist_o<>"" or DownNewUrl_s<>"" or DownNewUrl_o<>"" then
   DownUrls=Replace(DownUrls,"0|下载地址1|","")

NewsUrl2=Trim(Skcj.FormatRemoteUrl(DownUrls,NewsUrl))
   DownUrls=Skcj.ReplaceTrim(skcj.GetHttpPage(DownUrls,selEncoding))
   DownUrls=Skcj.GetBody(DownUrls,DownNewlist_s,DownNewlist_o,False,False)
   If DownUrls<>"$False$" then
    DownUrls=Skcj.GetArray(DownUrls,DownNewUrl_s,DownNewUrl_o,False,False)
    IF DownUrls<>"$False$" then
     i=1 
     TypeUrlArray=Split(DownUrls,"$Array$")
     For Arr_ii=0 to Ubound(TypeUrlArray)
      DownUrls=Trim(Skcj.FormatRemoteUrl(TypeUrlArray(Arr_ii),NewsUrl2))
      If arr_ii=0  then
       DownUrls_i="0|下载地址1|" & DownUrls
       i=i+1
      Else