求数据库的图片显示代码,和上传的图片如何弄进文件夹,可以使用的我加分...

发布网友发布时间：2022-05-04 16:02

共3个回答

热心网友时间：2022-04-13 15:33

我也不知道对不对数据库自己弄

我从我的一个页面上截了一部分代码你看看

希望我的回答对您有帮助

<%
sub upload_0() '使用化境无组件上传类
set upload=new upfile_class ''建立上传对象
upload.GetData(104857600) '取得上传数据,*最大上传100M
if upload.err > 0 then '如果出错
select case upload.err
case 1
response.write "请先选择你要上传的文件！"
case 2
response.write "你上传的文件总大小超出了最大*（100M）"
end select
response.end
end if
PhotoUrlID=Clng(trim(upload.form("PhotoUrlID")))
if PhotoUrlID>0 then
SavePath = SaveUpFilesPath '存放上传文件的目录
else
SavePath = SaveUpFilesPath '存放上传文件的目录
end if
if right(SavePath,1)<>"/" then SavePath=SavePath&"/" '在目录后加(/)

for each formName in upload.file '列出所有上传了的文件
set ofile=upload.file(formName) '生成一个文件对象
oFileSize=ofile.filesize
if oFileSize<100 then
msg="请先选择你要上传的文件！"
FoundErr=True
else
select case PhotoUrlID
case 0
if oFileSize>(MaxFileSize*1024) then
msg="文件大小超过了*，最大只能上传" & CStr(MaxFileSize) & "K的文件！"
FoundErr=true
end if
case 1
if oFileSize>(10000*1024) then
msg="文件大小超过了*，最大只能上传10M的文件！"
FoundErr=true
end if
end select
end if

fileExt=lcase(ofile.FileExt)
arrUpFileType=split(UpFileType,"|")
for i=0 to ubound(arrUpFileType)
if fileEXT=trim(arrUpFileType(i)) then
EnableUpload=true
exit for
end if
next
if fileEXT="asp" or fileEXT="asa" or fileEXT="aspx" then
EnableUpload=false
end if
if EnableUpload=false then
msg="这种文件类型不允许上传！\n\n只允许上传这几种文件类型：" & UpFileType
FoundErr=true
end if

strJS="<SCRIPT language=javascript>" & vbcrlf
if FoundErr<>true then
randomize
ranNum=int(900*rnd)+100
filename=SavePath&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&fileExt

ofile.SaveToFile Server.mappath(FileName) '保存文件

response.write "图片上传成功！图片大小为：" & cstr(round(oFileSize/1024)) & "K"
select case PhotoUrlID
case 0
strJS=strJS & "parent.document.addNEWS.PhotoUrl.value='" & fileName & "';" & vbcrlf
strJS=strJS & "parent.document.addNEWS.PhotoSize1.value='" & cstr(round(oFileSize/1024)) & "';" & vbcrlf
case 1
strJS=strJS & "parent.document.addNEWS.DownloadUrl.value='" & fileName & "';" & vbcrlf
strJS=strJS & "parent.document.addNEWS.FileSize.value='" & cstr(round(oFileSize/1024)) & "';" & vbcrlf
case 2
strJS=strJS & "parent.document.addNEWS.PhotoUrl2.value='" & fileName & "';" & vbcrlf
strJS=strJS & "parent.document.addNEWS.PhotoSize2.value='" & cstr(round(oFileSize/1024)) & "';" & vbcrlf
case 3
strJS=strJS & "parent.document.myform.img.value='" & fileName & "';" & vbcrlf
strJS=strJS & "parent.document.addNEWS.PhotoSize3.value='" & cstr(round(oFileSize/1024)) & "';" & vbcrlf
case 4
strJS=strJS & "parent.document.addNEWS.PhotoUrl4.value='" & fileName & "';" & vbcrlf
strJS=strJS & "parent.document.addNEWS.PhotoSize4.value='" & cstr(round(oFileSize/1024)) & "';" & vbcrlf
end select
else
strJS=strJS & "alert('" & msg & "');" & vbcrlf
strJS=strJS & "history.go(-1);" & vbcrlf
end if
strJS=strJS & "</script>" & vbcrlf
response.write strJS

set file=nothing
next
set upload=nothing
end sub
%>

热心网友时间：2022-04-13 16:51

