Вставка даты SQL из Excel приводит к неверному значению даты - PullRequest
0 голосов
/ 19 ноября 2018

У меня проблема с выполнением части моего запроса SQL из Excel. Обратите внимание, что один и тот же запрос работает с компьютера моего менеджера, и оба они имеют одинаковые региональные настройки в CP.

Вот код:

Do While Range("A" & CStr(Red)).Value <> ""

    Sql_Query = "UPDATE [DB-NAME] SET [Expiration Date] = '" & Format(Trim(Range("H" & CStr(Red)).Value), "yyyy-mm-dd") & _
       "' WHERE (No_ = '" & Trim(Range("A" & CStr(Red)).Value) & "') AND ([Pallet Place No_] = '" & Trim(Range("B" & CStr(Red)).Value) & "') AND " & _
       "([Item No_] = '" & Trim(Range("C" & CStr(Red)).Value) & "')"
    Set Rs = Conn.Execute(Sql_Query)
    'Rs.Close ' Closing query
    Set Rs = Nothing

    Red = Red + 1 'Switching to the next row after one is finished
Loop

Когда я выполняю эту часть, Mr. Code вставляет следующий код:

"UPDATE [DB-NAME] SET [Expiration Date] = '7627-09-30' WHERE (No_ = '267917') AND ([Pallet Place No_] = '11110102') AND ([Item No_] = '116000')"

Примечание: это текст, который возвращает опция * Добавить часы .

Несмотря на то, что в этом столбце «H» дата похожа на «2018-12-30».

Формат ячейки в Excel не вносит изменений. Это не важно, если его общие или текст или дата или пользовательская дата, проблема остается. И эта вещь с мистером Кодексом согласуется.

1 Ответ

0 голосов
/ 20 ноября 2018

Этот запрос вообще работает с вашего компьютера?Попробуйте обновить другое поле (лучше номер типа).

...