主题：从网页上拖动Gif动画到VB程序，如何保存Gif文件？
singlion
[专家分：690] 发布于 2008-06-12 23:12:00
我想做一个“一拖既存”的程序，目前实现了保存jpg、bmp等静态格式，但是当保存Gif动画时，保存下来的只有第一帧
代码上传了，请指点一下
另外还有一个问题，有些图片拖动到程序中后显示保存成功（出现了绿色笑脸图标），但是我在目标文件夹里并没有找到相应图片。比如百度相册中的图片，必须点一下图片在新窗口中打开（即只有一张图片的窗口）才能正常拖动保存。
最后更新于：2008-06-12 23:16:00
回复列表 （共11个回复）
沙发
jianghongbo1 [专家分：410] 发布于 2008-06-13 08:50:00
savepicture好象只能保存位图.
板凳
老大徒伤悲 [专家分：29120] 发布于 2008-06-13 08:53:00
vb不支持gif格式，后果就是不会动了。
解决方法：
使用第三方控件。这方面的帖子，原来有过，我一时找不出来。你自己翻翻看。
3 楼
bcahzvip [专家分：6040] 发布于 2008-06-14 23:10:00
用GDI/GDI+吧!
4 楼
singlion [专家分：690] 发布于 2008-06-16 11:49:00
麻烦3楼详细说一下什么是GDI
5 楼
singlion [专家分：690] 发布于 2008-06-16 12:06:00
回复2楼
是不是那个gif98.ocx
找到了，但是好像那个控件只能用来播放指定位置的gif图片，没有播放内存中图片的功能，更没有保存gif图片的功能。
6 楼
bcahzvip [专家分：6040] 发布于 2008-06-16 22:02:00
因为StdPicture不支持GIF的多帧图片所以只能保存为单帧GIF格式图片
可以用 Data.Files(1) 得到IE图片缓存文件路径
[url=http://file.pfan.cn/upfile/20080616220045.zip]没能解决你的问题[/url]
希望以后别把文件格式搞错。
7 楼
singlion [专家分：690] 发布于 2008-06-16 23:58:00
[quote]Data.Files(1) 得到IE图片缓存文件路径
[/quote]
这一句有用
8 楼
singlion [专家分：690] 发布于 2008-06-17 00:19:00
利用Data.Files(1)圆满完成！感谢bcahzvip
判断IE缓存中是否是gif格式,如果是就直接复制到指定位置
if right(Data.Files(1),3)="gif" then
filecopy Data.Files(1),mypath
end if
9 楼
singlion [专家分：690] 发布于 2008-06-17 00:24:00
哈哈，其它格式也能这样保存，程序大大简化。
10 楼
bcahzvip [专家分：6040] 发布于 2008-06-17 01:48:00
Data.Files(1) like "*.gif"
please!
我来回复
您所在位置：