这是我写的
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
If Not IsPostBack Then
If Request.QueryString("action") = 1 Then
Session.Remove("LoginUser")
Response.Redirect("default.aspx")
End If
Timer1.Start() '启动刷新购物车.每5秒刷新一次
End If
freshShoppingCart()
End Sub
Private Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
Response.Write("<script>window.opener.reload();</script>")
End Sub