Ошибка при изменении БД

@ProstoMad · Регистрация: 30.06.2010

Author24 — интернет-сервис помощи студентам

Вот код

C++

   if(s.SubString(1,s.AnsiPos("#")-1)=="reg")
   {
     for(Form2->Table1->First();!Form2->Table1->Eof;Form2->Table1->Next())
       {
         Form2->Table1->Edit();
         if(Form2->Table1->FieldByName("Имя")->Text==s.SubString(s.AnsiPos("#")+1,(s.AnsiPos("%")-s.AnsiPos("#")-1)));
         {
           ServerSocket1->Socket->Connections[0]->SendText("/s#Такое имя уже существует, попробуй другое$");
           return;
         }
       }
     Form2->Table1->Append();
     Form2->Table1->Edit();
     Form2->Table1->FieldByName("Имя")->Text=s.SubString(s.AnsiPos("#")+1,s.AnsiPos("%")-s.AnsiPos("#")-1);
     Form2->Table1->FieldByName("Пароль")->Text=s.SubString(s.AnsiPos("%")+1,s.AnsiPos("@")-s.AnsiPos("%")-1);
     Form2->Table1->FieldByName("Дата")->Text=Date().CurrentDate();
     Form2->Table1->FieldByName("Время")->Text=Time().CurrentTime();
     Form2->Table1->FieldByName("IP")->Text=String(ServerSocket1->Socket->RemoteAddress);
     Memo1->Lines->Add(s);
   }

Где тут ошибка??
Если не видно где не правильно у меня, кину ошибку. просто не охота было скрин делать.

@Larsus · 24.09.2010, 08:15

Интересный у тебя цикл, никогда подобных записей не встречал, а вообще тебе не кажется что намного удобнее было бы запросом проверить есть такое имя в БД

C++

1	(SELECT бла бла бла FROM имя твоей таблицы WHERE Имя = '"+s.SubString(s.AnsiPos("#")+1,(s.AnsiPos("%")-s.AnsiPos("#")-1))+"' )

или нету оно и намного быстрее было и добавить в БД новую запись запросом тоже намного удобнне

не по теме:
Или Челябинские программисты настолько суровые что им проще в случае чего перебрать 1000 а иногда и более записей на нахождения повтора чем пойти по легкому пути и воспользоваться запросом=)

@ProstoMad · 24.09.2010, 14:46 **[ТС]**

Сообщение от Larsus

не по теме:
Или Челябинские программисты настолько суровые что им проще в случае чего перебрать 1000 а иногда и более записей на нахождения повтора чем пойти по легкому пути и воспользоваться запросом=)

чет типа того)

Сообщение от Larsus

намного удобнее было бы запросом проверить есть такое имя в БД

я не умею так. не знаю что делать с Select From Where

Добавлено через 5 часов 8 минут
Так про ошибку ничего не знаешь?

Добавлено через 43 минуты
или напишите пример с Select From и Where

@Larsus · 24.09.2010, 15:02

C++

    Query1->Close();
    Query1->SQL->Clear();
    Query1->SQL->Add("SELECT COUNT(*) AS CNT FROM 1 WHERE 2 =" + s.SubString(s.AnsiPos("#")+1,(s.AnsiPos("%")-s.AnsiPos("#")-1)));
    Query1->Open();
    if (Query1->FieldByName("CNT") != 0)
    {
        //такое имя уже существует
    }

заместо цифр в запросе
1 - название твоей таблицы
2 - имя поля в котором ищешь совпадение

ну и разумееться компоненту Query1 не забудь перед этим указать настройки соединения с БД как ты компоненту Table делал

@ProstoMad · 24.09.2010, 16:12 **[ТС]**

в

C++

1	if (Query1->FieldByName("CNT") != 0)

что делает

Сообщение от Larsus

"CNT"

Добавлено через 52 секунды
и для чего надо закрывать Query в самом начале?

@Larsus · 25.09.2010, 08:05

Сообщение от ProstoMad

в
Код C++
1
if (Query1->FieldByName("CNT") != 0)
что делает
Сообщение от Larsus
"CNT"

мда тут ошибочка вышла правильно будет if (Query1->FieldByName("CNT")->AsInteger != 0)

на счет CNT, если просто написать

SQL

1	SELECT COUNT(*) FROM 1 WHERE бла бла бла

то ты не сможешь обратиться к полю в котором будет выведено количество записей так как запись типа

C++

1	Query1->FieldByName("COUNT(*)")->AsInteger

не будет работать, поэтому в самом запросе мы присваиваем нужное название этому полю я присвоил CNT можешь написать все что угодно только не забудь поставить AS.

Сообщение от ProstoMad

и для чего надо закрывать Query в самом начале?

Ну вообще это я всегда делаю на автомате и никогда не пробовал его не закрывать=), имхо так корректней ведь после его открытия ты же его не закрываешь значит в след раз он будет открыт перед его использованием=)

@ProstoMad 50 / 40 / 5 Регистрация: 30.06.2010 Сообщений: 1,191
	24.09.2010, 14:46 [ТС]	3
	Сообщение от Larsus не по теме: Или Челябинские программисты настолько суровые что им проще в случае чего перебрать 1000 а иногда и более записей на нахождения повтора чем пойти по легкому пути и воспользоваться запросом=) чет типа того) Сообщение от Larsus намного удобнее было бы запросом проверить есть такое имя в БД я не умею так. не знаю что делать с Select From Where Добавлено через 5 часов 8 минут Так про ошибку ничего не знаешь? Добавлено через 43 минуты или напишите пример с Select From и Where 0

	25.09.2010, 08:05