关于图片与文本同存在数据库中的具体思路 (1)

首先，你的表单的类型设为 %26lt;FORM ENCTYPE=%26quot;multipart/form-data%26quot;
ACTION=%26quot;uploadresult.asp%26quot; METHOD=POST%26gt;

Please choose a picture to upload:
%26lt;INPUT NAME=%26quot;picture%26quot; TYPE=FILE ACCEPT=%26quot;image/*%26quot;%26gt;
%26lt;input name=%26quot;text1%26quot; type=text %26gt;
%26lt;/form%26gt;
然后在下一页，用分离的办法先分出文本，此时不能用request.form，应变为
FormData = Request.BinaryRead( FormSize )

FormSize = Request.TotalBytes
bnCRLF = chrB( 13 ) %26amp; chrB( 10 )
Divider = LEFTB( FormData, INSTRB( FormData, bnCRLF ) - 1 )
DataStart = INSTRB( FormData, bnCRLF %26amp; bnCRLF ) + 4
DataEnd = INSTRB( DataStart + 1, FormData, divider ) - DataStart
Response.ContentType = %26quot;image/gif%26quot;
Response.BinaryWrite MIDB( FormData, DataStart, DataEnd )

这里先分出的是图像
然后在将其二进制转换为文本。
求出大小。

FormSize = Request.TotalBytes
之后用总大小减去刚才求出的大小。得出文本大小。然后用字符串函数得出其值。
最后分别存在数据库中。

注重，此方法不能完成另存为文件。因为Vbscript中的文件对象不能处理二进制格式。（图象事二进制的）
但Vb中可以，所以我们可已利用组件完成以上工作。
我自己使用自己编写的组件，这样即可以完成存为数据库，又可以存位文件。还可以限制大小，文件类型（gif，jpg，Htm，exe）等等，但具体思路代码仍是上面的代码。假如需要可以和我联系。