asp 利用Persits.jpeg组件生成图片

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Response.Expires = 0

Pic = Request("p")
PointX = CInt(Request("x"))
PointY = CInt(Request("y"))
CutWidth = CInt(Request("w"))
CutHeight = CInt(Request("h"))
PicWidth = CInt(Request("pw"))
PicHeight = CInt(Request("ph"))

Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath(Pic)

缩放切割图片
Jpeg.Width = PicWidth
Jpeg.Height = PicHeight
Jpeg.Crop PointX, PointY, CutWidth + PointX, CutHeight + PointY

输出图片
Response.ContentType = "image/jpeg"
Jpeg.SendBinary
%>

时间： 2025-01-19 09:37:59

asp 利用Persits.jpeg组件生成图片的相关文章

利用jpeg组件加图片水印函数

函数写了图片水印效果函数,代码如下: 程序代码: sub jpegclass(imgurl,fontsize,family,isbold,top,left,content) '调用过程名 Dim Jpeg,font_color,font_size,font_family,f_width,f_height,f_content '建立实例 Set Jpeg = Server.CreateObject("Persits.Jpeg")

asp文件上传组件 Persits.UploadProgress

<!-- 本文章提供了asp文件上传组件 persits.uploadprogress来实时文件上传功能哦. <%@enablesessionstate=false%> <% response.expires = -1 pid = request("pid") timeo = request("to") set uploadprogress = server.createobject("persits.uploadprogr

ASP编程之ActiveX组件

active|activex|编程从今天开始我们将正式学习 ASP 的精华部分 --ActiveX 组件.事实上,当你用 ASP 编写服务器端应用程序时,必须依靠 ActiveX 组件来强大 Web 应用程序的功能,譬如:你需要连接数据库,对数据库进行在线操作或者对 WEB 服务器上的文件系统进行操作,亦或你需要一个 WEB 广告交换程序,所有这一切你都必须通过调用 ASP 内建的 ActiveX 组件或自己编写所需的组件来完成. 那么,究竟什么是 ActiveX 组件呢?它又是如何运作的呢?

ASP.NET的WebFrom组件LinkButton编程

asp.net|web|编程在ASP.NET的WebForm组件中的LinkButton组件也是一个服务器端的组件,这个组件有点类似于HTML中的<A>标识符.它的主要作用是就是在ASP.NET页面中显示一个超链接.当这个链接被按动的时候,页面就会往服务器端传递信息,并且在服务器端来处理相应的事件. 一． LinkButton组件的重要的组成内容: 我们通过下面这张表来说明一下LinkButton组件的一些常用属性.事件. LinkButton组件的常用属性.事件代表的意思 Text 这是

ASP编程之ActiveX 组件

从今天开始我们将正式学习 ASP 的精华部分 --ActiveX 组件.事实上,当你用 ASP 编写服务器端应用程序时,必须依靠 ActiveX 组件来强大 Web 应用程序的功能,譬如:你需要连接数据库,对数据库进行在线操作或者对 WEB 服务器上的文件系统进行操作,亦或你需要一个 WEB 广告交换程序,所有这一切你都必须通过调用 ASP 内建的 ActiveX 组件或自己编写所需的组件来完成. 那么,究竟什么是 ActiveX 组件呢?它又是如何运作的呢?其实 ActiveX 组件是一个存在

在ASP中调用DCOM组件的应用技巧

在ASP中调用DCOM组件的应用技巧 1.编写DCOM组件: 假设我们想通过ASP页面来远程启动DNS服务,并且DNS服务器与Web服务器不为同一台机器.我们可以编写一个ActiveX DLL 来实现这个功能. 首先我们建立一个批处理文件StartDNS.bat,文件中写入:Net Start DNS.将文件保存在DNS服务器的一个目录下,例如C:\ManDNS\: 其次我们编写 Dll 程序如下(VB编写): Public Function StartDNS() As Boolean On E

利用OWC服务器端组件动态生成图表

动态|服务器|图表利用OWC服务器端组件动态生成图表以前在这里也曾经有一些文章谈到了在ASP中生成动态图表的问题,但那些文章中所谈到的一些方法都有某些方面的限制,如需要在客户端安装office2000或安装OWC,有些则可能在Intranet中使用时没什么问题,但在通过Internet访问的时候,就可能出现无法正常工作的现象(这主要和SQL Server的安全设置有关).那么,我们如何来避免这些问题呢?有一个很好的方法,就是将在ASP中生成的图表转换成图片文件保存在服务器上,这样用户最终看到

Asp 利用 Jmail 发信的函数

jmail|函数 Asp 利用 Jmail 发信的函数 '作者:Loster(OICQ:181306) [如果转载请勿删除此信息,谢谢!]'函数名:Send_Email()'作用:利用Jmail4.3组件发送E-Mail'参数:'Email:类型:字符串.作用:接收E-Mail的地址.'E_Subject:类型:字符串.作用:信件主题.'Information:类型:字符串.作用:信件内容.'S_Type:类型:布尔值.作用:是否为Html格式信件.True为Html格式.False为文本格式.

asp利用fso生成html页面

asp利用fso生成html页面,此文章是我大二时写的了,就是利用asp自带组件fso来进行用户文件上传时就生成html文件用了,它也很好的判断文件名称是否存在了,等提示 <% dim path,filename,filetype,fileconten,fso path=request("path") filename=html_encode(request("filename")) filecontent=request("filecontent&