В базе данных надо создать средство поиска.
Private Sub Кнопка13_Click()
Dim ssql As String
Dim conn As ADODB.connection
Set conn = CurrentProject.connection
ssql = "SELECT Таблица1.Машина, Таблица1.Станция, Таблица1.Дата "
ssql = ssql & "FROM Таблица1 "
ssql = ssql & "WHERE (Таблица1.Машина='ваз 2106');"
conn.Execute ssql
conn.Close
End Sub
таким вот кодом я пытаюсь создать и выполнить запрос на выборку… но ничего не работает. Проблема в том, что обычный построитель запросов использовать нельзя, т. к. условия выборки должны зависеть от других условий(к примеру если установлен флажок1, поле2 заполнено и т. д., то добавить в запрос соответствующие условия).
Можно и надо ли использовать здесь SQL, и какие другие могут быть способы?
28 апреля 2008 в 13:01
всё, нашел… select table2.* into table from table2
27 апреля 2008 в 23:03
жесть
>Private Sub Кнопка13_Click()
>Dim ssql As String
>Dim conn As ADODB.connection
>Set conn = CurrentProject.connection
>ssql = "SELECT Таблица1.Машина, Таблица1.Станция, Таблица1.Дата "
>ssql = ssql & "FROM Таблица1 "
>ssql = ssql & "WHERE (Таблица1.Машина='ваз 2106');"
>conn.Execute ssql
>conn.Close
>End Sub
а что вы думаете должно произойти?
ADODB.Connection.Execute возвращает Recordset, с которым ничего не происходит. он даже не закрывается явным образом. более того, совершается попытка закрыть коннекшн, который пользователь никак не должен закрывать.
26 апреля 2008 в 14:02
какие-то извращения, а точно правильное условие выбора? может дело с регистром лишним пробелом?
проще искать по Like…
SELECT * FROM моя_таблица WHERE мое_поле Like "%ищу этот текст%"
25 апреля 2008 в 23:01
минус метода в том, что объект надо не забыть убить потом…
и имя запросу надо случайное задавать, а то 2 пользователя одновременно запустят поиск и пройдут запросы на создание 2 объектов с одним именем – косяк который потом надо ручками править (удалять объект)
25 апреля 2008 в 18:05
попробую… не такой уж и корявый способ, другие варианты-десятки страниц кода ADO на VBA.
25 апреля 2008 в 18:04
я как то раз делал что-то наподобие… я применил возможно самый корявый способ, но зато он работал. Я на основании полученной строки запроса (в твоем случае ssql) создавал новый объект БД запрос, в который и запихивал эту строку. А потом уж вызывал просто сам запрос…
25 апреля 2008 в 18:04
Если исходники найду – то выложу
25 апреля 2008 в 10:03
ни на че ни ругается просто ничего не происходит
24 апреля 2008 в 23:00
а на что собственно ругается?
24 апреля 2008 в 22:00
мда невесело (((
24 апреля 2008 в 20:01
люди ну помогите кто нить че никто не знает?