Informação de Imagem

Aqui estão alguns exemplos usando aspSmartImage.

Response.Write "Width=" & oImg.OriginalWidth
Response.Write "Height=" & oImg.OriginalHeight
Response.Write "Size=" & oImg.OriginalSize

Informações retornadas com esse exemplo:
Width = 108
Height= 148
Size = 3 915

Load e Save

Carrega BMP, GIF ou JPEG ou binário e salva em formato jPEG ou binário. Muda a qualidade de compressão antes de salvar.
Este exemplo salva o arquivo em qualidade baixa mas em tamanho muito pequeno. O novo tamanho é 1 404 bytes ao inves de 3 915 bytes.
oImg.Qulaity=10
oImg.SaveFile

Resample

Este exemplo diminui o tamanho da image mantendo as proporções. Neste caso a imagem salva estará com a metade do tamanho.
oImg.Resample oImg.OriginalWidth / 2,0

Novas propriedades da Imagem:
Width = 54
Height= 74
Size = 1 824

Cortar

Este exemplo corta a imagem mantendo um pedaço definido da imagem.

oImg.Crop 10,70,160,210

O numeros correspondem aos eixos x e y (posição inicial e final

Sharpen

Este exemplo irá ressaltar 3 vezes.

For i=1 to 3
oImg.Sharpen
Next

Blur

Este exemplo mancha a imagem original.

oImg.Blur

GreyScale

Este exemplo remove as cores e mostra a imagem em escala de cinza.

oImg.GreyScale

Negative

Este exemplo mostra o negativo da imagem.

oImg.Negative

Gamma correction

Variando a quantidade de correção para gamma, a correção não será feito somente no tipo de cor, mas também o brilho

Os dois primeiros exemplos mudam o brilho e o terceiro muda o nivel de cor verde.

oImg.Gamma 4,4,4
oImg.Gamma 1/4,1/4,1/4
oImg.Gamma 1/4,1,1/4

Flip

Este exemplo inverte a imagem atual.

oImg.Flip

Mirror

Este exemplo faz uma imagem espelhada da original..

oImg.Mirror

Add text

Adiciona texto na imagem e coloca onde você quiser
oImg.FontFace = "Arial"
oImg.FontColor="FFFFFF"
oImg.FontBold=True
oImg.AddText "BRASLINK","RIGHT","TOP"
or
oImg.FontFace = "Courier"
oImg.FontColor="FFFFFF"
oImg.FontBold=True
oImg.AddText "BRASLINK",1,30

Add Image

Cola uma nova imagem e define se você quer colar a imagem com background (fundo) transparente

Opaque - Prepositioned:
oImg.AddImage "/logo.gif", "CENTER","BOTTOM"
or
Transparent - manul position:
oImg.AddImage "/logo.gif", 10,30,"000000"

Download

Para fazer o download de imagem jpeg, o asp does não pode conter nenhuma tag HTML.
Ele pode ser chamado no SRC da imagem do html
...
<IMG SRC='display.asp'>
...

display.asp codigo fonte :

<%
Dim oImg
Set oImg = Server.CreateObject("aspSmartImage.SmartImage")
oImg.OpenFile("/images/myImage.jpg")
oImg.Download
Set oImg = Nothing
%>