Date comparsions

[rac55]

Hi

Does anyone know how to compare a date in a dataset to todays date?

My code is;
myDate=DateTime.Now()
Dim MyConnection As SqlConnection = New SqlConnection("server=(local); trusted_connection=true; database=ExamResults")
MyConnection.Open()

Dim MyDataCommand As SqlDataAdapter
Dim DS
DS = New DataSet()

'CHECK EXPIRY DATE
MyDataCommand = New SqlDataAdapter("SELECT * FROM tblExpiryDate WHERE (ExpYear = ' " & myYear & "')", MyConnection)
MyDataCommand.Fill(DS, "tblExpiryDate")
rsExpiry.DataSource = DS.Tables("tblExpiryDate").DefaultView
rsExpiry.DataBind()

if (rsExpiry.ListItems("tblExpiryDate").Item(2) < myDate)

Any help would really be appreciated
Thanks

 

[jzelhart]

Is the problem in the WHERE statement ExpYear... or the IF statement?

If it is on the WHERE, is the ExpYear a field or is it a Part of the date field? If it is a field what data type is it? Where is myYear set and what data type is it?


Hope everyone is having a great day!

Thanks - Jennifer

 

[LV]

Assuming that myDate is of DateTime data type:

dim theDate as DateTime = Convert.ToDateTime(rsExpiry.ListItems("tblExpiryDate").Item(2))
if theDate < myDate then
  // do something
end if

 

[rac55]

Hi

Thanks for reply...the issue is with the if tag...I tried the code but it keeps returning:

'ListItems' is not a member of 'System.Web.UI.WebControls.DataList'. in the dim theDate as DateTime = Convert.ToDateTime(rsExpiry.ListItems("tblExpiryDate").Item(2))

Do you have any idea what is wrong?

Thanks

 

[LV]

Oh...didn't pay attention, it's definetly wrong. Can you post the html for the rsExpiry DataList?

 

[jzelhart]

Are you trying to loop through the DataList items or only check the selected on?

Hope everyone is having a great day!

Thanks - Jennifer

 

[rac55]

Hi

Have just managed to get it working...using

Dim theDate as DateTime
theDate = Ds.Tables(0).Rows(0)("ExpDate")

if theDate < myDate then

Thank you so much for your help :0)