powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Нет доступа к выбранной таблице
2 сообщений из 2, страница 1 из 1
Нет доступа к выбранной таблице
    #36782970
Сергей93
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
На форма лежит combo у котрого rowsource: producer.name

Activate формы
data1=DATE()
thisform.text1.value=data1
SELECT COUNT(*) FROM data1!note INTO ARRAY num_note
n_note=num_note(1)+1
PUBLIC nu_note
nu_note=n_note
thisform.text2.Value=nu_note
SELECT SUM(sum) FROM data1!temporary_get INTO ARRAY summas
IF ISNULL(summas)=.t. then
thisform.text9.Value=0
ELSE
thisform.text9.Value=summas(1)
ENDIF

Кнопка закрытьна форме
LOCAL lnI, loForm
loForm = NULL
FOR lnI=1 TO _SCREEN.FormCount
loForm = _SCREEN.Forms(m.lnI)
IF m.loForm.Name = "direct"
MESSAGEBOX("Закройте сначала справочник")
EXIT
ENDIF
loForm = NULL
ENDFOR
IF IsNull(m.loForm) = .T.
IF thisform.command1.Enabled= .t. then
SELECT temporary_get.name, temporary_get.num, temporary_get.price FROM data1!temporary_get INTO ARRAY new
IF thisform.text9.Value<>0 then
lim= ALEN(new)/3
FOR i=1 TO lim
nom1=(i*3)-2
nom2=(i*3)-1
nom3=(i*3)
name_goods=new(nom1)
SELECT deirect.name, deirect.num, deirect.price FROM data1!deirect WHERE deirect.name =name_goods INTO ARRAY old
new_num=old(2)- new(nom2)
sumed=new(nom2)*new(nom3)
UPDATE DATA1!Deirect SET num = new_num WHERE name=name_goods
ENDFOR
ENDIF
thisform.grid2.RecordSource=""
thisform.combo2.RowSource=""
DELETE FROM data1!temporary_get
CLOSE all
USE data1!temporary_get EXCLUSIVE
PACK
DO FORM 'main.scx'
thisform.Release()
ENDIF
ENDIF

при запуске формы выскакивает (через раз): нет доступа к выбранной таблице producer.name
Раньше все работало,пока не скинул весь проект на флешку и обратно...

как быть помогите...)))
...
Рейтинг: 0 / 0
Нет доступа к выбранной таблице
    #36783138
igorbik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сергей93,проверь атрибуты файлов. Могли поменяться при перезаписи.
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Нет доступа к выбранной таблице
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]