powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / добавление данных в SQL таблицу через курсор
8 сообщений из 8, страница 1 из 1
добавление данных в SQL таблицу через курсор
    #37882502
slatapol
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Необходимо данные из texbox поместить в таблицу sql через курсор.

ins_str= "insert into sluchai_obrahenia (tip_sluchai) values ('" + ALLTRIM(.text1.value)+ "')"
id7 =SQLEXEC(con, ins_str)
IF id7<=0
MESSAGEBOX("Ошибка при добавлении данных", 0, "Ошибка")
RETURN
ENDIF

вот код, но при добавление пишет, что ошибка
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882523
slatapol
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
помогите пожалуйста разобраться в чём причина
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882529
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
slatapol, а если кто-нибудь напишет в text1 такое
Код: sql
1.
1); truncate sluchai_obrahenia; select version(

, как думаете, кто получит по шапке?
PS. Для начала стОит узнать, какая именно ошибка возникает. Aerror() в помощь.
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882586
Valerii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
slatapolНеобходимо данные из texbox поместить в таблицу sql через курсор.

ins_str= "insert into sluchai_obrahenia (tip_sluchai) values ('" + ALLTRIM(.text1.value)+ "')"
id7 =SQLEXEC(con, ins_str)
IF id7<=0
MESSAGEBOX("Ошибка при добавлении данных", 0, "Ошибка")
RETURN
ENDIF

вот код, но при добавление пишет, что ошибка

уже ошибка в этом месте: ALLTRIM(.text1.value)
если изветна переменная на форме .text1.value тогда хотябы нужно вписвать ?.text1.value но и тут не все так гладко, нужно знать тип поля tip_sluchai и резать лишний текст, короче читай инструкции SQL
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882601
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Valerii,

Да потому что так не пишется Text1.Value
Пишется, например, THISFORM.Text1.Value
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882603
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorNG,

Пардон, Valerii
Ответ был, конечно, автору.
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882625
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorNG,

Пардон, Valerii
Ответ был, конечно, автору.
...
Рейтинг: 0 / 0
добавление данных в SQL таблицу через курсор
    #37882833
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
lvValue = ThisForm.text1.value
ins_str = "insert into sluchai_obrahenia (tip_sluchai) values (?m.lvValue)"
id7 = SQLEXEC(con, ins_str)
if id7 < 0
	Local laError(1)
	=aerror(laError)
	MessageBox("Ошибка при добавлении данных" + chr(13) + laError[2],0,"Ошибка")
endif



Вопросительный знак в данном контексте указывает на то, что за ним следует параметр. FoxPro сам попытается конвертировать его в нужное представление (если это возможно)

Ошибкой является только ситуация, когда SQLEXEC() возвращает значение меньше нуля. Значение равное 0 - это не ошибка. Это выполнение процесса в асинхронном режиме. Правда, в этом случае необходимо "зациклить" выполнение SQLEXEC(), чтобы дождаться окончания выполнения асинхронного процесса.

В случае ошибки на стороне сервера в массиве, который будет сформирован функцией aerror(), первый элемент всегда будет иметь значение 1526. А "расшифровка" причины ошибки будет в других элементах массива
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / добавление данных в SQL таблицу через курсор
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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