asp 그림 에 워 터 마크 기능 코드
'
Function WordWatermark(ImagePath)
Dim Image
Set Image= Server.CreateObject("Persits.Jpeg") '
Image.Open server.mappath(ImagePath) '
Image.Canvas.Font.Color = &H000000 ' , :
Image.Canvas.Font.Family = " " '
Image.Canvas.Font.Bold = False '
Image.Canvas.Font.Size = 26 '
Image.Canvas.Font.Quality = 4 '
Image.Canvas.Print Image.OriginalWidth/2-170,Image.OriginalHeight-30, " " '
Image.Save server.mappath(ImagePath) '
Set Image= Nothing
End Function
'
Function ImageWatermark(ImagePath)
Set Image = Server.CreateObject("Persits.Jpeg")
'
PhotoPath = Server.MapPath(ImagePath)
Image.Open PhotoPath
'
Set Logo = Server.CreateObject("Persits.Jpeg")
LogoPath = Server.MapPath("logo.jpg") '
Logo.Open LogoPath
Logo.Width = 121 '
Logo.Height = 50
Transition_Color = &h0066cc
'
Image.DrawImage Image.width-150, Image.height-59, Logo,1,Transition_Color,90
' （photo.width-210,photo.height-40 ）
'
Image.Save Server.MapPath(ImagePath)
Set Photo = Nothing
End Function
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
데이터 구조 - 그림 - C 언어 - 인접 행렬데이터 구조 - 그림 - C 언어 - 인접 행렬 공식 표기 법 응시 표기 법...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