若你图片以2进制格式放在表cp ，字段img里的话
这里的id是图片的编号，可以通过地址栏传
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("mot.mdb")
conn.Open Strconn
strsql="select * from cp where id="&cint(request.QueryString("id"))
on error resume next
rs.open strsql,conn,1,1
response.ContentType="image/jpeg"
response.BinaryWrite rs("img").getchunk(7500000)
rs.close
set rs=nothing
set conn=nothing
%>

set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("InfoPublish.mdb")
exec="select * from information"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
'----------------------------------------------
set rs2=server.createobject("adodb.recordset")
exec2="select * from 表名"
rs2.open exec2.conn,1,1

这样就可以同时打开两个表了，就是针对你补充的问题描述打开的
rs是你原来带开的
rs2的操作是对新打开的数据库操作。
这两个数据库可以同时操作：
比如让第一个表的字段1的值等于第二个表字段二的值：
rs("字段1")=rs2("字段2")

参考资料：http://www.qiqu8.cn/files/art/Show.php?id=75

热心网友时间：2022-04-13 18:25

设置数据库
我们通常在数据库中所使用的文本或整数类型的字段和需要用来保存图片的字段的不同之处就在于两者所需要保存的数据量不同。MySQL数据库使用专门的字段来保存大容量的数据，数据类型为BLOB。
MySQL数据库为BLOB做出的定义如下：BLOB数据类型是一种大型的二进制对象，可以保存可变数量的数据。BLOB具有四种类型，分别是TINYBLOB,BLOB, MEDIUMBLOB 和LONGBLOB，区别在于各自所能够保存的最大数据长度不同。
在介绍了所需要使用的数据类型之后，我们可以使用以下语句创建保存图象的数据表。
CREATE TABLE Images ( PicNum int NOT NULL AUTO_INCREMENT PRIMARY KEY, Image BLOB );
编写上传脚本
关于如何实现文件的上传，我们在这里就不再介绍了，感兴趣的读者可以参见“网页陶吧”内的相关文章。现在，我们主要来看一下如何接收上传文件并将其存入到MySQL数据库中。具体的脚本代码如下，其中我们假定文件上传域的名称为Picture。
<?
If($Picture != "none") {
$PSize = filesize($Picture);
$mysqlPicture = addslashes(fread(fopen($Picture, "r"), $PSize));
mysql_connect($host,$username,$password) or die("Unable to connect to SQL server");
@mysql_select_db($db) or die("Unable to select database");
mysql_query("INSERT INTO Images (Image) VALUES ($mysqlPicture)") or die("Cant Perform Query");
}else {
echo"You did not upload any picture";
}
?>
这样，我们就可以成功的把图片保存到数据库中。如果在将图片插入MySQL的过程中出现问题，可以检查一下MySQL数据库所允许的最大数据包的大小。如果设置值过小的话，我们会在数据库的错误日志中找到相应的记录。
下面，我们简单说明一下上述脚本程序。首先，我们通过“If($Picture != "none")”检查是否有文件被上传。然后，使用addslashes()函数避免出现数据格式错误。最后，连接MySQL，选择数据库并插入图片。
显示图片
在知道了如何将图? 入数据库之后，我们就需要考虑怎样才能从数据库中取出图片并在HTML页面中显示出来。这个过程要稍微复杂一些，下面我们就来介绍一下实现过程。
因为PHP显示图片需要发送相应的标头，所以我们就会面临这样一个问题，那就是一次只能显示一副图片，因为我们无法在发出标头之后再发送其它的标头。
为了有效的解决这一问题，我们编写了两个文件。其中，第一个文件作为HTML页面的模板，定位图片的显示位置。第二个文件则被用来从数据库中实际输出文件流，作为<IMG>标签的SRC属性。
第一个文件的简单形式可以如下：
<HTML> <BODY>
<?
mysql_connect($host,$username,$password) or die("Unable to connect to SQL server");
@mysql_select_db($db) or die("Unable to select database");
$result=mysql_query("SELECT * FROM Images") or die("Cant Perform Query");
While($row=mysql_fetch_object($result)) {
echo "<IMG SRC=\"Second.php3? PicNum=$row->PicNum\">";
} ?>
</BODY> </HTML>
当HTML页面被浏览时，每显示一副图片就会调用一次Second.php3文件。当第二个文件被调用时会传入相应的Picture ID，我们可以借此从数据库中取回对应的图片并显示。
Second.php3文件如下：
<?
$result=mysql_query("SELECT * FROM Images WHERE PicNum=$PicNum") or die("Cant perform Query");
$row=mysql_fetch_object($result);
Header( "Content-type: image/gif");
echo $row->Image;
?>
到此，我们就介绍完了使用PHP和MySQL保存和显示图片的全过程。文中所举得都是一些最简单的实例，读者可以根据自己的实际需要加入其它一些功能，使整个程序更加完善。
不知道我说的可以不可以,我是这样想的:
在数据库中写图片的代码,如:<img src="images/x.gif" width="xxx" height="xxx">,然后在网页中将数据库中的内容读出,图片就可以显示出来了,这样可以吗?
错误的地方,请高手指教.
可以直接发电子邮件:fzj-w@163.com

