I'm trying but still having no luck....
Dim january_1st As New DateTime(rsNews.Item("yearDate"), 1, 1)
Dim december_31st As New DateTime(rsNews.Item("yearDate"), 12, 31)
Dim filterstr As String = String.Format("postdate >= #{0}# and postdate <= #{1}#", january_1st.ToString...