Now that Window-Eyes has gone gold, I'm sending a second, updated
report of which Script Central files appear to contain obsolete
namespace references. GW staff, please peruse this list and see if
any of the shown references are actually valid. This is now done by a
shell script, so it should be easy for me to take the valid lines out.
I particularly wonder about com.GWMicro.Version. Also, unlike my
first report (I think), this one includes files that are documentation
and not code, so that docs can quit steering people to write the wrong
thing.
>From now on until I disable it, this report will be regenerated
periodically and I will be notified of changes, so if anyone wants an
update or wants to check if script package X has escaped the eye of
NSCheck (that's what I'm calling the shell script), let me know.
The report:
50 obsolete namespace references found:
2 LearnScripting/Window-Eyes Scripting Manual.htm
2 LearnScripting/window-eyes scripting manual.txt
4 ZmianaProfilu/ZmianaProfilu.vbs
3 custom_system_restore/custom_system_restore.vbs
7 easycddaextractor/easycddaextractor.vbs
6 hourly_chime/hourly_chime.vbs
2 qboe/qboe.vbs
2 recordmacro/recordmacro.vbs
5 secondglass/secondglass.vbs
4 showallscripts/showallscripts.vbs
6 skype/skype.vbs
2 vs2008/vs2008.vbs
5 window_manager/window_manager.vbs
Reference list:
LearnScripting/Window-Eyes Scripting Manual.htm:If objName =
"com.GWMicro.Version" Then<br>
LearnScripting/Window-Eyes Scripting Manual.htm:Set mySharedObject =
SharedObjects("com.GWMicro.Version")<br>
LearnScripting/window-eyes scripting manual.txt:If objName =
"com.GWMicro.Version" Then
LearnScripting/window-eyes scripting manual.txt:Set mySharedObject =
SharedObjects("com.GWMicro.Version")
ZmianaProfilu/ZmianaProfilu.vbs: Set HotkeyManager =
SharedObjects("com.GWMicro.HotkeyManager").NewDialog
ZmianaProfilu/ZmianaProfilu.vbs: Dim updateCheck : Set
updateCheck = SharedObjects("com.GWMicro.CheckForUpdate", 30000).NewCheck
ZmianaProfilu/ZmianaProfilu.vbs: Set HotkeyManager =
SharedObjects("com.GWMicro.HotkeyManager").NewDialog
ZmianaProfilu/ZmianaProfilu.vbs: Set StandardHelpDialog =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
custom_system_restore/custom_system_restore.vbs: Dim shd : Set shd =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
custom_system_restore/custom_system_restore.vbs:
If Not SharedObjects("com.GWMicro.StandardHelpDialog") Is Nothing Then
custom_system_restore/custom_system_restore.vbs:
Set stdHelpDlg =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
easycddaextractor/easycddaextractor.vbs:ExecuteGlobal
SharedObjects("com.GWMicro.ErrorReporting")("1.0", "[EMAIL PROTECTED]", True)
easycddaextractor/easycddaextractor.vbs: If objName =
"com.GWMicro.CheckForUpdate" And objState Then
easycddaextractor/easycddaextractor.vbs: ElseIf objName =
"com.GWMicro.StandardHelpDialog" Then
easycddaextractor/easycddaextractor.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate", 10) Is Nothing Then
easycddaextractor/easycddaextractor.vbs: Dim updateCheck
: Set updateCheck = SharedObjects("com.GWMicro.CheckForUpdate", 10).NewCheck
easycddaextractor/easycddaextractor.vbs: If Not
SharedObjects("com.GWMicro.StandardHelpDialog") Is Nothing Then
easycddaextractor/easycddaextractor.vbs: Set stdHelpDlg =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
hourly_chime/hourly_chime.vbs: If objName = "com.GWMicro.CheckForUpdate" And
objState Then
hourly_chime/hourly_chime.vbs: ElseIf objName =
"com.GWMicro.StandardHelpDialog" Then
hourly_chime/hourly_chime.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate", 10) Is Nothing Then
hourly_chime/hourly_chime.vbs: Dim updateCheck : Set
updateCheck = SharedObjects("com.GWMicro.CheckForUpdate", 10).NewCheck
hourly_chime/hourly_chime.vbs: If Not
SharedObjects("com.GWMicro.StandardHelpDialog") Is Nothing Then
hourly_chime/hourly_chime.vbs: Set stdHelpDlg
= SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
qboe/qboe.vbs: Dim updateCheck : Set updateCheck =
SharedObjects("com.GWMicro.CheckForUpdate", 30000).NewCheck
qboe/qboe.vbs:dim DHelp : Set DHelp =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
recordmacro/recordmacro.vbs:Dim HotkeyManager : Set HotkeyManager =
SharedObjects("com.GWMicro.HotkeyManager").NewDialog
recordmacro/recordmacro.vbs:Dim stdHelpDlg : Set stdHelpDlg =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
secondglass/secondglass.vbs: If objName = "com.GWMicro.CheckForUpdate" And
objState Then
secondglass/secondglass.vbs: ElseIf objName =
"com.GWMicro.StandardHelpDialog" Then
secondglass/secondglass.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate", 10) Is Nothing Then
secondglass/secondglass.vbs: Dim updateCheck : Set
updateCheck = SharedObjects("com.GWMicro.CheckForUpdate", 10).NewCheck
secondglass/secondglass.vbs: Dim stdHelpDlg : Set
stdHelpDlg = SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
showallscripts/showallscripts.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate") Is Nothing Then
showallscripts/showallscripts.vbs: Dim updateCheck : Set
updateCheck = SharedObjects("com.GWMicro.CheckForUpdate").NewCheck
showallscripts/showallscripts.vbs: If Not
SharedObjects("com.GWMicro.StandardHelpDialog") Is Nothing Then
showallscripts/showallscripts.vbs: Set
stdHelpDlg = SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
skype/skype.vbs: If objName = "com.GWMicro.CheckForUpdate" And objState
Then
skype/skype.vbs: ElseIf objName = "com.GWMicro.StandardHelpDialog" Then
skype/skype.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate", 10) Is Nothing Then
skype/skype.vbs: Dim updateCheck : Set updateCheck =
SharedObjects("com.GWMicro.CheckForUpdate", 10).NewCheck
skype/skype.vbs:Dim HotkeyManager : Set HotkeyManager =
SharedObjects("com.GWMicro.HotkeyManager").NewDialog
skype/skype.vbs: Dim stdHelpDlg : Set stdHelpDlg =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
vs2008/vs2008.vbs: Dim updateCheck : Set updateCheck =
SharedObjects("com.GWMicro.CheckForUpdate", 30000).NewCheck
vs2008/vs2008.vbs:Dim stdHelpDlg : Set stdHelpDlg =
SharedObjects("com.GWMicro.StandardHelpDialog", 30000).NewDialog
window_manager/window_manager.vbs: If objName =
"com.GWMicro.CheckForUpdate" And objState Then
window_manager/window_manager.vbs: ElseIf objName =
"com.GWMicro.StandardHelpDialog" Then
window_manager/window_manager.vbs: If Not
SharedObjects("com.GWMicro.CheckForUpdate", 10) Is Nothing Then
window_manager/window_manager.vbs: Dim updateCheck : Set
updateCheck = SharedObjects("com.GWMicro.CheckForUpdate", 10).NewCheck
window_manager/window_manager.vbs: Dim shd : Set shd =
SharedObjects("com.GWMicro.StandardHelpDialog").NewDialog
--
Doug Lee, Senior Accessibility Programmer
SSB BART Group - Accessibility-on-Demand
mailto:[EMAIL PROTECTED] http://www.ssbbartgroup.com
"While they were saying among themselves it cannot be done,
it was done." --Helen Keller
