dimensões width e height

[Carcleo 4]

Olá à Todos, estou usando este script abaixo, para capturar o tamanho se um arquivo.Mas a página tá travando.O que estou fazendo de errado?E na verdade estou querendo é saber as dimensões width e height e o mime type da imagem(se é realmente jpg, gif ou qual extensão ela é realmente.Como fazer?<!--#include file="../global/funcoes.asp" --><%sql_SELECT = "SELECT * FROM fotoisrael"Set Rs_SELECT = Conn.EXECUTE(sql_SELECT)%><% Dim ObjFso, ObjArq Set ObjFso = Server.CreateObject("Scripting.FileSystemObject") Set ObjArq = ObjFso.GetFile(Server.MapPath("fotoisra/"&Rs_SELECT("imagem")&"")) %> <%'Apresenta o tamanho do arquivo Response.Write "Tamanho do arquivo: " & ObjArq.Size & "<br>" 'Apresenta o tipo do arquivo, no caso ASP Response.Write "Apresenta o tipo do arquivo: " & ObjArq.Type & "<br>" %>

[Carcleo 4]

A página tá travando