一个图片说明与图片一同上传的问题
在影集中每张图片必定会有一段与之相关的说明,但是我不知道怎么才能使说明与图片一同上传到数据库。
下面是我的例子:
=-=-=-=-=-=-=-=-=-=-=-=-=-=-
access
img ole对像
text 备注
=-=-=-=-=-=-=-=-=-==-=-=-=-=
upphoto.htm
----------------------------------
<form enctype="multipart/form-data" action="addpho.asp" method="post">
<input name="img" type="file" size="35">
<textarea name="imgtext" cols="53" rows="8" >相关介绍:</textarea>
<input name="ok" type="submit" value=" 确定 ">
</form>
addpho.asp
----------------------------------
<%
dim rs
dim formsize,formdata,bncrlf,divider,datastart,dataend,mydata
formsize=request.totalbytes
formdata=request.binaryread(formsize)
bncrlf=chrB(13) & chrB(10)
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)
datastart=instrb(formdata,bncrlf & bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
mydata=midb(formdata,datastart,dataend)
%>
<!--#include file="com.asp"-->
<%
sql="select * from img"
set rs=conn.execute(sql)
'id=rs("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "img",conn,3,2
rs.addnew
rs("img").appendchunk mydata
rs.update
rs.close
set rs=nothing
set conn=nothing
%>
<script language="JavaScript">
<!--
window.opener.location="photo.asp"
window.close();
-->
</script>
----------------------------------------完
在addpho.asp中我加入rs("text")=request.form("imgtext")就会报错。
我应该怎么做,谢谢。