Validaion Control

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

dancer - 19 Jun 2007 22:37 GMT

Using Framework 1.1 and Asp.Net

Does the Asp control Validation Summary work in 1.1?

Reply to this Message

Mark Rae - 19 Jun 2007 22:41 GMT

> Using Framework 1.1 and Asp.Net
>
> Does the Asp control Validation Summary work in 1.1?

Yes:
http://msdn2.microsoft.com/en-us/library/dd5c6s6h(vs.71).aspx

Signature

http://www.markrae.net

Reply to this Message

dancer - 19 Jun 2007 22:52 GMT

Then what am I missing in this code?
It gives me the text, but not the fields that are missing.
-------------------------------------------
<%@ Page Language="VB" Debug = "true" %>

<%@ Import Namespace="System.Web.Mail" %>

<script language="VB" runat="server">

Sub btnSendMail_OnClick(Source As Object, E As EventArgs)

Dim TheLocation As String = Location.Text

Dim TheDate As String = DateofAccident.Text

Dim TheWho As String = Who.Text

Dim Empornon As String

Dim TheCheckemp As String = checkemp.Text

Dim TheChecknon As String = Checknon.Text

Dim TheCheckpremisesyes As String = checkpremisesyes.Text

Dim TheCheckpremisesno As String = Checkpremisesno.Text

Dim Premises As String

Dim TheCheckJobsiteYes As String = checkjobsiteyes.text

Dim ThecheckJobsiteNo As String = checkjobsiteno.text

Dim Jobsite As String

Dim TheTimeAM As String = am.Text

Dim TheTimePM As String = pm.Text

Dim TheTime As String

Dim TheHireDate As String = Hiredate.Text

Dim TheJobTitle As String = occupation.Text

Dim Tenure As String = lengthofjob.Text

Dim TheOperation As String = operation.Text

Dim TheOperationNew As String

Dim TheHow As String = how.text

Dim TheHowNew As String

Dim TheNature As String = nature.Text

Dim TheNatureNew As String

Dim TheIndicate As String

Dim TheAction As String = action.Text

Dim TheActionNew As String

Dim Training As String = EmpTrain.SelectedItem.Text

Dim TheCaution as string=EmpCaution.SelectedItem.Text

Dim TheReport as String = EmpReport.SelectedItem.Text

Dim TheModifiedDuty As String = ModifiedDuty.SelectedItem.Text

Dim TheSubmitter As String = Submitter.Text

Dim TheToday As String = Today.Text

Dim myMessage As New MailMessage

Dim myMail As SmtpMail

Dim strEmail As String

Dim UserMessage As String

Dim TheGetOther As String = GetOther.Text

If Checkemp.Checked AndAlso Checknon.checked Then

Empornon = "Both"

ElseIf Checkemp.Checked Then

Response.Write(Checkemp.Checked)

Empornon = "Employee"

ElseIf Checknon.checked Then

Response.write(Checknon.Checked)

empornon= "Non-Employee"

Else Empornon = ""

End If

If Empornon = "" Then

