|
1 2 3 |
Шелл=СоздатьОбъект("Shell.Application"); Место=Шелл.NameSpace(Путь); Сообщить(Место.GetDetailsOf(Место.ParseName(Файл),26)); |
А если картинка на интерне сайте, и нужно узнать ее высоту, то:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
ИЕ=CreateObject("InternetExplorer.Application"); ИЕ.Navigate("Aboutblank"); // нужно AboutДВОЕТОЧИЕblank добавить в надежные узлы Док=ИЕ.document; Док.write("<img id=img src=file:"+Каталог+ИмяКартинки+">"); Результат = Док.getElementById("img").height; //Или такой вариант: Текст=СоздатьОбъект("Текст"); Текст.ДобавитьСтроку("<img id=img src='file://"+Путь+Файл+"' >"); Времянка=КаталогВременныхФайлов()+_GetPerformanceCounter()+".html"; Текст.Записать(Времянка); ИЕ=CreateObject("InternetExplorer.Application"); ИЕ.Navigate(Времянка); Пока ИЕ.ReadyState<4 Цикл КонецЦикла; Док=ИЕ.document; Сообщить(Док.getElementById("img").height); |
About the Author
