asp文件删除奇怪现象

[alsogood]

function SaveFile(LocalFileName,RemoteFileUrl)
Dim Ads, Retrieval, GetRemoteData ,
Set Retrieval = Server.CreateObject("Microso" & "ft.XM" & "LHTTP") '//把单词拆开防止杀毒软件误杀
With Retrieval
.Open "Get", RemoteFileUrl, False, "", ""
.Send
GetRemoteData = .ResponseBody
End With
Set Retrieval = Nothing
Set Ads = Server.CreateObject("Ado" & "db.Str" & "eam") '//把单词拆开防止杀毒软件误杀
With Ads
.Type = 1
.Open
.Write GetRemoteData
.SaveToFile Server.MapPath(LocalFileName), 2
.Cancel()
.Close()
End With
Set Ads=nothing
if err <> 0 then
SaveFile = False
response.write"err,"
err.clear
else
SaveFile = true
end if
End Function
调用此函数传入的2个参数没问题，但有时候能执行成功有时候不能，搞不明白此函数有何不妥，望高手给我个解决办法 谢谢了

[alsogood]

奇怪就是在 执行同一个操作有时候能成功，有时候不成功response.write"err,"

[影子tec]

可能与字符编码有关，或者权限问题吧

[alsogood]

能具体说下吗？权限问题不可能有时候行啊

[zl_c]

要找出具体错误是什么：

Response.Write(Err.Number & Err.Description)

[fishidea]

if err <> 0 then => if err.number<>0 then

[Dogfish]

看看你的err是在哪里产生的。不一定是在你锁定的几行。

[alsogood]

这样做了 但是错误提示的是err

[alsogood]

提示错误 0

[alsogood]

还有人回答吗??

[alsogood]

网络访问量大时就要出现写入失败问题,网络不忙时没问题

[空心兜兜]

没发现怎么问题...

[alsogood]

???来人啊