求数据库的图片显示代码,和上传的图片如何弄进文件夹,可以使用的我加分...

SavePath = SaveUpFilesPath '存放上传文件的目录 else SavePath = SaveUpFilesPath '存放上传文件的目录 end if if right(SavePath,1)<>"/" then SavePath=SavePath&"/" '在目录后加(/)for each formName in upload.file '列出所有上传了的文件 set ofile=upload.file(formName) '...

求一段相册展示的代码? 谢谢了

你只要修改图片的路径就好了，我就是从数据库读取图片路径然后用stringbuilder组装成上面的那个显示图片的html代码然后放在divrank的innerHTML里面就可以了，至于最下面的sb.gif、sl.gif、sr.gif、sc.gif就是你图片中最下面的的滚动条用到的四个图片后台代码如下：StringBuilder sb = new StringBuilder();...

怎么获得网络上一张图片的代码

图片没有什么代码的,asp的网页都是传上图片后,自动将路径写入数据库.读出来时只要从数据库中将路径读出来写在引号中就行

求助用VB连接Access数据库来显示图片

你好，连接数据库的过程是比较简单的，可以用data控件或者是adodc控件，建议你单独弄一个文件夹来放图片。利用fso对象遍历目录将图片名称写入数据库。然后你再分别为他们添加说明。不建议你将图片文件存入数据库的，这样会增加数据库的大小。

...2000数据库中字段保存的是图片路径,如何在水晶报表中显示照片...

Picture1.LoadFromFile('c:\a.bmp');end 在文本里写上这个就可以拉在图片的onbeforeprint 事件里写上上面的代码报表里面都是支持delphi 语句的,那个'c:\a.bmp'可以替换成你的字段名我用fastreport就可以打印的。begin Picture1.LoadFromFile([ADOQuery1."cCXM"]);end 参考资料：如果我的回答让...

急求asp 上传照片程序

我有个无组件上传类，可上传到access数据库也可上传到指定路径，有使用示例，需要请给我信息，留Email地址我给你发。--- 不过个人建议不要把文件直接放数据库，那样数据库很快就变得很大...

access数据库中ole图片显示问题

1、编写一个 asp程序，连接数据库，并从数据库中调用一条数据。2、编写一个 asp程序，连接数据库中，调用一条ole 数据，并输出为图片形式。3、编写一组 asp程序，以表格形式，依次显示出所有图片。（具体实现，1个程序负责表格的输出，表格中要显示图片的地方调用另外一个 asp文件（这个asp文件...

Dreamweaver+SQL2000的文件上传代码以及数据库的设置

就增加个表来存放你上传东西的路径。上传文件的代码网上搜下一堆然后从数据库读取你相关路径根据路径加载已经上传成功的文件显示出来。大体是这个样子。

我有服务器,想在上面建虚拟主机,怎么做。100分

4.在“IP地址和端口设置”窗口中选择你的IP地址,其它端口和主机头项这里使用默认即可(后面会有详述)。 5.“下一步”到“Web站点主目录”设置窗口,其中填入本机上放置网站文件的目录(其实局域网中也可以设置到同域的其它主机,这里不详述),你也可以通过“浏览”按钮来查找,本文以E:\Pcd目录为例。 6.接下来是...

怎样在rpgmaker里使用自己的bgm和素材?

1、打开rpgmaker软件，然后在页面的左上方找到【文件】。2、或者可以直接打开rpgmaker软件后直道接在软件的编辑去双击鼠版标左键权，就会弹出素材导入的对话框，然后选中素材并打开。3、也可以直接在文件夹中选中素材，按住鼠标左键不松，直接拖动到rpgmaker软件的编辑窗口中。注意事项：RPGMaker的最新版叫做...

如何上传数据到数据库文件上传到数据库 php上传图片到数据库创建一个数据库的代码 java连接数据库的代码数据库基本代码数据库代码数据库代码大全 sql数据库交易代码