עבר עריכה לאחרונה בתאריך 06.05.03 בשעה 17:58
יש לי את קטע הקוד הבא:
<%
dim c,r,name,found
set c=server.createobject("adodb.connection")
c.open "dsn=gilad;"
set r=server.createobject("adodb.recordset")
name="select * from table2"
r.open name,c
found=false
while (not r.EOF)and(found=false)
if r.fields("name")=request.form("name")then IF r.fields("password")=request.form("password")then _
found=true
r.movenext
wend
if found then
session("password")="ok"
if application.contents("counter")="" then
application.contents("counter")=1
else
application.contents("counter")=application.contents("counter")+1
end if
response.write "<HTML dir=rtl>"
response.write "<HEAD>"
response.write "<TITLE>ברוכים הבאים לאתר הפרוייקט של גלעד ולדמן</TITLE>"
response.write "</HEAD>"
response.write "</html>
else
response.write "רוסית?"
end if
r.close
set r=nothing
c.close
set c=nothing
%>עריכה: פתרתי את הבעיה הקודמת אבל עכשיו צצה בעיה נוספת אני לא מצליח לעשות שבסוף כל הבדיקות הוא יכניס אותי לעמוד שאני רוצה אתם יודעים איך עושים את זה?כאן ניסיתי לעשות את זה בעזרת ריספונס רייט אבל זה לא עובד...