|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
首先,你的表单的类型设为 <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)等等,但详细思路代码仍是上面的代码。假如需要可以和我联系。 返回类别: 教程 上一教程: 如何在不刷新页面的情况下调用远程ASP 下一教程: 防止别人在QUERYSTRING中加入DELETE或其他字符删除你的数据库内容 您可以阅读与"关于图片与文本同存在数据库中的详细思路"相关的教程: · 无组件图片与文本同步存入数据库的最简朴的办法 · 用ADODB.STREAM将以二进制方法保存在数据库中的文件保存到硬盘 · 如何把存储在数据库中的图片根据自己的需要的大小显示出来 · 如何准确显示数据库中的图片 · 用VB6读写数据库中的图片 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |