熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

aspjpeg 給上傳圖片添加水印

2013-11-13 10:35:03  來源: .NET編程 

  call water_jpeg(filenameB)

  調用aspjpeg組件生成縮略圖
Sub small_Jpeg(filenameBfilenameS)
 Set Jpeg = ServerCreateObject("PersitsJpeg")     調用組件
 Path = ServerMapPath(filenameB)        待處理圖片路徑
 JpegOpen Path 打開圖片 
 高與寬為原圖片的/
 JpegWidth = JpegOriginalWidth /
 JpegHeight = JpegOriginalHeight /
 如果原來的/小於px或大於px就等比例生成一張寬為px的小圖
 if JpegWidth < or JpegWidth > then
  JpegWidth =
  JpegHeight = JpegOriginalHeight * /

  JpegOriginalWidth
 end if
 JpegSave ServerMapPath(filenameS)
 Set Jpeg = Nothing
end Sub

  
 


From:http://tw.wingwit.com/Article/program/net/201311/14041.html
  • 上一篇文章:

  • 下一篇文章:
  • Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.