I have two problem in Vbscript. The first one is all about Grading
system. This is the code, just fix the program specially in
calculation and the output.
1.
-------------------------------------------------------------------------------
<html>
<head>
<SCRIPT LANGUAGE="VBSCRIPT">
Sub mon_OnClick
Dim ans1
ans1=(cdbl(frm.oneP.value)*.2)+(cdbl(frm.twoP.value)*.2)+(cdbl(frm.threeP.value)*.1)+(cdbl(frm.fourP.value)*.5)
alert(ans1)
end sub
</SCRIPT>
<SCRIPT LANGUAGE="VBSCRIPT">
Sub mon1_OnClick
Dim ans2
ans2=(cdbl(form.onem.value)*.2)+(cdbl(form.twom.value)*.2)+(cdbl(form.threem.value)*.1)+(cdbl(form.fourm.value)*.5)
alert(ans2)
end sub
</script>
</head>
<hr>
<p align="center"><font size="5" color="White">Grading System</font></p>
<font color=blue><body bgcolor=Green>
<center>
PRELIM
<table>
<FORM id="frm">
<tr>
<td colspan=22%> Quiz 1
<td colspan=22%>Quiz 2
<td colspan=22%> CS
<td colspan=22%>Exam
<td colspan=22%>PC1
<td colspan=22%>PC2
<td colspan=22%>CS
<td colspan=22%>Exam
</tr>
<tr>
<td colspan=22%><INPUT id=oneP size=5>
<td colspan=22%><INPUT id=twoP size=5>
<td colspan=22%><INPUT id=threeP size=5>
<td colspan=22%><INPUT id=fourP size=5>
<td colspan=22%><INPUT id=fiveP size=5>
<td colspan=22%><INPUT id=sixP size=5>
<td colspan=22%><INPUT id=sevenP size=5>
<td colspan=22%><INPUT id=eightP size=5>
</TR>
</table>
<br>
<br>
MIDTERM:
<TABLE>
<FORM id="form">
<tr> <td colspan=22%> Quiz 1
<td colspan=22%>Quiz 2
<td colspan=22%> CS
<td colspan=22%>Exam
<td colspan=22%>PC1
<td colspan=22%>PC2
<td colspan=22%>CS
<td colspan=22%>Exam
</tr>
<tr>
<td colspan=22%><INPUT id=onem size=5>
<td colspan=22%><INPUT id=twom size=5>
<td colspan=22%><INPUT id=threem size=5>
<td colspan=22%><INPUT id=fourm size=5>
<td colspan=22%><INPUT id=PC1m size=5>
<td colspan=22%><INPUT id=PC2m size=5>
<td colspan=22%><INPUT id=CSLm size=5>
<td colspan=22%><INPUT id=ELABm size=5>
</TR>
</table>
<BR><BR>
FINALS
<table>
<FORM ID= FORM3>
<tr> <td colspan=22%> Quiz 1
<td colspan=22%>Quiz 2
<td colspan=22%> CS
<td colspan=22%>Exam
<td colspan=22%>PC1
<td colspan=22%>PC2
<td colspan=22%>CS
<td colspan=22%>Exam
</tr>
<tr>
<td colspan=22%><INPUT id=Q1f size=5>
<td colspan=22%><INPUT id=Q2f size=5>
<td colspan=22%><INPUT id=CSf size=5>
<td colspan=22%><INPUT id=ELECf size=5>
<td colspan=22%><INPUT id=PC1f size=5>
<td colspan=22%><INPUT id=PC2f size=5>
<td colspan=22%><INPUT id=CSLf size=5>
<td colspan=22%><INPUT id=ELABf size=5>
</TR>
</table>
</center>
<br>
<br>
<center>
<FORM id="FORM4">
<input type=Radio name="LEC" value="Lecture">LECTURE
<input type=Radio name="LEC" value="Laboratory">LABORATORY
</center>
</form>
<br>
<Form id=FORM5>
<center>
<input type=button value=PRELIM id=mon>
<input type=button value=MIDTERM id=mon1>
<input type=button value=FINALS id=mon3>
<input type=button value=SEMGRADE id=mon4>
<center>
</FORM>
<hr>
<p align="left"><font size="2" color="red">Note:</font></p>
<br>
<p align="left"><font size="2" color="white">Q1 * .20 + Q2 * .20 + CS
* .10 + Exam * .50 = Grade <B> in <I>LECTURE</I></B></font></p>
<p align="left"><font size="2" color="white">PC1 * .20 +PC2 * .20 + CS
* .10 + Exam * .50 = Grade <B> in <I>LABORATORY</I></B></font></p>
<p align="left"><font size="2" color="white">Prelem Grade *.30 +
Midterm Grade *.30) + Final Grade *.40 <B> to get
<I>SEMGRADE</I></B></font></p>
</body>
</html>
-------------------------------------------------------------------------------
The program is almost done just some fix in calculation.
-------------------------------------------------------------------------------
2.
The 2nd problem is about vbscript log in. In this program you need to
put your name, e-mail address, and your phone number. After you sign
up it will go to a new page and display what you sign up and that is
the name, e-mail, and phone number. Also put a program for error input
of else statement. Like if he didn't sign the e-mail add. box. the
error will accur and say pls put your e-mail add to continue. Just
like that.
-----------------------------------------------------------------------------
Hope you finish this as soon as possible i need it until August 8, 2004. T.y |
