בעיית מיון

הקוד: (חלק א')

הקוד: (חלק ב')

if request.form("Q3")=G then
    application("G")+1
else
    if request.form("Q3")=S then
        application("S")+1
    else
        if request.form("Q3")=R then
            application("R")+1
        else
            if request.form("Q3")=H then
                application("H")+1
            end if
        end if
    end if
end if

if request.form("Q4")=G then
    application("G")+1
else
    if request.form("Q4")=S then
        application("S")+1
    else
        if request.form("Q4")=R then
            application("R")+1
        else
            if request.form("Q4")=H then
                application("H")+1
            end if
        end if
    end if
end if

if request.form("Q5")=G then
    application("G")+1
else
    if request.form("Q5")=S then
        application("S")+1
    else
        if request.form("Q5")=R then
            application("R")+1
        else
            if request.form("Q5")=H then
                application("H")+1
            end if
        end if
    end if
end if
    

הקוד: (חלק ד')
if application("G")>application("S") or application("G")>application("R") or application("G")>application("H") then
    response.write "שובצת לבית גריפינדור"
    response.write "<br>"
    response.write "<a href=regP3.asp>המשך לשלב הבא</a>"

else
    if application("S")>application("G") or application("S")>application    ("R") or application("S")>application("H") then
        response.write "שובצת לבית סלית'רין"
        response.write "<br>"
        response.write "<a href=regP3.asp>המשך לשלב הבא</a>"
    else
        if application("R")>application("G") or application("R")>            application("S") or application("R")>application("H") then
            response.write "שובצת לבית רייבנקלו"
            response.write "<br>"
            response.write "<a href=regP3.asp>המשך לשלב הבא</a>"

        else
            if application("H")>application("S") or application                ("H")>application("G") or application("H")>application            ("R") then
                response.write "שובצת לבית האפאלפאף"
                response.write "<br>"
                response.write "<a href=regP3.asp>המשך לשלב הבא                    </a>"

            end if
        end if
    end if
end if

%>

סורי
אני מצטער אבל זה הקוד שכתבתי.
אם יש שיטה שאוכל לצמצם אותו.
ובקשר ליישור, יש לי מוזילה פיירפוקס 0.9.1 וכשאני פותח את חלון הוספת ההודעה אני רואה את הכל אחד על השני.

את ההעלת הקובץ על חלון ההודעה והכו' וכשאני לוחץ על כפתור היישור, כלום לא קורה.

ההודעה כבר כתובה…
טוב בסדק,
אבל עכשיו אני כבר לא יכול ליישר את ההודעה כי כבר כתבתי אוותה

הקובץ