home *** CD-ROM | disk | FTP | other *** search
/ 66.142.0.142 / 66.142.0.142.tar / 66.142.0.142 / askEventReportform.aspx.vb < prev    next >
Text File  |  2010-08-24  |  1KB  |  32 lines
  1.  
  2. Partial Class askEventReportform
  3.     '    Inherits System.Web.UI.Page
  4.     Inherits AspNetMaker7_tfpssnet
  5.  
  6.     Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  7.         If Not IsPostBack Then
  8.             If Session("tfpssnet_Status") <> "login" Then
  9.                 Response.Redirect("login.aspx")
  10.             End If
  11.             x_StartDate.Value = Now.ToString("MM/dd/yyyy")
  12.             x_EndDate.Value = Now.ToString("MM/dd/yyyy")
  13.             srcEvent.ConnectionString = EW_DB_CONNECTION_STRING
  14.         End If
  15.     End Sub
  16.  
  17.     Protected Sub btnSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
  18.         Session("tmpStartDate") = x_StartDate.Value
  19.         Session("tmpEndDate") = x_EndDate.Value
  20.         Session("tmpEvent") = ddlEvent.SelectedValue
  21.         Session("tmpEventText") = ddlEvent.SelectedItem.Text
  22.         Response.Redirect("rptEventReport.aspx")
  23.  
  24.         'Dim ctl As Control
  25.         'Dim content As ContentPlaceHolder
  26.         'content = Page.Master.FindControl("Content")
  27.         'For Each ctl In content.Controls
  28.         '    Response.Write(ctl.ID & "<br>")
  29.         'Next
  30.     End Sub
  31.  
  32. End Class