28,408
社区成员
发帖
与我相关
我的任务
分享救命！！！文本和图片一起提交上传问题，文本在前，图片在后，二进制图片的识别符是什么，怎么取出图片数据
文本和图片一起提交上传问题，文本在前，图片在后，二进制图片的识别符是什么，怎么取出图片数据，图片和文本都是通过Request.TotalBytes获得，文本开始是以文件名来识别，结束以“--”识别，图片呢，怎么取出数据，谁能告诉我，马上揭帖！
...全文
请发表友善的回复…
发表回复
bp69 2004-12-16
- 打赏
- 举报
是有点，但是只要知道图片的标识符就好办
diya 2004-12-16
- 打赏
- 举报
不过个人觉得还是用 yb2008(努力学ASP.NET!!) 的方法比较好，因为如果是多个数值和图片一起都以二进制存入表的话，要拆离这些数据和图片会很麻烦。
bp69 2004-12-16
- 打赏
- 举报
help
diya 2004-12-16
- 打赏
- 举报
帮顶~~~~~~~~~！
bp69 2004-12-16
- 打赏
- 举报
不行啊，要求把图片存到数据库中
yb2008 2004-12-16
- 打赏
- 举报
尽量不要把图片传到数据库中,我这种是传到指定的文件夹!
http://www.hc189.com/upload.rar
http://www.hc189.com/upload.rar
bp69 2004-12-16
- 打赏
- 举报
好像没有啊，我想问的是：，二进制数据，文本在前，图片在后，二进制图片的识别符是什么，开始和结束都是什么
bp69 2004-12-16
- 打赏
- 举报
去看看
xxrl 2004-12-16
- 打赏
- 举报
http://community.csdn.net/Expert/FAQ/List_Room_FAQ_Index.asp?Roomid=301
chenypluck 2004-12-16
- 打赏
- 举报
上面的朋友说的很好
建议不要把图片存到数据库中，我是走过弯路的
如果实在要：参考
无组件图片与文本同步存入数据库的最简单的办法
建一个库：access2000中，先建好一个Test.mdb的数据库。具体有四个字段。
id | text1 | text2 | img
自动编号 文本 文本 OLE对象 ’如果是sql server 则选择(image即可)
建上传表单：
upload.asp(具体代码如下)
<% @ language=vbscript %>
<html>
<head>
<meta name="VI60_defaultClientScript" content="VBScript">
<title> File Upload </title>
<script ID="clientEventHandlersVBS" LANGUAGE="vbscript">
<!--
Sub form2_onsubmit //** 这里是关键，当form2在提交的过程中时，即活form1的提交
form1.submit //**所以我们这里用了两个表单，但只用一个提交就可以了。
End Sub
-->
</script>
</head>
<body>
<form name="form1" ENCTYPE="multipart/form-data" ACTION="upimage.asp" METHOD="POST" target="_blank">
Please choose a picture to upload: <br>
<input NAME="picture" TYPE="FILE"> <br>
</form>
<form name="form2" action="uptext.asp" method="post">
<input type="text" name="text1"><br>
<input type="text" name="text2"><br>
<input type="submit" value="提交">
</form>
</body>
</html>
uptext.asp (代码如下)
<% @ language=vbscript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
text1=request.form("text1")
text2=request.form("text2")
response.write text1
response.write text2
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC" ’这里的意思是选择最后一个Id,既刚刚被改动
rs.Open sql,strconn,1,3 ’就是你上传的图像的两个文本字段。
rs("text1")=text1 ’注意，这里是改动不是添加，所以不用addnew。
rs("text2")=text2
rs.Update
rs.Close
%>
upimage.asp (具体代码如下)
<%
FormSize = Request.TotalBytes ’得到数据
FormData = Request.BinaryRead( FormSize )
function ImageUp(formsize,formdata) ’这个函数的功能是截取其中的图像部分。
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
imageup=midb(formdata,datastart,dataend)
end function
Image=ImageUp (FormSize,Formdata) ’这里就是图像部分了。
set rs=server.CreateObject("adodb.recordset")
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
sql="SELECT * FROM imgtable"
rs.Open sql,strconn,1,3
rs.AddNew ’因为表单二在表单一提交的过程中下提交了。
rs("img").appendchunk Image ’所以这里是添加。
rs.Update
rs.Close
response.contenttype="image/gif"
response.binarywrite imageup(formsize,formdata) ’这里是显示图像。表示成功！
%>
四：“显示，我要同页显示”
终于完成了图文同步提交。（真的是同步吗？不是吗？是吗？ 唉，我们只是为了解决问题。何必当真哪？不
是 吗？）
现在我们还要让他同页显示出来。其实，这是同样的思路。我们也用两页来完成。
主页面：show.asp
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC"
rs.Open sql,strconn,1,3
%>
<html>
<body>
以下是你的上传资料。<br>
文本一：<% Response.Write rs("text1") %><br>
文本二：<% Response.Write rs("text2") %><br>
你的图像：
<img src=showimg.asp?id=<%=rs("id")%>> ’注意这里，这才是关键。他可以实现网页图像与文本
</body> ’共存。
</html>
幕后页面：showimg.asp （说他是幕后的页面，因为他潜伏在主页面里。看上是一个页面一样）
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
id=Request("id")
set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM imgtable where id="&id
rs.Open sql,strconn,1,3
response.contenttype="image/gif"
Response.BinaryWrite rs("img")
%>
建议不要把图片存到数据库中，我是走过弯路的
如果实在要：参考
无组件图片与文本同步存入数据库的最简单的办法
建一个库：access2000中，先建好一个Test.mdb的数据库。具体有四个字段。
id | text1 | text2 | img
自动编号 文本 文本 OLE对象 ’如果是sql server 则选择(image即可)
建上传表单：
upload.asp(具体代码如下)
<% @ language=vbscript %>
<html>
<head>
<meta name="VI60_defaultClientScript" content="VBScript">
<title> File Upload </title>
<script ID="clientEventHandlersVBS" LANGUAGE="vbscript">
<!--
Sub form2_onsubmit //** 这里是关键，当form2在提交的过程中时，即活form1的提交
form1.submit //**所以我们这里用了两个表单，但只用一个提交就可以了。
End Sub
-->
</script>
</head>
<body>
<form name="form1" ENCTYPE="multipart/form-data" ACTION="upimage.asp" METHOD="POST" target="_blank">
Please choose a picture to upload: <br>
<input NAME="picture" TYPE="FILE"> <br>
</form>
<form name="form2" action="uptext.asp" method="post">
<input type="text" name="text1"><br>
<input type="text" name="text2"><br>
<input type="submit" value="提交">
</form>
</body>
</html>
uptext.asp (代码如下)
<% @ language=vbscript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
text1=request.form("text1")
text2=request.form("text2")
response.write text1
response.write text2
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC" ’这里的意思是选择最后一个Id,既刚刚被改动
rs.Open sql,strconn,1,3 ’就是你上传的图像的两个文本字段。
rs("text1")=text1 ’注意，这里是改动不是添加，所以不用addnew。
rs("text2")=text2
rs.Update
rs.Close
%>
upimage.asp (具体代码如下)
<%
FormSize = Request.TotalBytes ’得到数据
FormData = Request.BinaryRead( FormSize )
function ImageUp(formsize,formdata) ’这个函数的功能是截取其中的图像部分。
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
imageup=midb(formdata,datastart,dataend)
end function
Image=ImageUp (FormSize,Formdata) ’这里就是图像部分了。
set rs=server.CreateObject("adodb.recordset")
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
sql="SELECT * FROM imgtable"
rs.Open sql,strconn,1,3
rs.AddNew ’因为表单二在表单一提交的过程中下提交了。
rs("img").appendchunk Image ’所以这里是添加。
rs.Update
rs.Close
response.contenttype="image/gif"
response.binarywrite imageup(formsize,formdata) ’这里是显示图像。表示成功！
%>
四：“显示，我要同页显示”
终于完成了图文同步提交。（真的是同步吗？不是吗？是吗？ 唉，我们只是为了解决问题。何必当真哪？不
是 吗？）
现在我们还要让他同页显示出来。其实，这是同样的思路。我们也用两页来完成。
主页面：show.asp
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC"
rs.Open sql,strconn,1,3
%>
<html>
<body>
以下是你的上传资料。<br>
文本一：<% Response.Write rs("text1") %><br>
文本二：<% Response.Write rs("text2") %><br>
你的图像：
<img src=showimg.asp?id=<%=rs("id")%>> ’注意这里，这才是关键。他可以实现网页图像与文本
</body> ’共存。
</html>
幕后页面：showimg.asp （说他是幕后的页面，因为他潜伏在主页面里。看上是一个页面一样）
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
id=Request("id")
set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM imgtable where id="&id
rs.Open sql,strconn,1,3
response.contenttype="image/gif"
Response.BinaryWrite rs("img")
%>
leisang 2004-12-16
- 打赏
- 举报
晕倒，为什么很多人都不看题目本身。
楼主我的问题跟你一样，
http://community.csdn.net/Expert/topic/3648/3648103.xml?temp=.1749536
楼主我的问题跟你一样，
http://community.csdn.net/Expert/topic/3648/3648103.xml?temp=.1749536
bp69 2004-12-16
- 打赏
- 举报
help，大家帮忙看看，知道的告诉我，3Q
我是杨威利 2004-12-16
- 打赏
- 举报
mark
bp69 2004-12-16
- 打赏
- 举报
up
