3 x if sætninger, en laver kuk i det...

<%
strGASscore = "0"&Request.Form("GASScore")
strEnemyScore = "0"&Request.Form("EnemyScore")
strEnemyName = Request.Form("EnemyName")
strScore1 = "#157A0B"
strScore2 = "#7A0B10"
strScore3 = "#FFCC33"

if strGASscore > strEnemyScore then
strSQL = "Insert into wars ("

strSQL = strSQL & "GAS, "
strSQL = strSQL & "Enemy, "
strSQL = strSQL & "EnemyName, "
strSQL = strSQL & "OurColor, "
strSQL = strSQL & "ThairColor) "


strSQL = strSQL & "values( "

strSQL = strSQL & "'" & strGASscore &"', "
strSQL = strSQL & "'" & strEnemyScore & "', "
strSQL = strSQL & "'" & strEnemyName & "', "
strSQL = strSQL & "'" & strScore1 & "', "
strSQL = strSQL & "'" & strScore2 & "') "

Conn.Execute(strSQL)
end if

if strGASscore = strEnemyScore then
strSQL = "Insert into wars ("

strSQL = strSQL & "GAS, "
strSQL = strSQL & "Enemy, "
strSQL = strSQL & "EnemyName, "
strSQL = strSQL & "OurColor, "
strSQL = strSQL & "ThairColor) "


strSQL = strSQL & "values( "

strSQL = strSQL & "'" & strGASscore &"', "
strSQL = strSQL & "'" & strEnemyScore & "', "
strSQL = strSQL & "'" & strEnemyName & "', "
strSQL = strSQL & "'" & strScore3 & "', "
strSQL = strSQL & "'" & strScore3 & "') "

Conn.Execute(strSQL)

end if

if strGASscore < strEnemyScore then
strSQL = "Insert into wars ("

strSQL = strSQL & "GAS, "
strSQL = strSQL & "Enemy, "
strSQL = strSQL & "EnemyName, "
strSQL = strSQL & "OurColor, "
strSQL = strSQL & "ThairColor) "


strSQL = strSQL & "values( "

strSQL = strSQL & "'" & strGASscore &"', "
strSQL = strSQL & "'" & strEnemyScore & "', "
strSQL = strSQL & "'" & strEnemyName & "', "
strSQL = strSQL & "'" & strScore2 & "', "
strSQL = strSQL & "'" & strScore1 & "') "

Conn.Execute(strSQL)
end if
%>

Troede jeg havde løst problemet med at sætte et 0 forean tallene fra formsne, men det havde jeg ikke.

Det som går galt er det nederste if sætning som ikke mener at 8 er mindre end 24 i denne sammenhæng.

Nogle foreslag til hvordan jeg kan få den til at virke ordenligt?