Отправлено: 06.09.11 13:40. Заголовок: ADS

Перекладываю отработанные приемы и методы работы с запросами ADS в консоле с хХарбоур на MiniGui.
На демо образцах все работает, на рабочей версии программы нет : запрос пустой
AdsPrepareSQL(sQlStr) - нормально отрабатывет
AdsExecuteSQL(sQlStr) не срабатывает

цитата:

sPar1:=Left(EXENAME(),RAT("\",EXENAME())) AdsConnect(sPar1+"DATA\") sAls:= aLIAS() if sAls ='QUERY' Close QUERY endif Select 0 AdsCreateSQLStatement('QUERY', 2) sQlStr:= ' SELECT * For DOC_ADD ' ' AdsPrepareSQL(sQlStr) AdsExecuteSQL(sQlStr) MsgInfo("RecCount ="+Str(QUERY->(RecCount()))) RashodEdit.Browse_1.Refresh go top RashodEdit.Browse_1.Value := RECNO() Select(nArea)

 Отправлено: 07.09.11 17:31. Заголовок: Увы! 2 дня угрохал. ..

Увы! 2 дня угрохал.
Нашел.
Описка в запросе.