Guide ASP programming: How to resize images in ASP?

Today, I will guide you on the ASP programming language. How to resize images in ASP is the subject of this hoc lap trinh lesson.


To resize a picture with ASP you need to write the code as follows.
%
iWidth dim, iHeight, iType
sub ImgDimension (img)
MyIMGSM dim, fs
Set fs = CreateObject ("Scripting.FileSystemObject")
if not fs.fileExists (img) then exit sub
set MyIMGSM = LoadPicture (img)
iWidth = round (myImg.width / 26.4583)
iHeight = round (myImg.height / 26.4583)
iType = myImg.Type
select case iType
case 0
iType = "None"
case 1
iType = "Bitmap"
case 2
iType = "Metafile"
case 3
iType = "Icon"
case 4
iType = "Win32-enhanced metafile"
end select
set MyIMGSM = nothing
end sub
ImgDimension (Server.MapPath ("../.") "Imagesheader.gif")
response.write ("Dimensions" iWidth "x" iHeight "
")
response.write ("Image Type" iType "
")
%

Always keep in mind when learning to program is open memory card does play that card. Practice this hoc lap trinh lesson many times you will be in the above code. Wishing success.