Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Дата содержит синтактическую ошибку....
 
 автор: SONAR   (14.10.2009 в 10:28)   личное сообщение
 
 

Робяты, в чем трабла?
Есть форма, с полем со списком Дата, есть Кнопка3 со следующим кодом на клик:

Private Sub Кнопка3_Click()
On Error GoTo Err_Кнопка3_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "subf_280000"

stLinkCriteria = "[Дата]=" & "#" & Me![Дата] & "#"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Кнопка3_Click:
Exit Sub

Err_Кнопка3_Click:
MsgBox Err.Description
Resume Exit_Кнопка3_Click

End Sub


По сути понятнО, что при клике открывается форма с отобранными записями по полю со списком...
но, MSA пишет "Дата содержит синтактическую ошибку в выражении запроса '[Дата] = #13.10.2009#'.
Чё с синтаксисом не пойму...

  Ответить  
 
 автор: snipe   (14.10.2009 в 10:31)   личное сообщение
 
 

а так
stLinkCriteria = "[Дата]=" & Me![Дата]

  Ответить  
 
 автор: kot_k_k   (14.10.2009 в 10:34)   личное сообщение
 
 

ААА, мать Акс, опять про даты.
Даты в Аксе, опять маму его, должны преобразовываться в вид - мм/дд/гг - вот тогда понимат.

Format(Date, "mm\/dd\/yyyy") вот так преобразуй и должно прокатить.


stLinkCriteria = "[Дата]=" & "#" & format(Me![Дата], "mm\/dd\/yyyy") & "#"

  Ответить  
 
 автор: SONAR   (14.10.2009 в 10:42)   личное сообщение
 
 

Второй вариант прошел, спасибо....
Тока вот трабла, чо табличные формы открываются не как таблицы, а как обычная форма?
хренотень какая-то, извиняюсь...

  Ответить  
 
 автор: snipe   (14.10.2009 в 10:47)   личное сообщение
 
 

DoCmd.OpenForm stDocName, acFormDS,, stLinkCriteria

  Ответить  
 
 автор: SONAR   (14.10.2009 в 10:51)   личное сообщение
 
 

Мдя уж, век живи, век учись
спасибки!

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList