cache error...

[yaniv]

I"m trying to create new cache using this code:

 Dim wnDS As New DataSet()

        Dim cmd As New SqlCommand()

        Dim odatareader As New SqlDataAdapter()

        Dim span As New TimeSpan(24, 0, 0)



        If Cache("commonsearchDS") Is Nothing Then

            Dim commonsearchDS As New DataSet()

            commonsearchDS.Tables.Add("commonsearch")



            cmd = New SqlCommand("SELECT TOP 4 * FROM tbl_searchwords ORDER BY times DESC, ID", oConnection)

            odatareader = New SqlDataAdapter(cmd)



            odatareader.Fill(commonsearchDS.Tables("commonsearch"))



            oConnection.Close()



            Cache.Insert("commonsearchDS", commonsearchDS, Nothing, Nothing, span)

        Else

            wnDS = Cache("commonsearchDS")

        End If

but i"m getting error massege:

absoluteExpiration must be DateTime.MaxValue or slidingExpiration must be timeSpan.Zero.

what i do wrong?

 

[PlausiblyDamp]

The error pretty much tells you what you need to do:

Cache.Insert("commonsearchDS", commonsearchDS, Nothing, DateTime.MaxValue, span)