簡體   English   中英

在日期之間訪問 VBA SQL 查詢搜索

[英]Access VBA SQL query searching between dates

我有一些 VBA 代碼,它從文本框中的兩個日期選擇器值中獲取日期和日期字段。

但是,在兩個日期之間搜索時,我會收到要求輸入的“輸入參數值”提示。

Dim SQLAllReject As String

Dim strDateFrom As String
Dim strDateTo As String

strDateFrom = Format(txtDate.Value, "mm/dd/yyyy")
strDateTo = Format(txtDateTo.Value, "mm/dd/yyyy")

直接在查詢設計向導中運行時,日期之間的搜索工作正常:

WHERE (((XXXXXXXXXXXXXXXXXXXX.Date) Between #10/1/2021# And #10/27/2021#))

這里有什么問題? 如何強制 Access/VBA 獲取我指定的日期並在它們之間進行搜索而不顯示“輸入參數值”提示?

當我調試查詢並逐步執行時,它給出的日期與在“查詢設計”視圖中運行它的日期完全相同。

僅供參考,如果我使用一個日期和 LIKE 運算符,這很好用。

SQLAllReject = "SELECT dbo_vw_busobj_file_rejections_load_access_temp5_copy.HashKey AS [ID], dbo_vw_busobj_file_rejections_load_access_temp5_copy.Reject_Date AS [Date], " & _
    "FROM dbo_vw_busobj_file_rejections_load_access_temp5_copy " & _
    "WHERE (((dbo_busobj_file_rejections_load_access_temp5_copy.Reject_Date) Between #" & strDateFrom & "# And #" & strDateTo & "#)) " & _
    "ORDER BY dbo_vw_busobj_file_rejections_load_access_temp5_copy.Reject_Date DESC;"

好的,我以某種方式修復了它......查詢字符串試圖從視圖而不是表中進行選擇,並且由於某種奇怪的原因導致參數提示。

我已將 dbo_vw_busobj_file_rejections_load_access_temp5_copy 更改為 dbo_busobj_file_rejections_load_access_temp5_copy 表,並在從文本框中選擇日期時進行了一些字符串到日期的轉換后設法使其工作。

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM