Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!! / 8 сообщений из 8, страница 1 из 1
02.05.2008, 21:59
    #35290821
Sansey
Sansey
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
у меня есть таблица из БД Access я ее подключил при помощи компонентов Data1 и DBGrid
Я хочу создать запрос, который будет осуществлять отбор даных по названию, введеному в компонент TextBox, я пишу в кнопку код следующего вида:
DataGrupi_Tovarov.RecordSource = "SELECT * FROM Grupi_tovorov where(nazva = Chr(34) & TextGrupi_Tovarov & Chr(34) )"
DataGrupi_Tovarov.Refresh

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



Private Sub Command1_Click()
DataGrupi_Tovarov.RecordSource = "SELECT * FROM Grupi_tovorov where(nazva = Chr(34) & TextGrupi_Tovarov & Chr(34) )"
DataGrupi_Tovarov.Refresh
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.05.2008, 22:29
    #35290833
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
Сделай:
Код: plaintext
1.
2.
3.
4.
Private Sub Command1_Click()
DataGrupi_Tovarov.RecordSource = "SELECT * FROM Grupi_tovorov where(nazva = Chr(34) & TextGrupi_Tovarov & Chr(34) )"
debug.print DataGrupi_Tovarov.RecordSource 
DataGrupi_Tovarov.Refresh
End Sub
и ужаснись какую фигню ты на самом деле просишь у сервера.

Названия темы надо делать по человечески. И не бойся, админы удаляют только спам.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.05.2008, 23:30
    #35290853
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
Код: plaintext
1.
DataGrupi_Tovarov.RecordSource = "SELECT * FROM Grupi_tovorov where nazva = " & Chr( 34 ) & TextGrupi_Tovarov.Text &   Chr( 34 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2008, 17:03
    #35291101
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
а вы уверены что Chr(34) а не Chr(39)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2008, 20:07
    #35291222
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
chr(39) для MSSQL
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2008, 22:27
    #35291324
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
простите великодушно
я ведь действительно спутал с SQL SERVER
ACCESS давно не трогал
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.05.2008, 14:58
    #35299991
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
А не проще ли

Код: plaintext
DataGrupi_Tovarov.RecordSource = "SELECT * FROM Grupi_tovorov where nazva = '"  TextGrupi_Tovarov.Text &   "';"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.05.2008, 15:03
    #35300017
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!!
Пардон, & забыл. ИМХО - корректнее будет так:

Код: plaintext
1.
2.
Dim KU as String
KU = TextGrupi_Tovarov.Text
DataGrupi_Tovarov.RecordSource = "SELECT [Grupi_tovorov].* FROM Grupi_tovorov where [Grupi_tovorov].[nazva] = '"   & KU &   "';"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите плиз! Умоляю!!! Админі не удаляйте ету тему покамесь не помогут!!! / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 388ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2162330]:
 0ms
get settings:
 14ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 35ms
get topic data:
 10ms
get forum data:
 4ms
get page messages:
 65ms
get tp. blocked users:
 2ms
others: 233ms
total:  388ms
x
x
Закрыть


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