I have site that is using asp to submit a form to an oracle database. However, I want to do some form validation before it is submitted to the database and it looks like javascript is the best way to do this. However, the javascript code I have written will not run, it did before I inserted my javascript. It gives me the following error. This is my first time using javascript so I am not sure why it is not working, any suggestions?

Error Type:
Microsoft VBScript compilation (0x800A0400)
Expected statement
/process_oc.asp, line 42
<SCRIPT language="JavaScript">


Here is my code:
<%@ Language = VBscript %>


<HTML>
<TITLE> Oncampus User Problem Report </TITLE>

<BODY>
<%
dim oc1_email,my_Conn,my_RS,str_SQL1,oc_check_email


SET my_Conn=SERVER.createobject("adodb.connection")
SET my_RS=SERVER.createobject("adodb.recordset")
my_Conn.Open "DSN=test;" & _
"Uid=scott;" & "Pwd=tiger"


str_SQL1= "select * from oncampus_user"

my_RS.CursorType=1
my_RS.OPEN str_SQL1,my_Conn
oc1_email = request.querystring("ocuser_email")
oc_check_email= "OC_EMAIL= '" & oc1_email & "'"
my_RS.Find oc_check_email
%>

<FORM NAME="frmoc" ACTION="process_oc.asp" METHOD=post onSubmit="return VerifyData()">
<CENTER> ONCAMPUS USER REPORT </CENTER>
<P>
<TABLE BORDER=0 ALIGN=CENTER>
<%
If my_RS.EOF Then %>
<TR>
<TD>FIRST NAME</TD><TD><INPUT TYPE="TEXT" NAME="FNAME2" SIZE="25"></TD>
</TR>

<TR>
<TD>LAST NAME</TD><TD><INPUT TYPE="TEXT" NAME="LNAME2" SIZE="25"></TD>
</TR>

<TR>
<TD>DEPARTMENT</TD><TD><INPUT TYPE="TEXT" NAME="DEPARTMENT" SIZE="25"></TD>
</TR>

<TR>
<TD>EXTENSION</TD><TD><INPUT TYPE="TEXT" NAME="EXT" SIZE="25"></TD>
</TR>

<TR>
<TD>ROOM NUMBER</TD><TD><INPUT TYPE="TEXT" NAME="ROOM" SIZE="25"></TD>
</TR>

<%
Else
%>
<TR>
<TD>FIRST NAME</TD><TD><INPUT TYPE="TEXT" NAME="FNAME2" SIZE="25" value="<%=my_RS("oc_fname").value%>"></TD>
</TR>

<TR>
<TD>LAST NAME</TD><TD><INPUT TYPE="TEXT" NAME="LNAME2" SIZE="25" value="<%=my_RS("oc_lname").value%>"></TD>
</TR>

<TR>
<TD>DEPARTMENT</TD><TD><INPUT TYPE="TEXT" NAME="DEPARTMENT" SIZE="25" value="<%=my_RS("oc_department").value%>"></TD>
</TR>

<TR>
<TD>EXTENSION</TD><TD><INPUT TYPE="TEXT" NAME="EXT" SIZE="25" value="<%=my_RS("oc_phone").value%>"></TD>
</TR>

<TR>
<TD>ROOM NUMBER</TD><TD><INPUT TYPE="TEXT" NAME="ROOM" SIZE="25" value="<%=my_RS("oc_room").value%>"></TD>
</TR>


<%
End If
my_RS.Close
%>

<TR>
<TD>Problem Area</TD>
</TR>

<TR>
<TD> <SELECT name="probtype"> <OPTION SELECTED> PLEASE SELECT THE AREA YOUR PROBLEM IS RELATED TO:
<OPTION value="windows pc">WINDOWS COMPUTER
<OPTION value="MAC">APPLE/MAC COMPUTER
<OPTION value="printer">PRINTER
<OPTION value="telephone">TELEPHONE
<OPTION value="username/password">USER NAME/PASSWORD
<OPTION value="other">OTHER
</SELECT
</TD>
</TR>


<TR>
<TD>PLEASE PROVIDE A DETAILED DESCRIPTION OF YOUR PROBLEM(250 CHARACTER MAX)</TD>
</TR>

<TR>
<TD><TEXTAREA NAME="PROBLEM" ROWS =10 COLS=50></TEXTAREA></TD>
</TR>

<TR>
<TD>PLEASE DESCRIBE ANY ERROR MESSAGES ENCOUNTERED<TD>
</TR>

<TR>
<TD><TEXTAREA NAME="ERROR" ROWS =5 COLS=50></TEXTAREA></TD>
</TR>

</TABLE>
<input type="hidden" name="ocuser_email" value="<%=oc1_email%>">


<INPUT TYPE="Submit" Value="Submit">



</BODY>

<SCRIPT language = "javascript">
<!--
function VerifyData()
{
if (document.frmoc.fname.value = ""
{
alert("You must fill out entire form");
return false;
}
else
return true;

}
-->
</Script>

</HTML>