То, что вы можете сделать, это сохранить ваш набор данных в сеансе: (извините, мой VB, я очень ржавый с ним)
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim strSQL As String
Dim conn As New SqlConnection
conn.ConnectionString = baglan()
conn.Open()
strSQL = "SELECT * FROM Telefon_Otomasyon"
Dim da As New SqlDataAdapter(strSQL, conn)
Dim dset As New DataSet()
Try
da.Fill(dset, "Telefon_Otomasyon")
MyDataset = dset
Catch ex As SqlException
dset = MyDataset
End Try
Dim Hepsi As DataRow
For Each Hepsi In dset.Tables("Telefon_Otomasyon").Rows
Response.Write(Hepsi("Arayan") & "<br />")
Next
End Sub
Private Property MyDataset() As DataSet
Get
return Session("myDataset")
End Get
Set(ByVal value as DataSet)
Session("myDataset") = value
End Set
End Property
Это также очень простой пример ,его нужно привести в порядок, прежде чем вы сможете использовать его в производственном коде, т.е. вам нужно подумать, что делать, если в Session не хранится набор данных (если он возвращает ноль).Вы можете хотеть быть немного умнее этого и просто хранить конкретную таблицу.Обратите внимание, что сессия может истечь, хотя, поэтому немного почитать об этом.Этого должно быть достаточно, чтобы направить вас в правильном направлении.
Примечание: если вы хотите что-то менее изменчивое, чем Session, вы можете вместо этого попробовать использовать Cache.