📄 0153.htm

📁 ASP教程宝典书籍语言：简体中文书籍类型：网络编程授权方式：免费软件书籍大小： 500 KB

💻 HTM

字号:

<html>

<head>
<title>新时代软件教程:操作系统 主页制作 服务器 设计软件 网络技术 编程语言 文字编辑</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
<!--
body, table {font-size: 9pt; font-family: 宋体}
a {text-decoration:none}
a:hover {color: red;text-decoration:underline}
.1  {background-color: rgb(245,245,245)}
-->
</style>
</head>
<p align="center"><script src="../../1.js"></script></a>
    <p align="center"><big><strong>关于图片与文本同存在数据库中的具体思路</strong></big></p>

<div align="right">---摘自互联网</div>

<pre>
首先，你的表单的类型设为 &lt;FORM ENCTYPE="multipart/form-data"
ACTION="uploadresult.asp" METHOD=POST>

Please choose a picture to upload:
&lt;INPUT NAME="picture" TYPE=FILE ACCEPT="image/*">
&lt;input name="text1" type=text >
&lt;/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）等等，但具体思路代码仍是上面的代码。如果
需要可以和我联系。
</pre>

  </table>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -