VB 中怎么改变图片文件的大小

hzic9527 2007-07-26 05:22:29
求解:VB 中怎么改变图片文件的大小,不仅仅是达到显示时图片大小改变,还想要把文件属性(占用空间)的大小改变。目的是为了保存到数据库时提高交互速度。
...全文
1331 9 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
熊孩子开学喽 2007-07-31
  • 打赏
  • 举报
回复
一个客户端上传后,其他客户端也能看到了,不能只保存路径啊...
-----------------------------------------------------------
当然可以只保存路径,图片上载到服务器的路径,数据库中保存这个服务器路径就可以了。其他用户刷新记录后读取这个路径,也可以访问这个图片。
用户提交的可以是一个动作,也可以是多个动作,只要保持图片文件路径和数据库记录两者之间的关联,你的程序就不会乱套。并且因为数据库和图片是在同一个服务器上,使用直接路径和相对路径都可以找到图片,当然,为了节约服务器空间,可以限制上传的文件大小。
图片都往数据库里扔,数据库容量会飞速上长,而维护文件系统要比维护数据库系统简单得多,从维护角度来说也应该保存路径,而不是图片数据。
嗷嗷叫的老马 2007-07-31
  • 打赏
  • 举报
回复
添加两个图片框,PIC1,PIC2

PIC1里载入图片,设置AutoSize=True

然后调整好PIC2的大小,为你需要的大小....

接着.......

Private Sub Command1_Click()
With Pic2
.PaintPicture Pic1.Picture, 0, 0, .Width, .Height
Set .Picture = .Image
End With
SavePicture Pic2.Picture, "D:\123.bmp"
End Sub

只要调整好PIC2的大小,就行了.....
zhangle861010 2007-07-31
  • 打赏
  • 举报
回复
顶一下~!
学习中.....
lanman 2007-07-30
  • 打赏
  • 举报
回复
关注,我也有这方面的需求,现在初步准备不存数据库了。
laviewpbt 2007-07-27
  • 打赏
  • 举报
回复
改变图片文件的大小就要改格式,但是向前面有人提问说一定要改到300KB,那是不太科学和可能的。
Tiger_Zhao 2007-07-27
  • 打赏
  • 举报
回复
同意 cqq_chen(我是谁) ,将图片存放在指定的共享路径下可以大大提高性能。
hzic9527 2007-07-27
  • 打赏
  • 举报
回复
那我是多个客户端访问的,一个客户端上传后,其他客户端也能看到了,不能只保存路径啊,现在偶想了个办法,在保存前调用WINRAR把图片进行压缩,打开时进行解压缩。不过这样的话客户一定要装个WINRAR了。
cqq_chen 2007-07-26
  • 打赏
  • 举报
回复
存到数据库时提高交互速度。==>何不只存放路径呢?这种最快。
fxy_2002 2007-07-26
  • 打赏
  • 举报
回复
如果是 jpg,参考:
http://community.csdn.net/Expert/topic/5672/5672928.xml?temp=.48193


如果是其它图片,要改变大小只能缩放它的象素,比较麻烦。

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