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

Graphics device interface - windows programming , Graphics Device Interface...

Graphics Device Interface - GDI:   The GDI is a windows API. The GDI uses a set of generic graphics objects to draw to the screen, to the memory and printers. Therefore the p

Creating constants in vbscript, In VBScript, You create user-defined consta...

In VBScript, You create user-defined constants using the Const statement. It lets you create string or numeric constants along with meaningful names and let you to assign them lite

Mechanical project, sir , i need visual basic form design & coding for Reyn...

sir , i need visual basic form design & coding for Reynolds number & type of flow .

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

Vbscript error object clear method, Methods: VBScript Err Object ...

Methods: VBScript Err Object Clear Method Clears every property settings. Raise Method Generate a run-time error.

Balancesheet, i need sample balance sheet form in vb.net

i need sample balance sheet form in vb.net

Vb.net applications, outline and explain in detail any 10 applications of v...

outline and explain in detail any 10 applications of vb.net

Variable scope prefixes, Variable Scope Prefixes As script size rise, s...

Variable Scope Prefixes As script size rise, so does the value of being capable to rapidly differentiate the scope of variables. A one-letter scope prefix preceding type prefix

Develop a university database using ms-access, Question 1 Write about the ...

Question 1 Write about the Visual Basic Application Development Life cycle with a sample Forms development for performing integer arithmetic operations Question 2 Discuss the

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