<%if not rscourse.BOF then
Response.Write("
")
if rscourse.Fields("mark-sofy") then
Response.Write("איחולינו! סיימת את לימוד הקורס.")
Response.Write("
"&" ציונך הסופי בקורס הוא ")
Response.Write(rscourse.Fields("mark-sofy"))
else
Response.Write("סיימת את חובותיך לקורס,
הציון הסופי יימסר לאחר בדיקת העבודות")
end if
Response.Write(" |
")
end if
%>
|
<%=rsstud.Fields("first-name")+" " +rsstud.Fields("last-name")%>
<%=rsstud.Fields("email")%>
|
סיכום תשובותיך והערות המרצה עליהם
תגובות המרצה ניתנות פעם בשבועיים בערך, בתחילתו ואמצעו של כל חודש לועזי.
אם ברצונך לשלוח דואר אלקטרוני למרצה
לחץ כאן
<%
Response.Write("")
Response.Write("")
response.write("| משימה | ")
response.write("תשובה למשימה | ")
response.write("תגובת המרצה | ")
Response.Write("
")
rsall.MoveFirst
if rsall.EOF then
Response.Write("| טרם ביצעת משימות |
")
else
do until rsall.EOF
Response.Write("")
response.write("| "&rsall.fields("chapter")&" | ")
response.write("")
ktov(rsall.fields("sheela"))
response.write(" | ")
response.write("")
ktov(rsall.fields("tguva"))
response.write(" | ")
Response.Write("
")
rsall.MoveNext
loop
end if
Response.Write("
")
rsstud.Close
set rsstud=nothing
rsall.Close
set rsall=nothing
rscourse.Close
set rscourse=nothing
con.Close
set con=nothing
%>
חזור לתוכן