Gathering Image Properties

I've uploaded an image to the server and was wondering if there is any possible way to get the dimensions of the image through ASP.

dim iWidth, iHeight, iType
sub ImgDimension(img)
dim myImg, fs
Set fs= CreateObject("Scripting.FileSystemObject")
if not fs.fileExists(img) then exit sub
set myImg = loadpicture(img)
iWidth = round(myImg.width / 26.4583)
iHeight = round(myImg.height / 26.4583)


but I keep getting problems with the loadpicture.