用纯ASP代码实现图片上传并存入数据库中如何写呀?
以下是网上找的,可实现不了,不知它错在哪?谁有现成的发来呀.7 T! `+ w8 Z- @. c: c: |
<% & z: L* R C/ C5 Z& o% f7 c! B
response.buffer=true
$ r# F" r: y0 m5 {9 @4 h* H* t! D! ^% Aformsize=request.totalbytes . c; V7 L [1 f, B/ |
formdata=request.binaryread(formsize)
" |+ K0 \' Z7 P* A/ ] bbncrlf=chrB(13)&chrB(10)
; ? M- y0 i; m8 b( O" `5 ^/ \0 Edivider=leftB(formdata,clng(instrb(formdata,bncrlf))-1) : O7 N* I+ d) F+ H
datastart=instrb(formdata,bncrlf&bncrlf)+4
! ^- h3 t; L% y0 N+ mdataend=instrb(datastart+1,formdata,divider)-datastart
+ K! q6 m( ^- P! [! |* Vmydata=midb(formdata,datastart,dataend) / U( T6 t. R1 J5 ^* t
set conn=server.CreateObject("adodb.connection")
2 s3 m! m$ H9 m3 V6 M1 Idsn="driver={microsoft access driver (*.mdb)};"
" m6 t: D, ^5 h9 ~( ddsn=dsn&"dbq="&server.MapPath("ubload.mdb") }! z1 {1 ^- }* G- s7 I0 s
conn.open dsn: g: n( R& |6 ^% p/ U, o, [
set rs=server.createobject("ADODB.recordset") Y' ^' \( i9 H* P
sql="SELECT * FROM imagegook"$ p5 \! i7 z" E6 k3 i: a1 O
rs.open sql,conn,1,3! H' d1 z6 m2 b3 m7 u
rs.addnew - f _6 K4 c' g) ]! E5 {% _
rs("img").appendchunk mydata 5 V4 j7 b2 e% _# z* _$ G
rs.update % Y9 A/ p y" [2 J
rs.close
0 b" |$ G Q& B9 W8 M6 Q! mset rs=nothing
4 n3 [# q( B) S7 Jset conn=nothing : T5 O6 a6 ~3 L; [6 x$ e) B
%>
