![]() |
#2
multiple19O22008-06-08 22:07
|
Dim UP
Set UP = Server.CreateObject("ADODB.Stream")
UP.Type = 1
UP.Open
UP.LoadFromFile FromFile '表单传过来的文件
UP.SaveToFile Server.MapPath(FilePath & FileName),2
UP.Close
If Err Then
Err.Clear
Response.End
End If
上面的代码在IE6.0的时候可以上传,但在IE8.0/火狐浏览器,就出现文件无法被打开的错误
这个问题怎么解决呀.~~~~