问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501
你好,欢迎来到懂视!登录注册
当前位置: 首页 - 正文

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

发布网友 发布时间: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)&lt;&gt;"/" then SavePath=SavePath&amp;"/" '在目录后加(/)for each formName in upload.file '列出所有上传了的文件 set ofile=upload.file(formName) '...

如何把doc文件转换成PDF格式?

"1.当然可以,首先要确定自己有一个pdf文档,而且确定目的是需要将pdf文档转换为word格式,然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是否更改文件名,然而在保存类型中选择*.doc选项。4.全部设置完成点击开始转换,确定自己设置好路径、更改文件名和保存类型即可。5.转换完成之后的word文档同样可以通过迅捷pdf转换器重新转换成一开始的pdf文档。"1.当然可以,首先要确定自己有一个pdf文档,而且确定目的是需要将pdf文档转换为word格式,然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是...

JAVA 导入数据库到Excel数据就是把图中Table中的信息放入Excel保存,需要...

很简单和插入单元格的方式一样,不过就是参数多了些,WritableImage这个类继承了Draw,上面只是他构造方法的一种,最后一个参数不用了说了,前面四个参数的类型都是double,依次是 x, y, width, height,注意,这里的宽和高可不是图片的宽和高,而是图片所要占的单位格的个数,因为继承的Draw所以他的类型必须是double,...

网页里面加入图片对网站优化有哪些好处啊??

②链接。必须为链接做优化,去掉链接中的“?”,这种问好的出现,一般意味着一长串的数据库代码,蜘蛛不喜欢。所以你得骗过他,这个也叫URL伪静态化。 ③链接分层,链接也必须分等级,告诉蜘蛛他是怎么来的,该怎么回去。比如:域名(二级域名)/频道名/栏目名/文章内容页。“快乐点公益网”在这方面...

什么是文件名后缀

哪款思维导图软件比较好用

一端创作多端实时同步,支持一键分享,可加密和设置分享权限,保护数据安全,满足多场景需求 (7)多格式 导入导出 支持Xmind、MindNow、Freemind等文件导入,可导出为高清图片、PDF、大纲等多种格式 (8)大纲笔记 条理清晰 思维导图可一键转换大纲笔记,将思路化繁为简,轻松记录想法和创意,结构化呈现条理...

我要做了一个小视频网站,如何实现点击视频名的时候就转入相应的页面播放...

1、access数据库里新建一个表保存视频信息:ID(自动编号,主键),title(视频名称),url(视频地址)。2、数据库的连接查询你应该会吧。3、新建页面a.asp用于显示视频列表,页面b.asp用于播放视频,页面之间通过视频的信息的ID号通信。4、a.asp通过数据库查询列出title,但都做个链接b.asp?id=&lt;%=...

法律中软件侵权如何界定?

计算机软件程序的“实质性相似”有两类:一是文字成分的相似,它以程序代码中引用的百分比为依据进行判断;二是非文字成分的相似,强调应该以整体上的相似作为确认两个软件之间实质上相似的依据。所谓整体上的相似是指两个软件产品在程序的组织结构、处理流程、采用的数据结构、产生的输出方式、所要求的输入形式等方面的...

求最新的笑话数据库,数量越多越好,最好是MySQL导出的,可以加分哦

“我也是啊!”女佣高兴地附和。3、一个人骑摩托车喜欢反穿衣服,就是把口子在后面扣上,可以挡风。一天他酒后驾驶, 翻了,一头栽在路旁。警察赶到:警察甲:好严重的车祸。警察乙:是啊,脑袋都撞到后面去了。警察甲:嗯,还有呼吸,我们帮他把头转回来吧。警察乙:好...一、二使劲,...

用友财务数据备份

1.把帐套存放路径下的文件夹整个备份,例帐套号为001,则文件夹为ZT001 2.重装完软件后,建立001帐套 3.右键点击桌面右下角的服务器图标,点击停用 4.把zt001复制到新建001帐套的路径下,会停示是否覆盖,点击确定 5.重启操作系统 注意:未建新帐套直接复制旧数据到ADMIN中,是不行的,因为这样做并没在数据库中建立...

什么软件可以编写作文

您也可以按照分类,根据软件类型选择自己喜欢的软件 2、通过手机浏览器搜索需要的软件下载安装(若是自带的浏览器,下载的安装包保存在我的文件-Download文件夹中)。 3、通过第三方助手类软件下载安装需要的程序。 4、通过电脑下载APK格式的安装包,然后传输到手机中安装。 2. 有写作文的软件吗 /soft?id=9760 “作文...

声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。
E-MAIL:11247931@qq.com
恐龙的食草食肉性是如何判断的? 打印机的打印速度怎样看?ipm和ppm什么意思?数值大的快还是小的... 内控PPM 是什么? 俄罗斯、日本以及北欧很多国家都出产白桦茸,哪个地区出产的质量更... 包子多少钱一个 ...一重伤一轻微伤,之后三个月他去自首了,我想 我老公把人打成轻伤二级现在自首了在看守所,可以办取保吗 我2个朋友5年前把人打致轻伤,5个后要自首要怎么判。事情都私了了。 ...他们把对方砍成轻伤乙级,我没砍,我自首,当时在公安机关就调解好了... ...但人已经没事出去打工了。现在我们主动自首了,法院会不会判缓期... 关于图片制作的问题 为啥加round保留小数点,随便弄个数字后算出来结果不一样啊!大神们来 u盘里的文件删不掉,也无法格式化,怎么办 证书翻译,求帮忙。 济南补交社保怎么挂失 济南市市医保怎么挂失 帮忙把证书翻译成英文,谢谢 为什么鼠标在显示屏上总是无缘无故突然不动了啊? 证书翻译,中文-英文 证书翻译 英翻中 你好,我昨天买了一张hp优盘,想要删除一些文件,结果既不能删除,也不能格式化,如何去掉保护,谢谢。 获奖证书的英文翻译 为什么鼠标老是突然不动了 指思U盘无法删除文件也无法格式化? 电脑正在运行,突然鼠标不动了,只能重启,为什么? &quot;证书&quot;翻译成英语有几种翻译方式,都告诉我, 谢谢了啊 我QQ进入保护模式了,手机号已经注销,现在换新手机号了。短信验证不 英语中的“证书“怎么翻译? “证书”的英语翻译是什么? 为什么我的鼠标突然不动 为什么不直接用一张画好的图片当圆角,要用多个div还要切图去拼成圆角 有一个软件,我忘了叫什么,是个弄图片的,英文名,开头好象是A,他的软件样子是羽毛 周公解梦在浴室里生孩子 沂南网站设计,沂南网页设计哪好,网站设计制作 三星手机怎么找80S电影网 QQ空间怎么能把里面的东西全都一次性删除? 原单位把我的就业证弄丢了,怎么补办就业证?需要什么? 工作证,就业证,报到证丢失怎么补办 办理就业证需要什么材料,就业证可以补办吗 极地鹰是不是传销? 极地鹰(长春)投资信息咨询有限公司怎么样? 老外非主流吗 《一念起》最新章节全文阅读免费下载百度网盘资源,谁有? 2005年的烟台福瑞斯xo价值多少钱? 谁知道邮政挂号信怎么查呢 编号SO16794553542 要详情 《诗经》中兴与比的异同? 中国邮政挂号信查询系统,帮忙查下挂号信so02772484742到哪里了,谢谢 手机内存卡什么格式? 有没有好的电脑加速器 8G内存卡有几种格式选择
  • 焦点

最新推荐

猜你喜欢

热门推荐