这是写入数据的全部代码
Request 对象 错误 'ASP 0208 : 80004005'
不能使用一般 Request 集合
/light1/picturew.asp,行 42
调用 BinaryRead 之后,不能使用一般 Request 集合。
提示这个,这个要怎么处理,会不会是 UpLoadClass.asp 这个的问题
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
<%
Server.ScriptTimeOut=5000
%>
<!--#include file=
"conn.asp"
-->
<!--#include file=
"UpLoadClass.asp"
-->
<%
dim request2
set request2=
New
UpLoadClass
'设置文件允许的附件类型为jpg(可用gif)
request2.FileType=
"jpg/JPG"
'设置服务器文件保存路径
request2.SavePath=
"pic/"
'单文件最大1mb
request2.MaxSize =1024*100
'自动生成无重复文件名保存目标文件
request2.AutoSave = 0
request2.open
pic=
""
select case request2.form(
"propic_Err"
)
case 1:
response.write
"<script language='javascript'>"
response.write
"alert('文件太大,上传失败!');"
response.write
"window.history.back();"
response.write
"</script>"
response.end
case 2:
response.write
"<script language='javascript'>"
response.write
"alert('文件格式错误,上传失败!');"
response.write
"window.history.back();"
response.write
"</script>"
response.end
case 3:
response.write
"<script language='javascript'>"
response.write
"alert('文件大小超过限定并且格式错误,上传失败!');"
response.write
"window.history.back();"
response.write
"</script>"
response.end
case 0:
pic=request2.form(
"propic"
)
end select
set rs=server.CreateObject(
"adodb.recordset"
)
if request(
"id"
)=
""
then
rs.open
"select * from light where id="
&request(
"id"
),conn,1,3
end if
rs.addnew
rs(
"picname"
)=pic
rs(
"pictime"
)=date()
rs.update
rs.close
response.write
"<script language='javascript'>"
response.write
"if(confirm('发布成功,是否继续发布?'))"
response.write
"{window.location.href='picture.asp';}"
response.write
"else{window.location.href='picturelist.asp';}"
response.write
"</script>"
|
Request 对象 错误 'ASP 0208 : 80004005'
不能使用一般 Request 集合
/light1/picturew.asp,行 42
调用 BinaryRead 之后,不能使用一般 Request 集合。
提示这个,这个要怎么处理,会不会是 UpLoadClass.asp 这个的问题