Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ошибка синтаксиса (пропущен оператор), в выражении Edit1->Text 
:(
    Опции темы
megabist
Дата 7.4.2007, 17:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Вот и следующая проблема....  суть:  отинсертить в  таблицу данные которые вводятся кв разные компоненты на форме
/* местами конечно сделано по индийски но так получилось...*/
иьтак первый вариант:
Код

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
TDateTime d_x;
TDateTime d_y;
AnsiString nu;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
d_x=StrToDate(Edit2->Text+"."+Edit3->Text+"."+Edit4->Text);

d_y=StrToDate(Edit5->Text+"."+Edit6->Text+"."+Edit7->Text);
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES ("+Edit1->Text+", "+Memo1->Text+", "+DateToStr(d_x)+", "+DateToStr(d_y)+")");
ADOQuery1->Open();

}
//---------------------------------------------------------------------------



вот второй вариант сделаный по советам:

Код

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
TDateTime d_x;
TDateTime d_y;
AnsiString nu;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
d_x=StrToDate(Edit2->Text+"."+Edit3->Text+"."+Edit4->Text);

d_y=StrToDate(Edit5->Text+"."+Edit6->Text+"."+Edit7->Text);
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES (:Prm1, :Prm2, Prm3, Prm4)");
ADOQuery1->Parameters->ParamByName(":Prm1")->Value=Edit1->Text;
ADOQuery1->Parameters->ParamByName(":Prm2")->Value=Memo1->Text;
ADOQuery1->Parameters->ParamByName(":Prm3")->Value=DateToStr(d_x);
ADOQuery1->Parameters->ParamByName(":Prm4")->Value=DateToStr(d_y);
ShowMessage(ADOQuery1->SQL->Text);
ADOQuery1->Open();

}
//---------------------------------------------------------------------------



В обоих случаяш ошибка по сабжу!!!! помогите!!!


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
codelord
Дата 7.4.2007, 18:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 777
Регистрация: 7.5.2005
Где: ты моя темноглаза я где?!

Репутация: 16
Всего: 39
у меня копмилится и первое и второе


--------------------
Доступен поиск по исходным кодам в GOOGLE.
http://www.google.com/codesearch
PM MAIL   Вверх
megabist
Дата 7.4.2007, 18:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
гммм, компилиться, это да ошибка в процессе работы возникает


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
mr.Anderson
Дата 8.4.2007, 13:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


Профиль
Группа: Участник Клуба
Сообщений: 3374
Регистрация: 20.12.2004
Где: далеко

Репутация: 3
Всего: 128
megabist, конкретно какая ошибка? Вслепую-то искать сложно.


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
megabist
Дата 8.4.2007, 13:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Ошибка синтаксиса (пропущен оператор) в выражении Edit1->Text
вот прям такая вот ошибка, прям по русски!!!!!


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
JAnty
  Дата 8.4.2007, 13:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 366
Регистрация: 6.12.2004
Где: Москва

Репутация: 1
Всего: 2
Цитата(megabist @  8.4.2007,  13:20 Найти цитируемый пост)
Ошибка синтаксиса (пропущен оператор) в выражении Edit1->Text


Тогда компилиться не должно.

Добавлено через 2 минуты и 1 секунду
Цитата(megabist @  8.4.2007,  13:20 Найти цитируемый пост)
прям по русски!!!!! 


Не советую пользоваться руссифицированым Builder'ом.


--------------------
Русский справочник по WinAPI

Возможно всё, что возможно вообразить! Это и значит быть гением как я!
PM MAIL   Вверх
megabist
Дата 8.4.2007, 13:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Охххх мамаджян!
Итак оно компилиться но не работает тут нужно добавить строки в таблицу а оно не добавляет!!!
Билдер не русифицированный, про руссифку сам прекрасно всё знаю и давно уже не юзаю!!!


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
JAnty
  Дата 8.4.2007, 13:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 366
Регистрация: 6.12.2004
Где: Москва

Репутация: 1
Всего: 2
Цитата

Ошибка синтаксиса (пропущен оператор) в выражении Edit1->Text


Ошибка не в этом. Поэксперементируй без Edit1->Text... Может значение не допустимое, или слишком длинное...


--------------------
Русский справочник по WinAPI

