Giúp câu lệnh "Between...and..."

[meolovely1102]

Ðề: Giúp câu lệnh "Between...and..."

[COLOR=#000000]
Sub [/COLOR][COLOR=#007700].....()    [/COLOR][COLOR=#0000BB]Dim rs [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Recordset    Dim sqlS [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]QueryDef    Dim NgayDau [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Date    Dim NgayCuoi [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Date    NgayDau [/COLOR][COLOR=#007700]=[[/COLOR][COLOR=#0000BB]Forms[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]F1[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]TuNgay[/COLOR][COLOR=#007700]]    [/COLOR][COLOR=#0000BB]NgayCuoi [/COLOR][COLOR=#007700]= [[/COLOR][COLOR=#0000BB]Forms[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]F1[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]DenNgay[/COLOR][COLOR=#007700]]    [/COLOR][COLOR=#0000BB]KhachNao [/COLOR][COLOR=#007700]=[[/COLOR][COLOR=#0000BB]Forms[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]F1[/COLOR][COLOR=#007700]]![[/COLOR][COLOR=#0000BB]KhachX[/COLOR][COLOR=#007700]]    [/COLOR][COLOR=#0000BB]Set sqlS [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]CurrentDb[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]QueryDefs[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"qryTrich"[/COLOR][COLOR=#007700])    [/COLOR][COLOR=#0000BB]sqlS[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Parameters[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"TuNgay"[/COLOR][COLOR=#007700]) = [/COLOR][COLOR=#0000BB]NgayDau    sqlS[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Parameters[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"DenNgay"[/COLOR][COLOR=#007700]) = [/COLOR][COLOR=#0000BB]NgayCuoi    sqlS[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Parameters[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"KhachNao"[/COLOR][COLOR=#007700]) = [/COLOR][COLOR=#0000BB]KhachNao    Set rs [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]sqlS[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]OpenRecordset[/COLOR][COLOR=#007700]()    .........    ................[/COLOR][COLOR=#0000BB]End Sub  [/COLOR] 

qryTrich :

SELECT T1.Ngay, T1.Khach, T1.GiaTri
FROM T1
WHERE (((T1.Ngay) Between [TuNgay] And [DenNgay]) AND ((T1.Khach) Like [KhachNao]));

Thử xem. Âu lá đúng
Thân

OK...thành công rồi. Cám ơn bác rất là nhiều!
------P/s:
Bác cho mình xin số phone nhé. Có dịp mình mời bác 1 chầu...See you!

[manhvlance]

Ðề: Giúp câu lệnh "Between...and..."

Email : bachdanggiang_2006@yahoo.com
Mobile : 0982136217
Thân