![]() |
|
Модераторы: Akina |
![]()
|
|
| Baa |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2639 Регистрация: 12.4.2002 Где: Москва Репутация: нет Всего: 12 |
Есть у нас два дробных числа...
А далее, нам надо составить запрос сикульный на внесение этого числа в табличку... но тут возникает проблема, сикул ругается на зяпятую в числе... Точку он хочет... че делать? -------------------- "Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande |
|||
|
||||
| Vit |
|
|||
![]() Vitaly Nevzorov ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: нет Всего: 207 |
1) Пишем кверю с параметрами
2) Передаём все числа в крерю через параметры Суть вот в чём. Если ты посылаешь кверю на сервер, то вовсе не факт, что национальные кодировки на сервере те же что и в программе, а если через параметры, то сервер сам преобразует их к нужному виду. -------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
| Baa |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2639 Регистрация: 12.4.2002 Где: Москва Репутация: нет Всего: 12 |
Дык дело в том, что такой же код, токо на яваскрипте отлично работает... ну нужен именно вбс...
Вот как тут чего передать? з.ы. я басик жутко фигово знаю strDSN = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Billing1;Data Source=SERVER" Set objConn = WScript.CreateObject("ADODB.Connection") Set objRs1 = WScript.CreateObject("ADODB.RecordSet") objConn.Open strDSN strSQL = "SELECT * FROM tblUsers" objRs1.Open strSQL, strDSN objRs1.MoveFirst() do while not (objRs1.EOF) ID = objRs1.Fields("ID").Value US = objRs1.Fields("UserSumm").Value UserSummNew = US - 0.75 strSQL = "UPDATE tblUsers SET UserSumm = " & UserSummNew & " WHERE ID = " & ID WScript.echo (strSQL) objConn.Execute (strSQL) objRs1.MoveNext() Loop objRs1.Close() objConn.Close() -------------------- "Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande |
|||
|
||||
| Vit |
|
|||
![]() Vitaly Nevzorov ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: нет Всего: 207 |
А если точку на запятую заменить? Разница может быть в том что одни языки могут точку считать всегда десятичным разделителем, а другие брать значение десятичного разделителя из текущих установок винды...
-------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
| Baa |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2639 Регистрация: 12.4.2002 Где: Москва Репутация: нет Всего: 12 |
О! Пасибо те!
-------------------- "Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande |
|||
|
||||
| Vit |
|
|||
![]() Vitaly Nevzorov ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 10964 Регистрация: 25.3.2002 Где: Chicago Репутация: нет Всего: 207 |
Просто Java - многоплатформенная, поэтому десятичный разделитель найти не в состоянии и использует только точку, а VB - только под винду, там национальные форматы чётко определены, вот и берёт формат винды...
-------------------- With the best wishes, Vit I have done so much with so little for so long that I am now qualified to do anything with nothing Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru |
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |