📄 图像2.txt
字号:
回复:请问如何无组件上传图像？
--------------------------------------------------------------------------------
【梦】 于 2000-06-01 13:09:50 加贴在 Joy ASP ↑
<HTML>
<HEAD><TITLE> File Upload </TITLE></HEAD>
<BODY>
<FORM ENCTYPE="multipart/form-data"
ACTION="uploadresult.asp" METHOD=POST id=form1 name=form1>
Please choose a picture to uploads:
<BR><INPUT NAME="picture" TYPE=FILE ACCEPT="image/gif">
<BR><INPUT TYPE=SUBMIT VALUE="Submit Me!" id=SUBMIT1 name=SUBMIT1>
</FORM>
</BODY>
</HTML>
uploadresult.asp:
<%
FormSize = Request.TotalBytes
FormData = Request.BinaryRead( FormSize )
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 )
%>
1。数据库庞大有两种，一是数据量大，二是数据本身大，图象属于数据本身大，与数据库速度关系影响不大（个人观点），数据量庞大对数据库性能影响是比较大的。
2。HTML一般是顺序读取的，但遇到图象等内容时的确会滞后显示，如果数据库不是特别慢的话，这种区别（数据库与非数据库）不太明显。
3。图象存储在数据库中易于管理，如查询，删除，清空等，仅存储文件名的方式易于实现，速度快，但文件量一旦增大，势必带来麻烦。
回复:各位高手，如何将存入数据库中的图像（二进制）显示在IE上，谢谢
--------------------------------------------------------------------------------
【steeling】 于 2000-04-19 10:41:36 加贴在 Joy ASP ↑
我这里有个例程
<%
'**************************************
'文 件 名：download.asp
'使用方法：download.asp?fid=xxx
'说 明：把SQL7的image字段存储的文件下载到客户端
'数据库结构：[表名]tabimage {fid int not null;filename varchar(100) not null;filecontent image not null}
' fid:文件id [PK]；filename:文件名；filecontent:文件二进制内容
'**************************************
Response.Buffer=True
varfileid = Request("fid")
If varfileid="" Then
Response.write "没有指定下载文件ID。"
Response.End
End If
OpenDB conn
SQL = "SELECT filename,filecontent FROM tabimage WHERE fid=" & varfileid
Set rs = conn.Execute(SQL)
If Not rs.Eof Then
varfilename = rs("filename")
varfilesize=rs("filecontent").ActualSize
varcontent = rs("filecontent").GetChunk(varfilesize)
Response.ContentType = "*/*"
Response.AddHeader "Content-Length",varfilesize
Response.AddHeader "Content-Disposition", "attachment;filename=""" & varfilename & """"
Response.binarywrite varcontent
End If
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.End
'连接数据库通用过程
Sub OpenDB (ByRef conn)
Set conn = Server.CreateObject("ADODB.Connection")
conn.provider="sqloledb"
conn.ConnectionString = "driver={SQL Server};server=xxx.xxx.xxx.xxx;uid=myusername;pwd=mypassword;database=mydatabase"
conn.Open
End Sub
%>
现在想请教，你是怎样把图象写到数据库中去的？
通过浏览器码？ 我的数据库是SQL_server
我根本不用GetChunk(750000)
--------------------------------------------------------------------------------
【johnking】 于 2000-07-20 00:37:40 加贴在 Joy ASP ↑
<%@ LANGUAGE="VBSCRIPT" %>
<%
Response.ContentType = "image/gif"
%>
<%set conn=server.createobject("adodb.connection")
conn.conntionstring="provider=msdasql;dsn=testfile;uid=sa;pwd="
conn.open
sql="select * from [tablename]"
set rdset=server.createobject("adodb.recordset")
rdset.open sql,conn,3%>
<%Response.BinaryWrite rdset("filecontent")'这就是显示图片的东西
conn.close
set rdset=nothing
set conn=nothing
%>
复:图片直接上传到数据库用rs.addnew, 如果我是先建立个人资料，然后再上传图片，应该怎么办？
--------------------------------------------------------------------------------
【十一月雨】 于 2000-07-19 11:22:16 加贴在 Joy ASP ↑
建资料时用session记录字段的ID
[ 转发帖子 回复此帖 相关帖子 ]
--------------------------------------------------------------------------------
相关帖子：用session 记录字段ID
图片直接上传到数据库用rs.addnew, 如果我是先建立个人资料，然后再上传图片，应该怎么办？ <无内容> - 【朵灵】 2000-07-19 10:33:24 [ID:357961 点击:3] (0 Bytes) (3)
回复:图片直接上传到数据库用rs.addnew, 如果我是先建立个人资料，然后再上传图片，应该怎么办？ - 【十一月雨】 2000-07-19 11:22:16 [ID:358083 点击:7] (29 Bytes) (0)
可以分两个字段,用一个外健连 <无内容> - 【天啦】 2000-07-19 10:40:32 [ID:357975 点击:3] (0 Bytes) (1)
增加一个字段imageid;建一个表存放图片,其ID存到第一个表的imageid.可以吗? <无内容> - 【elife】 2000-07-19 10:39:17 [ID:357973 点击:0] (0 Bytes) (0)
回复:不用组件的话，在同一个表单里怎样才能同时上传“文字“和“图片“啊！！！
--------------------------------------------------------------------------------
【cristo】 于 2000-07-17 11:23:13 加贴在 Joy ASP ↑
在同个form中，将form设置成encType="multipart/form-data"，在服务器端分析二进制数据流，可以提取上传的各个文本和图象数据。
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -