标题:[求助]关于jpeg组建的小问题?
只看楼主
dh2007
Rank: 1
等 级:新手上路
帖 子:228
专家分:0
注 册:2007-2-28
结帖率:0
 问题点数:0 回复次数:4 
[求助]关于jpeg组建的小问题?

<% ' 建立实例
Dim Jpeg,Path
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' 图片所在位置
Path = Server.MapPath("images") & "\showimg.jpg"

' 打开
Jpeg.Open Path

' 设置缩略图大小(这里比例设定为50%) '
Jpeg.Width = 100'Jpeg.OriginalWidth / 2 '
Jpeg.Height = 150'Jpeg.OriginalHeight / 2 '这段看不懂,他不是说50%吗,那这个100和150是什么意思

' 保存缩略图到指定文件夹下
Jpeg.Save Server.MapPath("images") & "\showimg_small.jpg"

' 注销实例
Set Jpeg = Nothing
%>

搜索更多相关主题的帖子: jpeg 组建 
2007-03-26 11:37
阳光白雪
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:39
帖 子:2220
专家分:0
注 册:2005-11-18
得分:0 

' 设置缩略图大小(这里比例设定为50%) '
Jpeg.Width = 100'Jpeg.OriginalWidth / 2 '
Jpeg.Height = 150'Jpeg.OriginalHeight / 2 '这段看不懂,他不是说50%吗,那这个100和150是什么意思

Jpeg.Width = Jpeg.OriginalWidth / 2
Jpeg.Height = Jpeg.OriginalHeight / 2

这样才是表示50%,原来那100,150是定义固定大小的,


专注于WEB前端交互平台开发:[url=http://blog./]blog.[/url](富客户端技术(RIA)交流平台)
2007-03-26 11:47
dh2007
Rank: 1
等 级:新手上路
帖 子:228
专家分:0
注 册:2007-2-28
得分:0 
要是在服务器上还能用这个组件吗

2007-03-26 13:30
阳光白雪
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:39
帖 子:2220
专家分:0
注 册:2005-11-18
得分:0 
必须在服务器上安装

专注于WEB前端交互平台开发:[url=http://blog./]blog.[/url](富客户端技术(RIA)交流平台)
2007-03-26 13:31
dh2007
Rank: 1
等 级:新手上路
帖 子:228
专家分:0
注 册:2007-2-28
得分:0 
那要是租用网上空间,能用吗

2007-03-26 13:32



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-126853-1-1.html




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

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.481695 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved