Private Sub cmdCheck_Click()
Dim rs As ADODB.Recordset
Dim s As String
s = “SELECT Daybook.SlNo, Members.namess, Daybook.dates, Daybook.bookno, Daybook.recitno, Daybook.daybookno, Daybook.total, Daybook.jakat, Daybook.chaam, Daybook.hiam, Daybook.tahjadid, Daybook.wakjadid, Daybook.jalsa, Daybook.sadka, Daybook.mosjiddtc, Daybook.mosjidtg, Daybook.publication, Daybook.fitrana, Daybook.eidfund, Daybook.shotoindia, Daybook.dorbeshfund, Daybook.wasiwatjayedad, Daybook.fidiya, Daybook.alanewa, Daybook.shorteawal, Daybook.pakkhikahmodi, Daybook.rilif, Daybook.moriumsadifund, Daybook.mtai, Daybook.taherfund, Daybook.ashayetislam, Daybook.shukrana, Daybook.mid FROM Members INNER JOIN Daybook ON Members.mid = Daybook.mid where Members.namess= ‘” & cmbMemList.Text & “‘ and Daybook.dates between ‘#” & DTPicker1.Value & “#’ and ‘#” & DTPicker2.Value & “#'”
Set rs = New ADODB.Recordset
rs.Open s, DC, , , adCmdText
Call RS_to_FG(rs, FG1, frmDaybook)
rs.Close
End Sub
I use Ms access date type and when I input date and click check button message is shown data type mismach