Private Sub Page_Load(sender As Object, e As System.EventArgs)
' Create an array list that
' contains the keys for two
' items stored in the Cache object.
Dim deps As New ArrayList()
deps.Add("bookData")
deps.Add("authorData")
' Make the page invalid if either of the
' cached items change or expire.
Response.AddCacheItemDependencies(deps)
' Populate the DataGrids.
dgAuthors.DataSource = DataHelper.GetAuthorData()
dgAuthors.DataBind()