Возможно всё, что возможно вообразить! Это и значит быть гением как я!
PM MAIL   Вверх
megabist
Дата 8.4.2007, 14:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
итак вот код новый слегка... ошибка другая... прикладываю к нему БД!!!
Код

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
TDateTime d_x;
TDateTime d_y;
AnsiString nu;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
AnsiString s=ExtractFileDir(GetCommandLine())+ "\\dump.mdb";
s.Delete(1,1);
ADOQuery1->ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+s+";Persist Security Info=False";
ADOQuery1->Open();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
d_x=StrToDate(Edit2->Text+"."+Edit3->Text+"."+Edit4->Text);

d_y=StrToDate(Edit5->Text+"."+Edit6->Text+"."+Edit7->Text);
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
nu=NULL;
//"INSERT INTO main VALUES (NULL, Edit1->Text, Memo1->Text, d_x, d_y, NULL );";
ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES ('"+Edit1->Text+"', '"+Memo1->Text+"', '"+DateToStr(d_x)+"', '"+DateToStr(d_y)+"')");
/*ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES (:Prm1, :Prm2, Prm3, Prm4)");
ADOQuery1->Parameters->ParamByName("Prm1")->Value=Edit1->Text;
ADOQuery1->Parameters->ParamByName("Prm2")->Value=Memo1->Text;
ADOQuery1->Parameters->ParamByName("Prm3")->Value=DateToStr(d_x);
ADOQuery1->Parameters->ParamByName("Prm4")->Value=DateToStr(d_y);
ShowMessage(ADOQuery1->SQL->Text);*/
//ADOQuery1->SQL->Add("INSERT INTO main SET Name="+Edit1->Text+", Description="+Memo1->Text+", DateX="+DateToStr(d_x)+", DateY="+DateToStr(d_y));

ADOQuery1->Open();

}
//-------


Добавлено через 59 секунд
ошибка такая:
текущий проводник не поддерживает возвращение нескольких наборов записей в результате одной операции

Присоединённый файл ( Кол-во скачиваний: 8 )
Присоединённый файл  dump.rar 8,84 Kb


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
JAnty
  Дата 8.4.2007, 15:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 366
Регистрация: 6.12.2004
Где: Москва

Репутация: 1
Всего: 2
Попробуй не так
Код

ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES ('"+Edit1->Text+"', '"+Memo1->Text+"', '"+DateToStr(d_x)+"', '"+DateToStr(d_y)+"')");

а так
Код

//char *tmp...
AnsiString tmp="INSERT INTO main (Name,Description,DateX,DateY) VALUES ('"+Edit1->Text+"', '"+Memo1->Text+"', '"+DateToStr(d_x)+"', '"+DateToStr(d_y)+"')";

ADOQuery1->SQL->Add(tmp);

ИМХО...
Польше ничего не могу предложить.


--------------------
Русский справочник по WinAPI

Возможно всё, что возможно вообразить! Это и значит быть гением как я!
PM MAIL   Вверх
megabist
Дата 8.4.2007, 17:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Ошибка инструкции инсерт инто!! вот такая вот загогулина теперь!!!!!


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
codelord
Дата 8.4.2007, 21:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 777
Регистрация: 7.5.2005
Где: ты моя темноглаза я где?!

Репутация: 16
Всего: 39
а так
Код

ADOQuery1->SQL->Add("INSERT INTO main (Name,Description,DateX,DateY) VALUES ( '"+Edit1->Text+"', '"+Memo1->Text.Trim()+"','"+DateToStr(d_x)+"', '"+DateToStr(d_y)+"')");



--------------------
Доступен поиск по исходным кодам в GOOGLE.
http://www.google.com/codesearch
PM MAIL   Вверх
megabist
Дата 8.4.2007, 21:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Нет, всё равно не работает =((


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
codelord
Дата 8.4.2007, 21:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 777
Регистрация: 7.5.2005
Где: ты моя темноглаза я где?!

Репутация: 16
Всего: 39
у тебя результирующая строка вписывается в рамки описания структуры таблицы?
т.е. Если ты в консоли кинешь эту строку она у тебя инсертится? 
потом у как у меня в консоли все работает все поля поставил на varchar (20)


--------------------
Доступен поиск по исходным кодам в GOOGLE.
http://www.google.com/codesearch
PM MAIL   Вверх
megabist
Дата 8.4.2007, 22:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Mart Slaaf
**


Профиль
Группа: Участник
Сообщений: 455
Регистрация: 3.4.2006
Где: Мск

Репутация: нет
Всего: 31
Да всё подходит превышений размеров нету, но вот когда я вписываю интеджер, который берётся из едита, как мне его точно вписывать... я просто из книги так и не понял, с кавычками, без?...


--------------------
Don't panic!

Жди, и Фатум тебя приведёт...
PM MAIL ICQ Skype GTalk   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0644 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.