首先,你的表单的类型设为 <form enctype="multipart/form-data"
action="uploadresult.asp" method=post>
please choose a picture to upload:
<input name="picture" type=file accept="image/*">
<input name="text1" type=text >
</form>
然后在下一页,用分离的办法先分出文本,此时不能用request.form,应变为
formdata = request.binaryread( formsize )
formsize = request.totalbytes
bncrlf = chrb( 13 ) & chrb( 10 )
divider = leftb( formdata, instrb( formdata, bncrlf ) – 1 )
datastart = instrb( formdata, bncrlf & bncrlf ) + 4
dataend = instrb( datastart + 1, formdata, divider ) – datastart
response.contenttype = "image/gif"
response.binarywrite midb( formdata, datastart, dataend )
这里先分出的是图像
然后在将其二进制转换为文本。(见金华区)
求出大小。
formsize = request.totalbytes
之后用总大小减去刚才求出的大小。得出文本大小。然后用字符串函数得出其值。
最后分别存在数据库中。
注意,此方法不能完成另存为文件。因为vbscript中的文件对象不能处理二进制格式。(图象事二进制的)
但vb中可以,所以我们可已利用组件完成以上工作。
我自己使用自己编写的组件,这样即可以完成存为数据库,又可以存位文件。还可以限制大小,文件类型(gif,jpg,htm,exe)等等,但具体思路代码仍是上面的代码。如果需要可以和我联系。
