日期:2014-05-17  浏览次数:21021 次

求救!!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你一直在操作服务器上面的文件,没有对客户的文件进行操作阿