Добрый день!
Подскажите пожалуйста как мне исправить ошибку: ситуация следующая..
Имеется Excel.Лист1 и ячейки N1 и N2 в которых пользователь вносит дату начала и дату окончания(период), после чего идет обращение к базе Access:
вроде бы привожу даты в формат понятного для Access #mm/dd/yyyy# ....но получаю ошибку ...
ошибка "Automation error"
Подскажите пожалуйста как мне исправить ошибку: ситуация следующая..
Имеется 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"
Изменено: - 05.08.2013 12:31:32
