Написал небольшой скрипт который проходится по таблице и заменяет пустые поля в столбце на no_date, скрипт прикрепил на кнопку на панели инструментов, но при запуске выдает след. ошибку "A(n) Nil object does not recognize request theVTab" ... возник ряд вопросов:
1. что за ошибка и как избавиться от нее
2. кнопка должна быть на панели инструментов таблицы или можно оставь на Вьеве
3. надо ли во время работы скрипта заходить с start editing таблицы
вот код скрипта
theTable = av.GetProject.FindDoc("c:\arcview\astrakhan\homes.dbf")
theVTab = theTable.GetVTab
nameField = theVTab.FindField("Tip_zdania")
for each rec in theVTab
if (theVTab.ReturnValue(nameField,rec) = " ") then
thevTab.SetValue(nameField.rec, "no_date")
end
end
theVTab.Refresh
************************
начитать таблицу в проект, скрипт работает с активной таблицей, дополнительно можно сделать и с активным столбцом, кнопку повесить на меню работы с таблицами
theTable = av.GetActiveDoc.GetVTab
nameField = theTable.FindField("Tip_zdania")
theTable.StartEditingWithRecovery
for each rec in theTable
if (theTable.ReturnValue(nameField,rec)="") then
theTable.SetValue(nameField,rec, "no_date")
end
end
theTable.StopEditingWithRecovery(true)