Response.Write("ERROR: Choose Employee or
Non-Employee")

Exit Sub

End If

If Checkpremisesyes.Checked Then

Premises = "Yes"

ElseIf Checkpremisesno.Checked Then

Premises = "No"

Else Premises = ""

End If

If CheckJobSiteYes.Checked Then

Jobsite = "Yes"

ElseIf CheckJobsiteNo.checked Then

Jobsite = "No"

Else Jobsite = ""

End If

If TheTimeAm <> "" Then

TheTime = TheTimeAm & " AM"

ElseIf TheTimePM <> "" Then

TheTime = TheTimePM & " PM"

Else TheTime = ""

End If

TheActionNew = TheAction.Replace(vbCrLf," ")

TheNatureNew = TheNature.Replace(vbCrLf," ")

TheHowNew = TheHow.Replace(vbCrLf," ")

TheOperationNew = TheOperation.Replace(vbCrLf," ")

Dim s As String

Dim i As Int32

For i = 0 to Indicate.Items.Count-1

If Indicate.Items(i).Selected Then

s= s & Indicate.Items(i).Text & " "

End If

Next

If Page.IsValid() Then

'strEmail = txtEmail.Text

'Location = Location.Text

myMessage.From = "xxx@xxxxxxx.com"

MyMessage.To = "xxxxx@xxxxxxx.com"

myMessage.Subject = "Accident Form (HTML)"

' This is the magic line. Without this the message will just appear

' as plain HTML and won't be rendered by the recipient's email client.

' It'd be as if they did "View Source" on a web page.

MyMessage.BodyFormat = MailFormat.Html

myMessage.Body = "<h2>Wheeler's Accident Investigation Form</h2>" & vbCrLf _

& " " & vbCrLf _

& "<html><body> <table width = ""750"" bgcolor=""#E9EDF4"" height=""25""
border=""1"" cellpadding=""3"" fontface=""Verdana"" Size=""2"">" & vbCrLf _

& "<td> Location where accident occurred: " & " " & Thelocation & " "
& "</td>" & vbCrLf _

& "<td> Employer's Premises? " & premises & " " & vbCrLf _

& " Job Site? " & Jobsite & " " & "</td>" & vbCrLf _

& "<td> Date of accident: " & TheDate & " " & "</td>" & vbCrLf _

& "<tr><td> Who was injured: " & Thewho & " " & "</td>" & vbCrLf _

& "<td> Employee or non-employee?" & " " & empornon & " " & "</td>" &
vbCrLf _

& "<td> Time of accident: " & TheTime & " " & "</td>" & "</tr>" & vbCrLf
_

& "<td> Date of Hire: " & TheHireDate & " " & "</td>" & vbCrLf _

& "<td> Job Title: " & TheJobTitle & " " & "</td>" & vbCrLf _

& "<td> How long has employee worked at job where injury occurred? " &
Tenure & " " & "</td>" & "</tr>" & vbCrLf _

& "<tr> <td colspan=""3""> What was employee doing when injury occurred? " &
TheOperation & " " & "</td></tr>" & vbCrLf _

& "<tr> <td colspan=""3""> How did the injury occur? " & TheHowNew & " "
& "</td></tr>" & vbCrLf _

& "<tr> <td colspan=""3""> Nature and extent injury and property damaged: "
& TheNatureNew & " " & "</td></tr>" & vbCrLf _

& "<tr> <td colspan=""3""> PLEASE INDICATE ALL WHICH CONTRIBUTED TO THE
INJURY: " & " " & S & "</TD></TR>" & vbCrLf _

& "<tr> <td colspan=""3""> Supervisor's corrective action to ensure this
type of accident does not recur: " & TheActionNew & " " & vbCrLf _

& "<tr> <td colspan=""3""> Was employee trained in the appropriate use of
Personal Protective Equipment/Proper safety procedures? " & Training &
vbCrLf _

& " " & "</td></tr>" & vbCrLf _

& "<tr><td colspan=""3""> Was employee cautioned for failure to use Personal
Protective Equipment/Proper safety procedures? " & TheCaution &"</tr></td>"
& vbCrLf _

& "<tr> <td> Did employee promptly report the injury? " & TheReport &
"</td>" & vbCrLf _

& "<td> Is there modified duty available? " & TheModifiedduty & "</td></tr>"
& vbCrLf _

& "<tr> <td> Person submitting this form: " & " " & theSubmitter &
"</td>" & vbCrLf _

& "<td> Date: " & Thetoday & vbCrLf _

& "</td><tr></table> </body>"

' Doesn't have to be local... just enter your

' SMTP server's name or ip address!

' myMail.SmtpServer = "smtp.xxxxxxxx.com"

myMail.SmtpServer = ""

myMail.Send(myMessage)

frmEmail.Visible = False

UserMessage = "Has Been Sent."

'lblUserMessage.Text = "Place of accident " & Thelocation

End If

End Sub

</script>

<html>

<head>

<title>ASP.NET Email (HTML Format) Sample</title>

</head>

<body>

<table width="750" bgcolor="#E9EDF4" table border="1" cellpadding="3">

<h3><center>Wheeler's Accident Investigation
Form</center></h3>

<form method="post" id="frmEmail" runat="server">

<%--____________________________________________________________________________--%>

<%--ROW 1--%>

<td width="245" valign="top">



Location where accident occurred: <asp:textbox id="Location" runat=server
columns="25"/>

<asp:RequiredFieldValidator id="RequiredFiedlValidator1" runat="server"
Text="The location field is required."

ControlToValidate="Location"></asp:RequiredFieldValidator>

</td>

<td align="right" valign="top" width="225">

Employer's Premises

<asp:CheckBox id=Checkpremisesyes Text="yes" runat="server" />

<asp:CheckBox id=Checkpremisesno Text="no" runat="server" />

 

Job site

<asp:CheckBox id=Checkjobsiteyes Text="yes" runat="server" />

<asp:CheckBox id=Checkjobsiteno Text="no" runat="server" />

</td>

<td>

Date of accident 

<asp:textbox id="DateofAccident" runat=server Width="100"/></asp:textbox>

<asp:RequiredFieldValidator id="RequiredFieldValidator2" runat="server"

Text="The Date field is required" ControlToValidate="Dateofaccident">

</asp:RequiredFieldValidator>

</td>

<%--____________________________________________________________________________--%>

<%--ROW 2--%>

<tr> <td>

Who was injured? 

<asp:textbox id="Who" runat=server columns="25"/>

<asp:RequiredFieldValidator id="RequiredFiedlValidator3" runat="server"
Text="You must answer who was injured."

ControlToValidate="Who"></asp:RequiredFieldValidator>

</td>

<td align= "left">

Employee <asp:CheckBox id=Checkemp
runat="server" />

 

Non-employee <asp:CheckBox id="Checknon" runat="server" />

</td>

<td align="right">

Time of accident a.m. <asp:textbox columns="6" id="am" runat=server />

 p.m. <asp:textbox id="pm" runat=server columns="6"/>

</TD>

<%--____________________________________________________________________________--%>

<%--ROW 3--%>

<tr>

<td>

Date of Hire <asp:textbox id="Hiredate"
runat=server/>

</td>

<td>

Job Title or Occupation <asp:textbox
id="occupation" runat=server columns="25"/>

</td>

<td> How long has employee worked at job where
injury occurred? <asp:textbox id="lengthofjob" runat=server/>

</td>

</Table>

<%--____________________________________________________________________________--%>

<%--Row 4--%>

<table width="750" bgcolor="#E9EDF4" table border="1" cellpadding="3">

<tr>

<td>



What was employee doing when injury occurred?

What machine or tool was being used? What type of operation? 

<asp:textbox TextMode= "Multiline" Rows= "5" columns= "80"

id="operation" runat=server width="730" height="40"/>

<asp:RequiredFieldValidator id="RequiredFieldValidatorDoing" runat="server"

Text="You must answer this question" ControlToValidate="operation">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 5--%>

<td> How did injury occur? List all objects
and substances involved. 

<asp:textbox TextMode="MultiLine" Rows="5" columns= "80" id="How"
runat=server/>

<asp:RequiredFieldValidator id="RequiredFieldValidatorObjects"
runat="server"

Text="You must answer this question" ControlToValidate="How">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 6--%>

<tr>

<td> Nature and extent of injury and property
damaged (be specific)

<asp:textbox TextMode="MultiLine" Rows="2" columns= "80" id="nature"
runat=server/>

<asp:RequiredFieldValidator id="RequiredFieldValidatorNature" runat="server"

Text="You must answer this question" ControlToValidate="nature">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 7--%>

<tr>

<td> PLEASE INDICATE ALL OF
THE FOLLOWING WHICH CONTRIBUTED TO THE INJURY:

<asp:CheckBoxList id=Indicate runat="server">

<asp:ListItem style> Improper
instruction</asp:ListItem>

<asp:ListItem> Lack of training or
skill</asp:ListItem>

<asp:ListItem> Operating without
authority</asp:ListItem>

<asp:ListItem> Horseplay</asp:ListItem>

<asp:ListItem> Physical or mental
impairment</asp:ListItem>

<asp:ListItem> Failure to
secure</asp:ListItem>

<asp:ListItem style> Failure to
lockout</asp:ListItem>

<asp:ListItem> Unsafe position</asp:ListItem>

<asp:ListItem> Improper dress</asp:ListItem>

<asp:ListItem> Improper protective
equipment</asp:ListItem>

<asp:ListItem> Unsafe equipment</asp:ListItem>

<asp:ListItem> Poor
housekeeping</asp:ListItem>

<asp:ListItem> Unsafe arrangement or
process</asp:ListItem>

<asp:ListItem> Poor ventilation</asp:ListItem>

<asp:ListItem> Improper
guarding</asp:ListItem>

<asp:ListItem> Improper
maintenance</asp:ListItem>

<asp:ListItem> Inoperative safety
device</asp:ListItem>

</asp:CheckBoxList> Other <asp:TextBox columns = "50" id="GetOther"
runat=server/>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 8--%>

<tr>

<td colspan= "3"> Supervisor's corrective
action to ensure this type of accident does not recur:

<asp:TextBox TextMode="MultiLine" Rows="5" columns= "80" id=action
runat="server"/>

 

<asp:RequiredFieldValidator id="RequiredFieldValidatorAction" runat="server"

Text="You must answer this question" ControlToValidate="action">

</asp:RequiredFieldValidator>

</tr>

</td>

<%--____________________________________________________________________________--%>

<%--Row 9--%>

<tr>

<td> Was employee trained in the appropriate
use of Personal Protective Equipment/Proper safety procedures?

 

<asp:RadioButtonList font-name="verdana" font-size="10 pt" id=EmpTrain
runat="server">

<asp:ListItem>Yes</asp:ListItem>

<asp:ListItem>No</asp:ListItem>

</asp:RadioButtonList>

<asp:RequiredFieldValidator id="RequiredFieldValidator4" runat="server"
Text="You need to select yes or no"

ControltoValidate="EmpTrain" InitialValue=""></asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 10--%>

<tr>

<td> 

Was employee cautioned for failure to use Personal Protective
Equipment/Proper safety procedures? 

<asp:RadioButtonList font-name="verdana" font-size="10 pt" id=EmpCaution
runat="server">

<asp:ListItem>Yes</asp:ListItem>

<asp:ListItem>No</asp:ListItem>

</asp:RadioButtonList>

<asp:RequiredFieldValidator id="RequiredFieldValidatorCaution"
runat="server"

Text="You need to select yes or no" ControlToValidate="EmpCaution">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 11--%>

<tr>

<td> 

Did employee promptly report the injury?

<asp:RadioButtonList font-name="verdana" font-size="10 pt" id=EmpReport
runat="server">

<asp:ListItem>Yes</asp:ListItem>

<asp:ListItem>No</asp:ListItem>

</asp:RadioButtonList>

<asp:RequiredFieldValidator id="RequiredFieldValidatorReport" runat="server"

Text="You need to select yes or no" ControlToValidate="EmpReport">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 12--%>

<tr>

<td> Is there modified duty available?

<asp:RadioButtonList font-name="verdana" font-size="10 pt" id=ModifiedDuty
runat="server">

<asp:ListItem>Yes</asp:ListItem>

<asp:ListItem>No</asp:ListItem>

</asp:RadioButtonList>

<asp:RequiredFieldValidator id="RequiredFieldValidatorModified"
runat="server"

Text="You need to select yes or no" ControlToValidate="ModifiedDuty">

</asp:RequiredFieldValidator>

</td>

</tr>

<%--____________________________________________________________________________--%>

<%--Row 12--%>

</table>

<table width="750" bgcolor="#E9EDF4" table border="1" cellpadding="3">

<td width="400"> Name of person submitting
this form:

<asp:textbox id="Submitter" runat=server columns="40"/>

<asp:RequiredFieldValidator id="RequiredFieldValidatorSubmit" runat="server"

Text="You must enter name" ControlToValidate="Submitter">

</asp:RequiredFieldValidator>

</td>

<td> Today's Date: <asp:textbox id="Today"
runat=server columns="10"/>

<asp:RequiredFieldValidator id="RequiredFieldValidatorToday" runat="server"

Text="You must enter today's date" ControlToValidate="Today">

</asp:RequiredFieldValidator>

</td>

</tr>

<tr>

<td>

<asp:Button id="btnSendMail" text="Submit" OnClick="btnSendMail_OnClick"
runat="server" />

</td>

</tr>

<td valign=top> <table cellpadding=20><tr><td> <asp:ValidationSummary
ID="valSum" runat="server" HeaderText="You must enter a value in the
following fields:" Font-Name="verdana" Font-Size="12" /> </td>

</form>

</body>

</html>

>> Using Framework 1.1 and Asp.Net
>>
>> Does the Asp control Validation Summary work in 1.1?
>
> Yes:
> http://msdn2.microsoft.com/en-us/library/dd5c6s6h(vs.71).aspx

Reply to this Message

Validaion Control

Free Magazines