Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Запрос Добавлено: 17.09.04 01:51  

Автор вопроса:  bsv | ICQ: 209134224 
срукт табл
Назв Curs
Поле 1 DateCurs Краткий формат поля
Поле 2 Curs Дв целое с плав запятой

VBA(Access)

    Dim db As DAO.Database
    Dim rs As DAO.Recordset
     
    On Error GoTo err
    Dim sql As String
     
    Set db = CurrentDb
    sql = "select * from [Curs] where DateCurs=""" & Date() & """"
    Set rs = db.OpenRecordset(sql)
    Тут возн ошибка неверный формат -непонятно в запросе тоже естественно
Вопрос В чем тут дело

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 Mihalыch



ICQ: 373-509-101 

Вопросов: 56
Ответов: 330
 Профиль | | #1 Добавлено: 17.09.04 02:31
Вообще то возможно не в тему, но я не понял что такое краткий формат поля? Если строковое поле? Тогда зачем столько кавычек? Можно так:
sql = "SELECT * FRROM Curs WHERE DateCurs = " & Chr(34) & ";Date()" & Chr(34), это если значение нужно взять в кавычки а если нет то так:
sql = "SELECT * FRROM Curs WHERE DateCurs = " & ";Date()" . А если это дата то так:
sql = "SELECT * FRROM Curs WHERE DateCurs = " & “#” & Date & “#”

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам