求救!!1图片上传出错!!! 100分
我用以下函数上传图片:
(function.asp)
<% '功能:取得服务端相对图片路径
'参数:客户端图片路径
'返回值:图片路径
Function GetFileName(imagespath)
If imagespath <> " " Then
GetFileName = "UpImages/ " & year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&Right(imagespath,4)
Else
GetFileName = " "
End If
End Function
'功能:用stream组件上传图片
'参数:客户端图片路径
'返回值:成功返回1,失败返回0
Function upImages(imagespath)
Set objStream = Server.CreateObject( "ADODB.Stream ")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile imagespath
objStream.SaveToFile Server.MapPath(GetFileName(imagespath)),adSaveCreateOverWrite
objStream.Close
If ERR.number <> 0 Then
upImages = 0
Else
upImages = 1
End If
End Function
图片保存在UpImages文件夹中,在本机上(localhost)测试没问题,可是传到服务器上测试时出问题了:
“ ADODB.Stream 错误 '800a0bba '
文件无法被打开。
/function.asp,行 20 ”
第二十行:objStream.LoadFromFile imagespath
到底怎么回事?拜托。。
------解决方案--------------------imagespath的值是多少?是服务器上的一个路径么?
------解决方案--------------------http://hi.baidu.com/lael80/blog/item/e8e129adc2080e094b36d699.html
------解决方案--------------------可能你在本地时只是复制文件而不是上传文件
先搞清楚
------解决方案--------------------用客户端图片路径
在服务器怎么可能保存图片
你的方法是在本机复制一个图片而已不是上传
你下个无组件上传看看吧
------解决方案--------------------正如上面说的,lz你一直在操作服务器上面的文件,没有对客户的文件进行操作阿