CryptoJones

-1??

Jan 12th, 2016
236
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.89 KB | None | 0 0
  1. Protected Sub addCrewFormAssignment(Optional sfarFk As Integer = 0)
  2.     'validate the data
  3.     Dim crewId = crewAssDrop.SelectedValue
  4.     Dim custId = customerInput.SelectedValue
  5.  
  6.     If (custId = String.Empty) Then
  7.  
  8.     End If
  9.  
  10.     If (crewId = "-1") Then
  11.       success.Text = "<span class='errorClass'>Please select a crew member to add it to.</span>"
  12.       success.Show()
  13.       Exit Sub
  14.     End If
  15.  
  16.     If (assToDrop.SelectedValue = "1") Then
  17.  
  18.       If Not IsDate(crewDateInput.SelectedDate) Then
  19.         success.Text = "<span class='errorClass'>Please select a start date.</span>"
  20.         success.Show()
  21.         Exit Sub
  22.       End If
  23.     ElseIf (assToDrop.SelectedValue = "4") Then
  24.       If Not IsDate(dotStartInput.SelectedDate) Then
  25.         success.Text = "<span class='errorClass'>Please select a start date.</span>"
  26.         success.Show()
  27.         Exit Sub
  28.       End If
  29.     End If
Add Comment
Please, Sign In to add comment