powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / база данных
16 сообщений из 16, страница 1 из 1
база данных
    #36785168
Anton666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
помогите с устранением ошибок в базе, все хорошо работает, в форме "form1", когда нажимаешь кнопку добавить пишет ошибку "тип не соответсвует", попробуйте создать exe-файл,когда я создаю, он появляется, но при его запуске ничего не происходит
...
Рейтинг: 0 / 0
база данных
    #36785341
NickM82
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Anton666,

1. убрать из form1.load - APPEND BLANK
2. в Command2.CLick обратить внимание на поля и их значения, сделать как указано ниже,

INSERT INTO dbf_name [( fname1 [, fname2, ...])]
VALUES ( eExpression1 [, eExpression2, ...])
...
Рейтинг: 0 / 0
база данных
    #36785374
Anton666,
1. Слово Прим Е чание пишется через Е.
2. Переключение на рабочую область для insert sql на фиг не нужен ибо в самой команде дается конкретное указание на таблицу/курсор, в которую надо вставить данные. Итого Select ustroystva в кнопке Добавить долой.
3. Значения в после слова Values в команде insert должны идти в том же порядке, что и в списке полей до этого слова.
Код: plaintext
1.
2.
3.
With Thisform
  Insert Into ustroystva (Tip, Npsu, Zav, Dat, Sost, Primi);
    VALUES ((.txtTip.Value),(.txtNpsu.Value), (.txtZav.Value), (.txtDat.Value), (.txtSost.Value), (.txtPrimi.Value))
Endwith
Сравни со своим вариантом. Особо внимание обрати на ZAV и (.txtZav.Value).
4. Вкладывать в архив файлы *.bak, *.tbk, *.fxp - большой моветон.
...
Рейтинг: 0 / 0
база данных
    #36785850
Антон666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо большое за помощь, вот только не пойму что делать с exe-файлом??
...
Рейтинг: 0 / 0
база данных
    #36785868
Антон666,
почитать FAQ (окно мелькает и пропадает) на forum.foxclub.ru и там же статьи для начинающих. Ключевое слово - Read Events
...
Рейтинг: 0 / 0
база данных
    #36785964
Антон666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Был я уже там был, нифига не получается)))
...
Рейтинг: 0 / 0
база данных
    #36785985
Антон666Был я уже там был, нифига не получается)))Надо не просто побывать, а почитать и подумать. Потом попробовать. Если не получается показать пробованное и попросить помощи.
"нифига не получается" - это такое сообщение об ошибке?
...
Рейтинг: 0 / 0
база данных
    #36786028
Антон666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
_SCREEN.VISIBLE=.T.

ZOOM WINDOW SCREEN MAX
PUSH MENU _msysmenu

_jj = UPPER(SYS(16))
_num1 = AT('\baza\', _jj, 1)
lcdef10 = LEFT(_jj, _num1) + '\baza\'

SET DEFA TO &lcdef10

DO FORM glavnay
READ events

POP MENU _msysmenu

вот код программы, для которой делаю exe-файл, может в нем что-не правильно?
...
Рейтинг: 0 / 0
база данных
    #36786039
NickM82
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
может поможет?

http://www.firststeps.ru/foxpro/r.php?3
...
Рейтинг: 0 / 0
база данных
    #36786070
Антон666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
может поможет?

http://www.firststeps.ru/foxpro/r.php? 3 

не помогло(( может кто понимает что в проге не так?
...
Рейтинг: 0 / 0
база данных
    #36786102
Антон666_SCREEN.VISIBLE=.T.

ZOOM WINDOW SCREEN MAX
PUSH MENU _msysmenu

_jj = UPPER(SYS(16))
_num1 = AT('\baza\', _jj, 1)
lcdef10 = LEFT(_jj, _num1) + '\baza\'

SET DEFA TO &lcdef10

DO FORM glavnay
READ events

POP MENU _msysmenu

вот код программы, для которой делаю exe-файл, может в нем что-не правильно?Прелестно. Тепереь рассказываем на какую команду выдается ошибка "нифига не получается".
Или мы сами должны догадаться о результатах работы этой программы?
...
Рейтинг: 0 / 0
база данных
    #36789838
Антон666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Создаю ехе-файл для этой программы, начинаю запускать, он даже не включается
...
Рейтинг: 0 / 0
база данных
    #36789849
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Антон666не помогло(( может кто понимает что в проге не так?телепаты в отпуске
Антон666вот код программы, для которой делаю exe-файл, может в нем что-не правильно ?да, первое,что приходит на ум: представьте ситуацию, когда вашу программу захотят поставить в "C:\program files\preved\baza\medved\moya_superprogramma\". Чему станет равен lcdef в таком случае и чему он по идее должен быть равен?
Д/з: дописать одну букву, чтобы заработало ))
...
Рейтинг: 0 / 0
база данных
    #36791478
reware
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Очередной курсовик, или как здесь принято "тролль".
...
Рейтинг: 0 / 0
база данных
    #36792143
pioner-v
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Антон666_SCREEN.VISIBLE=.T.

ZOOM WINDOW SCREEN MAX
PUSH MENU _msysmenu

_jj = UPPER(SYS(16))
_num1 = AT('\baza\', _jj, 1)
lcdef10 = LEFT(_jj, _num1) + '\baza\'

SET DEFA TO &lcdef10

DO FORM glavnay
READ events

POP MENU _msysmenu

вот код программы, для которой делаю exe-файл, может в нем что-не правильно?

1) Вместо:
SET DEFA TO &lcdef10
Пропишите что-то вроде Set Default c:\MyDir\baza (в конце слэш не нужен!)

2) У Вас отсутствует установка SET PATH TO ...
...
Рейтинг: 0 / 0
база данных
    #36792192
pioner-v
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Антон666_SCREEN.VISIBLE=.T.

ZOOM WINDOW SCREEN MAX
PUSH MENU _msysmenu

_jj = UPPER(SYS(16))
_num1 = AT('\baza\', _jj, 1)
lcdef10 = LEFT(_jj, _num1) + '\baza\'

SET DEFA TO &lcdef10

DO FORM glavnay
READ events

POP MENU _msysmenu

вот код программы, для которой делаю exe-файл, может в нем что-не правильно?

1) Вместо:
SET DEFA TO &lcdef10
Пропишите что-то вроде Set Default to c:\MyDir\baza (в конце слэш не нужен!)

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


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