展开全部
aspjpeg本身不能上传图片,可以使用无惧上传等文件上传类。
生成缩略图的代码如下
<%
' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open "c:\path\myimage.jpg"
' New width
L = 100
' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
' create thumbnail and save it to disk
Jpeg.Save "c:\path\thumbnail.jpg"
%>
生成缩略图的代码如下
<%
' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open "c:\path\myimage.jpg"
' New width
L = 100
' Resize, preserve aspect ratio
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
' create thumbnail and save it to disk
Jpeg.Save "c:\path\thumbnail.jpg"
%>
展开全部
aspjpeg本身不能上传图片,可以使用无惧上传等文件上传类。
生成缩略图的代码如下
<%
'
Create
instance
of
AspJpeg
Set
Jpeg
=
Server.CreateObject("Persits.Jpeg")
'
Open
source
image
Jpeg.Open
"c:\path\myimage.jpg"
'
New
width
L
=
100
'
Resize,
preserve
aspect
ratio
Jpeg.Width
=
L
Jpeg.Height
=
Jpeg.OriginalHeight
*
L
/
Jpeg.OriginalWidth
'
create
thumbnail
and
save
it
to
disk
Jpeg.Save
"c:\path\thumbnail.jpg"
%>
生成缩略图的代码如下
<%
'
Create
instance
of
AspJpeg
Set
Jpeg
=
Server.CreateObject("Persits.Jpeg")
'
Open
source
image
Jpeg.Open
"c:\path\myimage.jpg"
'
New
width
L
=
100
'
Resize,
preserve
aspect
ratio
Jpeg.Width
=
L
Jpeg.Height
=
Jpeg.OriginalHeight
*
L
/
Jpeg.OriginalWidth
'
create
thumbnail
and
save
it
to
disk
Jpeg.Save
"c:\path\thumbnail.jpg"
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询