Тема: K3-Мебель
Показать сообщение отдельно
Старый 05.07.2010, 10:42   #8
homka
Новичок
 
Регистрация: 18.06.2010
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Вес репутации: 0
homka пока не определено
По умолчанию

Цитата:
Сообщение от K3Dmitriy Посмотреть сообщение
res=fmdbscript(GetProtoMac("Shkaf.ptl")+"PKMScrLib .mdb","FileSystem","FsoIsFileExist",ProtoPath+"Zak Par.txt");
if (res==1) { script MDB GetProtoMac("Shkaf.ptl")+"PKMScrLib.mdb" "FileSystem" "FsoDeleteFile" ProtoPath+"ZakPar.txt"; }

Функция инициирует исполнение функции FsoIsFileExist (проверка на существование объекта/файла) в сценарии FileSystem базы данных PKMScrLib.mdb, входной параметр файл ZakPar.txt Возвращаемое значение 1/0.
В случае возвратившего значения равному 1, выполняется функция FsoDeleteFile (удаление объекта/файла).
Спасибо, функция FileSystem встроена в МДБ и нормально отрабатывает без ошибок
добавляю свою через К3талк
Sub MyScript()
MsgBox("не работает")
End Sub
Вроде все просто и должно работать
но К3 выдает ошибку выполнения скрипта
Де моя ошибка подскажте плиз
homka вне форума   Ответить с цитированием Вверх