主题:  哪位能帮偶看看这个无组件上传的程序?

红卫兵

职务:普通成员
等级:1
金币:0.0
发贴:113
#12004/10/14 10:12:14
m_news.asp文件:
<form method="post" action="news_add.asp">
<input type="file" name="file1" size="25">
</form>


news_add.asp文件:
<%
strFileName = Request.Form("file1")
if strfilename<>"" then
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath("upload_pic/news.jpg"),2
objStream.Close
end if
title=request.Form("title")
Ttext=request.Form("text")
Ttime=now()
sql="insert into news(title,Ttext,Ttime) values('"&title&"','"&Ttext&"','"&Ttime&"')"
conn.execute(sql)

conn.close
set conn=nothing
%>

结果报错:
ADODB.Stream 错误 '800a0bba'
文件无法被打开。
/xgh2/news_add.asp,行26
也就是文件无法上传,我在服务器上是好的,能够上传。
但是转到别的电脑通过后台程序进去就无法上传了。
哪位大侠能帮忙看看?



红卫兵

职务:普通成员
等级:1
金币:0.0
发贴:113
#22004/10/15 14:34:32
郁闷啊,没有人愿意帮忙吗?



蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#32004/10/15 14:40:07
要看服务器是否支持,我也碰到过这种情况。


非常大鱼

panliu888

职务:普通成员
等级:1
金币:0.0
发贴:26
#42004/10/15 17:24:06
这是错的。要是这个正确,老农干吗那么费劲写那么长个类?

LoadFromFile 是从本地机器加载文件

form 不以2进制传输,怎么能上传文件呢?