Oops!
There is an "AND" missing in the sql.

Sorry.

date1 = Format(Text1.Text, "dd/mmm/yy")
date2 = Format(Text2.Text, "dd/mmm/yy")
sSQL = "select * from table_name where "
sSQL = sSQL & "created_date >= '" & date1 & "' AND created_date <= '" & date2 & "' "
Set rs = g_cn.OpenResultset(sSQL, rdOpenStatic, rdConcurReadOnly)