Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Ошибка при запросе из Excel в Access (работа с датами)
 
Добрый день!
Подскажите пожалуйста как мне исправить ошибку: ситуация следующая..
Имеется Excel.Лист1 и ячейки N1 и N2 в которых пользователь вносит дату начала и дату окончания(период), после чего идет обращение к базе Access:


Код
 

DateX1 = Format(Worksheets("Лист1" )  .Range("N1" )  , "mm/dd/yyyy" )  
DateX2 = Format(Worksheets("Лист2" )  .Range("N2" )  , "mm/dd/yyyy" )  

Conn.Open ConnectionString:="Provider=Microsoft.ACE.OLEDB.12.0;" & _
  "Data Source=...BD.accdb;"

rs.Open Source:="SELECT Date1,Day_of_week FROM Flow WHERE Date1 =  '" & "#" & DateX1 & "#" & "' ", ActiveConnection:=Conn, _
CursorType:=adOpenDynamic, LockType:=adLockOptimistic


вроде бы привожу даты в формат понятного для Access #mm/dd/yyyy# ....но получаю ошибку ...

ошибка "Automation error"
Изменено: Garrik - 5 Авг 2013 12:31:32
 
попробуйте
Replace(Format(Date, "m/d/yyyy"), ".", "/")

Т.к. Format производит вывод формата даты в соответствии с локализацией. Если русская - то слешей не будет, будет точка.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Большое спасибо! получилось!
Страницы: 1
Читают тему (гостей: 1)
Наверх