Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Эскейп символов в запросе 
:(
    Опции темы
Vidocq
Дата 2.3.2006, 14:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 431
Регистрация: 15.12.2004
Где: Запорожье, Украин а

Репутация: нет
Всего: 7
Код

strOpen = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:Usoltseva.mdb"
strSQL = "INSERT INTO operation_results ([Data], [Dohod], [VyplSum], [Ostatok]) VALUES(" & datanach & ", " & [dohod] & ", " & [vyplsum] & ", " & [ostatok] & ")"
Debug.Print strSQL


Set cnn = New ADODB.Connection
cnn.Open strOpen

Set cmd = New ADODB.Command
Set cmd.ActiveConnection = cnn
cmd.CommandText = strSQL
cmd.Prepared = True
cmd.Execute



Проблема в том, что при дебаге strSQL получается:
Код

INSERT INTO operation_results ([Data], [Dohod], [VyplSum], [Ostatok]) VALUES(02.03.2006, 6,16, 6300, -6294)

То есть из-за запятых в числах вылазит ошибка Number of query values and destination fields are not the same.

Как мне проэскейпить запятые?

Заранее благодарен.



--------------------
Всё течёт ©
PM MAIL ICQ   Вверх
Exception
Дата 2.3.2006, 14:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 7
Всего: 186
А что вообще такое за [dohod], etc? Числа? Если да, зачем ты их берешь в квадратные скобки? Просто заменяй все запятые в этих строчках точками, и все будет ОК smile
PM   Вверх
Vidocq
Дата 2.3.2006, 14:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 431
Регистрация: 15.12.2004
Где: Запорожье, Украин а

Репутация: нет
Всего: 7
Exception,
числа в полях формы вычисляются по полям в БД. Я руками их не ввожу


--------------------
Всё течёт ©
PM MAIL ICQ   Вверх
Exception
Дата 2.3.2006, 16:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 7
Всего: 186
Я же сказал: перед выполнением запроса заменяй все запятые точками. Replace тебе в руки.
PM   Вверх
Vidocq
Дата 2.3.2006, 16:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 431
Регистрация: 15.12.2004
Где: Запорожье, Украин а

Репутация: нет
Всего: 7
Exception,
а если там не будет запятых? (Я же не знаю, что получится в результате вычитания двух чисел) ...


--------------------
Всё течёт ©
PM MAIL ICQ   Вверх
Vidocq
Дата 2.3.2006, 17:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 431
Регистрация: 15.12.2004
Где: Запорожье, Украин а

Репутация: нет
Всего: 7
Переписал запрос так:
Код

strSQL = "INSERT INTO operation_results (Data, Dohod, VyplSum, Ostatok) "
strSQL = strSQL & " VALUES(" & "'" & datanach & "'" & ", "
strSQL = strSQL & Replace(dohod, ",", ".") & ", "
strSQL = strSQL & vyplsum & ", " & ostatok & ")"


ну и кривизна, блиииин

Проблема решилась

Это сообщение отредактировал(а) Vidocq - 2.3.2006, 17:40


--------------------
Всё течёт ©
PM MAIL ICQ   Вверх
Akina
Дата 2.3.2006, 18:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
Цитата(Vidocq @ 2.3.2006, 18:39 Найти цитируемый пост)
ну и кривизна, блиииин

а при чем тут кривизна? у тебя локация русская? значит, делитель десятичный - запятушка... выясняй, какого дьявола у тебя этот твой dohod приходит стрингом, а не чисельно - грабли твои именно отсюда...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

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

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

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

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

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

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


 




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


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

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