最新的cms

居然无法远程存图！！

怎么回事　是到本地127.0.0.1 的

请看：

找到KS_CommonCls.asp　1405行

是：

'==================================================
 '过程名：SaveBeyondFile
 '作  用：保存远程的文件到本地
 '参  数：LocalFileName ------ 本地文件名
 '参  数：RemoteFileUrl ------ 远程文件URL
 '==================================================
 Function SaveBeyondFile(LocalFileName,RemoteFileUrl)
  Dim SaveRemoteFile:SaveRemoteFile=True
  dim Ads,Retrieval,GetRemoteData
  Set Retrieval = Server.CreateObject("Microsoft.XMLHTTP")
  With Retrieval
   .Open "Get", RemoteFileUrl, False, "", ""
   .Send　　　　　　　＊＊＊＊＊＊＊＊＊＊＊＊这就是1405行，这是什么语句，为什么找不到？？
   If .Readystate<>4 then
    SaveRemoteFile=False
    Exit Function
   End If
   GetRemoteData = .ResponseBody
  End With
  Set Retrieval = Nothing
  Set Ads = Server.CreateObject("Adodb.Stream")
  With Ads
   .Type = 1
   .Open
   .Write GetRemoteData
   .SaveToFile server.MapPath(LocalFileName),2
   .Cancel()
   .Close()
  End With
  Set Ads=nothing
 end Function
 '****************************************************

应该是服务器环境有问题

重新安装一下应该好点

建议使用win 2003 server

加上一句容错代码

Function SaveBeyondFile(LocalFileName,RemoteFileUrl)

  on error resume next
  Dim SaveRemoteFile:SaveRemoteFile=True