ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблема при создании exe-файла
4 сообщений из 4, страница 1 из 1
Проблема при создании exe-файла
    #36031530
UnderFade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
UnderFade
Гость
Здравствуйте.

Столкнулся со следующей проблемой:

Есть форма, созданная в FoxPro 8. Во время работы с формой непосредственно из VFP8 все прекрасно работает, а именно по запросу из базы данных делается cursor и заполняются значения в grid.

Вопрос в следующем: Когда мною был создан exe-файл, перестала заполняться данная таблица. Никаких ошибок при этом не всплывает. На этой же форме также осуществляется другой запрос к этой же таблице и данные записываются в другой grid, эти данные воспроизводятся нормально. Вопрос - почему так происходит?

Суть запроса - в текстовые поля (Region и Block) поступают значения из первого grid-а (первый запрос, который проходит нормально). Запрос к таблице делается на основании значений этих полей, и, если они равны, запись попадает в cursor.

Могу привести текст данного запроса (может ошибка скрылась где-нибудь здесь)

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
*----------------------------------------------------------
*Âûâîä ïîäðîáíîé èíôîðìàöèè ïî âûáðàííîìó êâàðòàëó
*----------------------------------------------------------
THISFORM.DetailedGrid.RecordSource=""
ThisForm.DetailedGrid.ColumnCount =  15 
ThisForm.DetailedGrid.Column1.Width = ThisForm.RegionBlockGrid.Column1.Width 
SELECT Section,Data_lay,Diam,Type_lay,Type_isol,Long,Data_kp,Place_kp,N_id,Qq,Ep,Count_def,Sh_ep,Zamena,P2005;
	FROM Tabmain;
		WHERE (Block=thisform.Block.value) AND (region=thisform.Region.value);
			INTO CURSOR MyCursor2 NOFILTER READWRITE ;

WITH THISFORM.DetailedGrid
     .RecordSource = "MyCursor2"
     .Column1.ControlSource = "MyCursor2.Section"
     .Column1.header1.caption="Ó÷àñòîê"
     .Column2.ControlSource = "MyCursor2.Data_lay"
     .Column2.header1.caption="Äàòà ïðîêëàäêè"
     .Column3.ControlSource = "MyCursor2.Diam"
     .Column3.header1.caption="Äèàìåòð"
     .Column4.ControlSource = "MyCursor2.Type_lay"
     .Column4.header1.caption="Òèï ïðîêëàäêè"
     .Column5.ControlSource = "MyCursor2.Type_isol"
     .Column5.header1.caption="Òèï èçîë."
     .Column6.ControlSource = "MyCursor2.Long"
     .Column6.header1.caption="Äëèíà ó÷àñòêà"
     .Column7.ControlSource = "MyCursor2.Data_kp"
     .Column7.header1.caption="Äàòà êàï ðåìîíòà"
     .Column8.ControlSource = "MyCursor2.Place_kp"
     .Column8.header1.caption="Ìåñòî êàï ðåìîíòà"
     .Column9.ControlSource = "MyCursor2.N_id"
     .Column9.header1.caption="Èäåíòèôèêàòîð"
     .Column10.ControlSource = "MyCursor2.Qq"
     .Column10.header1.caption="Íàëè÷èå ÒÀ"
     .Column11.ControlSource = "MyCursor2.Ep"
     .Column11.header1.caption="Îöåíêà êîðð. èçíîñà"
     .Column12.ControlSource = "MyCursor2.Count_def"
     .Column12.header1.caption="Îáù. êîë-âî äåôåêòîâ"
     .Column13.ControlSource = "MyCursor2.Sh_ep"
     .Column13.header1.caption="Ãîä ïîñë. çàìåðà êîðð."
     .Column14.ControlSource = "MyCursor2.Zamena"
     .Column14.header1.caption="Ìåòðàæ çàìåíåí. òðóá"
     .Column15.ControlSource = "MyCursor2.P2005"
     .Column15.header1.caption="Ïàðàìåòð P*" 
ENDWITH
THISFORM.DetailedGrid.Visible= .T.
*----------------------------------------------------------

ЗЫ проблемы с кодировкой, но я не думаю, что это суть важно.
...
Рейтинг: 0 / 0
08.06.2009, 16:57
| Ответить | Цитировать | Написать  
Проблема при создании exe-файла
    #36031584
UnderFade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
UnderFade
Гость
На форме происходит обращение к различным базам данных, у которых структура и имя таблицы, к которой я обращаюсь одинаковое. Открытие происходит по выбору из списка доступных баз данных, закрытие осуществляется по кнопке, поэтому таблица не могла закрыться до выполнения данного запроса.
...
Рейтинг: 0 / 0
08.06.2009, 17:17
| Ответить | Цитировать | Написать  
Проблема при создании exe-файла
    #36031605
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Непосредственно перед выполнением запроса посмотри какое значение имеют

thisform.Block.value
thisform.Region.value

Хотя бы через MessageBox(). Скорее всего, хотя бы одно из них имеет не корректное значение, что и приводит к пустой результирующей выборке. Это можно проверить по тому, что вернет _TALLY сразу после выполнения запроса или Reccount("MyCursor2")
...
Рейтинг: 0 / 0
08.06.2009, 17:28
| Ответить | Цитировать | Написать  
Проблема при создании exe-файла
    #36031646
UnderFade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
UnderFade
Гость
ВладимирМ , спасибо за MessageBox, которые помогли выйти на правильное решение.

Из-под VFP все работало нормально, а под exe не находило, хотя значения полей не затирались.

Ошибку исправил в следущем месте:
Код: plaintext
WHERE (ALLTRIM(Block) = ALLTRIM(thisform.Block.value)) AND (ALLTRIM(region)=ALLTRIM(thisform.Region.value));

хотя, по идее, значения из одной и той же таблицы, и между ними должно быть полное соответствие. Странно, что работало все нормально под VFP и не работало под exe.
...
Рейтинг: 0 / 0
08.06.2009, 17:43
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Проблема при создании exe-файла
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=36031530&tid=1586350]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 35ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 13ms
total:  136ms
созд. / загр.: 136ms
x
x
Закрыть


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