VB MySQL的日期搜索工作不

问题描述:

,我通过日期,它不是取记录搜索面临的一个问题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

为我的错误道歉 –

您的sql正在为日期创建文本/字符串值...您需要将日期转换为日期。不知道如何在mySQL中,但在MSSql中,您将使用Convert(datetime, 'yourDateAsString', 103)

+0

这是str_to_date()函数。 – nabuchodonossor