home *** CD-ROM | disk | FTP | other *** search
/ 66.142.0.142 / 66.142.0.142.tar / 66.142.0.142 / askScheduleRecurringform_results.aspx.vb < prev    next >
Text File  |  2010-08-24  |  945b  |  20 lines
  1. 
  2. Partial Class askScheduleRecurringform_results
  3.     Inherits AspNetMaker7_tfpssnet
  4.  
  5.     Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  6.         Dim sError As String, tmpCount As Integer, sMessage As String
  7.         sError = Request.QueryString("e")
  8.         tmpCount = Request.QueryString("c")
  9.         sMessage = Request.QueryString("m")
  10.         If sError = "T" Then
  11.             Label1.Text = "ERROR creating recurring shifts! - " & sMessage & " - " & tmpCount & " records created."
  12.             Label1.ForeColor = Drawing.Color.Red
  13.             '           Response.Write("ERROR creating recurring shifts! - " & tmpCount & " records created.")
  14.         Else
  15.             Label1.Text = tmpCount & " recurring shift records successfully created."
  16.             '            Response.Write(tmpCount & " recurring shift records successfully created.")
  17.         End If
  18.     End Sub
  19. End Class
  20.