סעיה בהצגת קבצי ASP

שלום עשיתי לאחרונה מערכת פורטל מידע שכלולה בה מערכת הרשמה הנה הקובץ שמכניס את הנתונים למסד:

קוד:

<%
fname= request.form("fname")
lname = request.form("lname")
username = Request.form("username")
userpassword = Request.form("userpassword")
usermail = Request.form("usermail")
If request.Form("fname")="" Then
%>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
<HTML>
<HEAD>
<TITLE>שגיאה בשם הפרטי</TITLE>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
</BODY>
<STYLE type = "text/css">
a:hover {
text-decoration: none;
}
</STYLE>
<font color="black" face="arial"><H1>שם פרטי ריק!</H1>
<a href="javascript:history.back(1)"><font color="#B8860B " size="2" face="arial"><B>לחץ כאן בכדי לנסות שוב</B></a>
<%
End If
%>
<%
If request.Form("lname")="" Then
%>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
<HTML>
<HEAD>
<TITLE>שגיאה בשם המישפחה</TITLE>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
</BODY>
<STYLE type = "text/css">
a:hover {
text-decoration: none;
}
</STYLE>
<font color="black" face="arial"><H1>שם המישפחה ריק!</H1>
<a href="javascript:history.back(1)"><font color="#B8860B " size="2" face="arial"><B>לחץ כאן בכדי לנסות שוב</B></a>
<%
End If
%>
<%
If request.Form("username")="" Then
%>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
<HTML>
<HEAD>
<TITLE>שגיאה בשם מישתמש</TITLE>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
</BODY>
<STYLE type = "text/css">
a:hover {
text-decoration: none;
}
</STYLE>
<font color="black" face="arial"><H1>שם המישתמש ריק! צריך יותר מ-שלושה אותיות</H1>
<a href="javascript:history.back(1)"><font color="#B8860B " size="2" face="arial"><B>לחץ כאן בכדי לנסות שוב</B></a>
<%
End If
%>
<%
If request.Form("userpassword")="" Then
%>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
<HTML>
<HEAD>
<TITLE>שגיאה בסיסמא</TITLE>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
</BODY>
<STYLE type = "text/css">
a:hover {
text-decoration: none;
}
</STYLE>
<font color="black" face="arial"><H1>סיסמא ריקה!צריך יותר מ-חמישה תווים</H1>
<a href="javascript:history.back(1)"><font color="#B8860B " size="2" face="arial"><B>לחץ כאן בכדי לנסות שוב</B></a>
<%
End If
%>
<%
If request.Form("usermail")="" Then
%>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
<HTML>
<HEAD>
<TITLE>שגיאה באימייל</TITLE>
<body vlink="white" alink="white" dir="rtl" bgcolor="#D3D3D3">
</BODY>
<STYLE type = "text/css">
a:hover {
text-decoration: none;
}
</STYLE>
<font color="black" face="arial"><H1>אימייל ריק!אנא הקלד/י אימייל חוקי</H1>
<a href="javascript:history.back(1)"><font color="#B8860B " size="2" face="arial"><B>לחץ כאן בכדי לנסות שוב</B></a>
<%
End If
%>
<%
Dim sq,path,con
path = Server.mappath("Project/Db.mdb")
sq="insert into users(fname,lname,username,userpassword,usermail)v  alues('"&fname"','"&lname&"','"&username&"','"&userpassword&"','"&usermail&"')"
Set con=Server.CreateObject("ADODB.Connection")
con.open "driver={Microsoft access Driver(*.mdb); DBQ=" &path
con.Execoute sq
%>
טקסט טקסט טקסט
<%=fname%>
<%
con.Close
set con = nothing
%>

והשגיאה:

קוד:

 
 
Script error detected at line 113. 
Source line: sq="insert into users(fname,lname,username,userpassword,usermail)v  alues('"&fname"','"&lname&"','"&username&"','"&userpassword&"','"&usermail&"')" 
Description: ‏‏נדרש סוף משפט

לפי מה שהבנתי צריך לשים סוף כאילו:" אבל זה גם לא עובד.

תודה לעוזרים

כלי אשכול	חפש באשכול זה
הצג גירסת הדפסה שלח דף זה ב E-Mail	חפש באשכול זה: חיפוש מתקדם
מצבי תצוגה	דרג אשכול זה
עבור למצב לינארי מצב כלאיים עבור למצב משורשר	דרג אשכול זה:

הדף נוצר ב 0.05 שניות עם 12 שאילתות
צור קשר - Fresh - למעלה