Develop a web page for accepting information regarding stock, Visual Basic Programming

Assignment Help:

Develop a web page that is used for accepting information regarding stocks. Make sure the form carry out the possible validations. The simple instance code below merely illustrates the form & accepts input however does not store the data or perform any action.

<HTML>

<HEAD>

<SCRIPT LANGUAGE="VBScript">

<!--

Sub cmd_submit_OnClick

'To continue the flow if any error take place on Error Resume Next

If document.form1.TxtName.Value = "" or document.form1.TxtEMail.Value = ""

Then

Dim MyMessage

MyMessage = "Please enter your name & id." MsgBox MyMessage, 0, "Incomplete Form Error"

document.form1.TxtName.focus() End If

'Check to make out if the user entered anything.

If (Len (document.form1.txtAge.value) = 0) Then

MsgBox "Before submitting you have to inscribe your  age." Exit Sub

document.form1.txtAge.focus()

End If

If (Not (Is Numeric (document.form1.txtAge.value))) Then

MsgBox "You must enter a numeral for age." Exit sub

End If

'Check to make out if the age entered is valid.

If (document.form1.txtAge.value  < 0) Or  (document.form1.txtAge.value  > 100)

 Then

' MsgBox "The age you entered is wrong." Err.clear

Err.Raise 6

Err.description = "Error - The age you entered is wrong." msgbox Err.description

Exit Sub

End If

' Data looks okay thus submit it.

MsgBox "Thanks for your valuable advice." document.form1.submit

End Sub

-->

</SCRIPT>

</HEAD>

<BODY bgColor="#ffffcc" Text="#000099" Link="#ff0000" VLink="#ff0000" ALink="#009900">

<!--ENDOFADD -->

<FORM name = "form1" >

<CENTER>

<TABLE BORDER=8 CELLSPACING=1 CELLPADDING=0

WIDTH="600"><TR><TD>

<TABLE BORDER=5 CELLSPACING=1 CELLPADDING=0

WIDTH=100%><TR><TD>

<FONT SIZE=""FACE="Arial"><B><CENTER><H2>Sample Stock

Survey</H2></CENTER></B></FONT></TD>

<A NAME="ItemAnchor1"></A>

</TR></TABLE>

<HR>

<TABLE BORDER=5 CELLSPACING=1 CELLPADDING=0 WIDTH=100%>

<TR>

<TD ALIGN=RIGHT>*Name:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtName">

</TD>

<TD ALIGN=RIGHT>*E-Mail:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtEMail"></TD>

</TR>

<TR><TD ALIGN=RIGHT>Address:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtAddress"></TD>

<TD ALIGN=RIGHT>Age:</TD>

<TD><INPUT TYPE="TEXT" NAME="txtAge"></TD>

<A NAME="ItemAnchor1"></A>

</TR></TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0

WIDTH=100%><TR><TD>

<CENTER>

<FONT SIZE="" FACE="Arial">

<CENTER>

<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" WIDTH="75%">

<BR></CENTER>

</FONT></CENTER></TD>

<TD>

<FONT SIZE=""  FACE="Arial">

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0><TR><TD  VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<B>Define your investment experience</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0>

<TR>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio-

0">beginner

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio- 1">intermediate

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio-

2">expert

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor4"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0>

<TR>

<TD>

<FONT SIZE="2" FACE="Arial" >

<B>Types of Investments you make</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0><TR><TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-0">Individual Stocks<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-1">Options<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-2">Mutual Funds<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-3">Real Estate

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor5"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0>

<TR>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<B>How do you buy your stocks?</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0><TR><TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<!--DROP_DOWN_TYPE -->

<SELECT NAME="RESULT_RadioButton-5">

<OPTION>

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-0" -

-><OPTION>1) On-Line</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-1" -

-><OPTION>2) Touch Tone Trading

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-2" -

-><OPTION>3) Brokers Assisted

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-3" -

