[原创]图片压缩工具 - VB6论坛 - 编程论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → [原创]图片压缩工具

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2659 人关注过本帖

标题：[原创]图片压缩工具

只看楼主加入收藏

b13690976754

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9
结帖率：100%

收藏

问题点数：0 回复次数：11

[原创]图片压缩工具

在论坛上放相片比较麻烦.QQ空间又要钱.其他地方又不给链接
一张相片一般在200~400KB左右。如果一帖20张，一页200张相片，就4~8M左右。一也网页负载8M是不可能的，就算如此打开网页也很慢。
所以我做了一个小小的软件-[图片压缩工具]，在微微减少一张相片的情况下，让图片大小缩小2~50倍.（因图片格式而义）如果全部压缩时出现白色现象属于正常现象,等待几秒到几分钟(看机器配件而定) 图片压缩工具

[[it] 本帖最后由 b13690976754 于 2008-2-21 16:52 编辑 [/it]]

打开.jpg (38.13 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

单个压缩.jpg (39.51 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

单个压缩完毕.jpg (43.73 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

全部压缩过程.jpg (40.04 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

群压缩完毕.jpg (44.23 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

正常显像.jpg (19.57 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

正常显像2.jpg (11.21 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

大小.jpg (27.62 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

图片压缩工具.rar (25.96 KB)

搜索更多相关主题的帖子: 工具　相片　压缩　网页　配件　

发帖时间

2008-02-17 22:14

b13690976754

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

收藏

得分:0

嘻嘻觉得好用就分享一下

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

发帖时间

2008-02-17 22:14

西山居士

帅哥哟，离线，有人找我吗？

Rank: 4

等　级：贵宾
威　望：11
帖　子：581
专家分：0
注　册：2007-4-21

收藏

得分:0

好久没见楼主了，一向可好

学海无涯

发帖时间

2008-02-18 22:06

b13690976754

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

收藏

得分:0

西山居士好久没见.以前谢谢你的照顾.之后我就去学习了JAVA.SQL.MYSQL.JSP等一些语言.最近在学外语.

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

发帖时间

2008-02-18 22:12

b13690976754

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

收藏

得分:0

优化的全部压缩的速度和时间.
以前200张图片需要380多秒现在只需要100秒左右(以我本人机器衡量的.不同配件时间稍微有些出入)

１１.jpg (38.9 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

发帖时间

2008-02-19 00:11

??

性别保密呀，离线，找我有事吗？

Rank: 1

等　级：新手上路
帖　子：68
专家分：0
注　册：2007-11-24

收藏

得分:0

放出源码吧,共同学习呀

发帖时间

2008-02-19 11:55

wyfandy

帅哥哟，离线，有人找我吗？

Rank: 1

来　自：深圳
等　级：新手上路
帖　子：376
专家分：0
注　册：2006-12-11

收藏

得分:0

楼主可否给出代码或说出你的思路以便大家学习学习.

不论什么事，只要认准了一个目标，然后朝之不懈地努力，就一定实现。编程爱好者QQ群:21318556

发帖时间

2008-02-19 17:16

hundnn

美女呀，离线，留言给我吧！

Rank: 1

等　级：新手上路
帖　子：123
专家分：0
注　册：2007-8-23

收藏

得分:0

是用VB写的吗？

发帖时间

2008-02-19 18:05

b13690976754

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

收藏

得分:0

目前还在测试中...

1.修正全部压缩后的名字.
2.再次优化压缩速度
3.再次优化压缩大小

454张图片
274.9M

压缩只用了124秒
占空间29.5M

111.jpg (45.51 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

222.jpg (27.77 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

333.jpg (13.64 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

发帖时间

2008-02-19 21:18

尐妖

帅哥哟，离线，有人找我吗？

Rank: 2

来　自：广东省
等　级：新手上路
威　望：3
帖　子：120
专家分：0
注　册：2008-2-16

收藏

得分:0

是啊.期待楼主能共享代码.

倣棄?.﹎徻sんì嬄種繲脫嗎╃┈

发帖时间

2008-02-27 18:05

快速回复：[原创]图片压缩工具

关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有，并保留所有权利。

Powered by Discuz, Processed in 0.033094 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved