Отправляет email-рассылки с помощью сервиса Sendsay

Screen reader JAWS for Windows Russian

[JFWRus] Размер файла в Jaws 9

Всем привет.
Что нужно подкрутить в девятом Jaws, чтоб по горячим клавишам узнать размер
файла или папки?
Спасибо. Сергей
botnariserg***@r*****.ru
скайп: botser99

***
Это сообщение No 8658
было разослано для 480 участников дискуссионного листа
[JFWRus] Размер файла в Jaws 9

Ответить   "99" Sat, 30 May 2009 12:37:57 +0300 (#866136)

 

Ответы:

Доброго времени суток, Сергей.

Из сообщения от 30.05.2009 16:51:

Предлагаю скрипт для использования в проводнике.
Не зависит от настроек Jaws и не использует перехватчик.
Размер исчисляется в байтах.
Скрипт необходимо поместить в файл InternetExplorer.jss из пользовательской
папки Jaws
и перекомпилировать. Почтовик искажает форматирование, поэтому
после вставки в файл скрипта необходимо проверить текст
на предмет переноса частей строк.

Script GetSize ()
Var
Object objShellApp ,
Object objShellWin ,
Object objFSO,
Object objFolder,
Int LookingForTheWindow ,
Int i

Let objShellApp = CreateObject ("Shell.Application")
Let objShellWin = objShellApp.Windows
If objShellWin.Count == 0 Then
Return
EndIf
Let i = 0
Let LookingForTheWindow = True
While i < objShellWin.Count && LookingForTheWindow
If objShellWin.Item(i).hwnd == GetAppMainWindow (GetFocus ()) Then
Let LookingForTheWindow = False
Let i = i - 1
EndIf
Let i = i + 1
EndWhile
If !objShellWin.Item(i).document.FocusedItem Then
Return
EndIf
Let objFSO = CreateObject ("scripting.FileSystemObject")
If objFSO.FileExists (objShellWin.Item(i).document.FocusedItem.Path) Then
Say(objShellWin.Item(i).document.FocusedItem.Size,
OT_USER_REQUESTED_INFORMATION)
Else
Let objFolder =
objFSO.GetFolder(objShellWin.Item(i).document.FocusedItem.Path)
Say(objFolder.Size, OT_USER_REQUESTED_INFORMATION)
EndIf
EndScript

С уважением, Руслан Усачев

***
Это сообщение No 8659
было разослано для 478 участников дискуссионного листа
[JFWRus] Re: Размер файла в Jaws 9

Ответить   Руслан Усачев Sun, 31 May 2009 11:59:28 +0300 (#866342)