-><OPTION>4) Other</OPTION>

</SELECT>

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor6"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<FONT SIZE="2"  FACE="Arial" >

<B>What is your hot stock pick for this year? </B>

</FONT></TD>

</TR><TR>

<TD>

  <FONT  SIZE="2"  FACE="Arial" >

<INPUT TYPE="TEXT" NAME="RESULT_TextField-6"  SIZE="30" MAXLENGTH="30">

</FONT>

</TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor7"></A>

<TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0><TR><TD>

<FONT SIZE="2" FACE="Arial" >

<B>Stock Symbol if you know it</B>

</FONT>

</TD>

</TR><TR>

<TD>

<FONT SIZE="2"  FACE="Arial" >

<INPUT TYPE="TEXT" NAME="RESULT_TextField-7" SIZE="4" MAXLENGTH="4">

</FONT>

</TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor8"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD VALIGN="BOTTOM">

<FONT SIZE="2"  FACE="Arial" >

<B>Any Investment recommendation for others?</B>

</FONT>

</TD>

</TR><TR>

<TD>

<FONT SIZE="2"  FACE="Arial" >

<TEXTAREA NAME="RESULT_TextArea-8" ROWS="7" COLS="35" WRAP="SOFT"></TEXTAREA>

</FONT></TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor9"></A>

</TD></TR><TR><TD>

</CENTER>

</TD></TR>

</TABLE>

</TD></TR>

</TABLE>

</CENTER>

<BR>

<CENTER>

<INPUT TYPE="SUBMIT" NAME="cmd_submit" VALUE="Submit">

</CENTER>

</FORM>

</BODY>

</HTML>


Related Discussions:- Develop a web page for accepting information regarding stock

Control statements, CONTROL STATEMENTS   The conditional expression us...

CONTROL STATEMENTS   The conditional expression uses a comparison operator that results in true or false value. If the comparison is valid the outcome is true, or else the out

Imagelist, IMAGELIST The CImageList object is a collection of the same ...

IMAGELIST The CImageList object is a collection of the same sized images, all of which can be referred to by its index. The ImageList are used to proficiently manage the large

Adding records - data control, Adding Records: 1. As in the earlier ca...

Adding Records: 1. As in the earlier case Set the DatabaseName property as "C:\ex.mdb", now Set the Record Source for the data control as Customer and Set the Record Type to 0

Student record management system, i need your help in designing and coding ...

i need your help in designing and coding a student record management system

Create a procedure - vbscript, Each piece of data is passed in your process...

Each piece of data is passed in your process using an argument. Arguments serve like placeholders for the data you wish to pass into your process. You can name your arguments along

Displaying the file without scrolling - document class, Displaying the file...

Displaying the file Without Scrolling: To display a file follow the steps as shown below: 1. Generate a SDI application. 2. Type the coding as shown in the Serialize els

Data control, DATA CONTROL The data control is used to connect to the d...

DATA CONTROL The data control is used to connect to the database. Three properties are very necessary to connect to the database. The primary property is the database name. You

Properties of object method, Properties: VBScript Err Object ...

Properties: VBScript Err Object   Properties   Description   D escription Property The descriptive string related

Storage and retrieval systems, STORAGE AND RETRIEVAL SYSTEMS   The sto...

STORAGE AND RETRIEVAL SYSTEMS   The storage system is a depository. It is a physical container and gives mechanisms to put in the depository and take them back. The retrieval

Do until loop statement , Do Until Loop Statement: The statements with...

Do Until Loop Statement: The statements within the do...until loop block executes till the condition given in until become true. The working of do...until loop is elaborated w

Write Your Message!

Captcha
Free Assignment Quote

Assured A++ Grade

Get guaranteed satisfaction & time on delivery in every assignment order you paid with us! We ensure premium quality solution document along with free turntin report!

All rights reserved! Copyrights ©2019-2020 ExpertsMind IT Educational Pvt Ltd