<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
  Dim GD As New Tornado.GetData
  Dim z2 As New Tornado.z
  If (GD.Get_LastClick = "applyupdate") Then
    Response.Redirect("http://www.aspdb.com")
  End If
  With z2
    .dbQP = "U=2||D=NWind|Gdf=01,1,2,3|Th=Ti=Get LastClick| ni=b5,update| Bm=employees;0"
    .dbSQL = "Select * From employees"
    .dbEditUpdateFlds = "1,2"
    .ASPdbNET()
  End With
End Sub
</script>