2016-04-21 70 views
0

,我通過日期,它不是取記錄搜索面臨的一個問題VB MySQL的日期搜索工作不

這裏是我的代碼

Dim GetDateNow As Date 
Dim GetDateTen As String 
Dim SetDateTen As Date 
GetDateNow = Format$(Now, "yyyy-mm-dd") 
GetDateTen = Now - 15 
SetDateTen = Format$(GetDateTen, "yyyy-mm-dd") 

Dim rs As New Recordset 
SQL = "SELECT * FROM CreditPayLog WHERE payment_user='" & Label5.Caption & "' AND payment_date BETWEEN '" & Format(SetDateTen, "yyyy-MM-dd") & "' AND '" & Format(GetDateNow, "yyyy-MM-dd") & "'" 

而且我已經使用debug.print功能查看查詢一切看起來不錯,但它不是在這裏取數據查詢

SELECT * FROM CreditPayLog WHERE payment_user='1222150322' AND payment_date BETWEEN '2016-04-06' AND '2016-04-21' 

PAYMENT_DATE是DATETIME mysql中的列

+1

VB.NET IsNot VB6。請不要使用不適當的標籤。 – Plutonix

+1

爲我的錯誤道歉 –

回答

0

您的sql正在爲日期創建文本/字符串值...您需要將日期轉換爲日期。不知道如何在mySQL中,但在MSSql中,您將使用Convert(datetime, 'yourDateAsString', 103)

+0

這是str_to_date()函數。 – nabuchodonossor