Om inte...

Hej, jag har en litet problem här. Jag vill göra en If-sats som kollar om Gjorda är större än Inslappta från en databas. Om det är större visas all kod efter Else, om inte så visas ett blanksteg

If SQL = "SELECT * FROM Post Where Gjorda < Inslappta" Then
  Response.Write("&nbsp;")
Else
  'kod om gjorda är större än inslappta..

Vet att detta är totalt fel, men detta kanske hjälper er att förstå mitt problem..

sql="select gjorda,inslappta from post"
set rs=connect.execute(sql)

if rs("gjorda") < rs("inslappta") then
  response.write "  "
else
  'kod 
end if

denn kod fungerar inte, varför?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("db/amica.mdb")

SQL = "SELECT Gjorda, Inslappta FROM Post"
Set Rs = Connect.Execute(SQL)

If rs("gjorda") < rs("inslappta") Then
Response.Write(" ")
Else

If Request.QueryString("typ") = "alla" Then
strSQL = "SELECT Gjorda, Inslappta, (Gjorda - Inslappta) AS Diff FROM Post ORDER BY 3 DESC"
Set Rs = Conn.Execute(strSQL)
ElseIf Request.QueryString("typ") = "sok" Then
strSQL = "SELECT Gjorda, Inslappta, (Gjorda - Inslappta) AS Diff FROM Post WHERE Motstandare LIKE '%" & Request.Form("sok") & "%' ORDER BY 3 DESC"
Set Rs = Conn.Execute(strSQL)
Else
strSQL = "SELECT Gjorda, Inslappta, (Gjorda - Inslappta) AS Diff FROM Post WHERE typ = '" & Request.QueryString("typ") & "' ORDER BY 3 DESC"
Set Rs = Conn.Execute(strSQL)
End if
Response.Write("" & rs("gjorda") & " - " & rs("inslappta") & "")
Rs.Close : Set Rs = Nothing
Conn.Close : Set Conn = Nothing

End if
%>

Din anslutning till databasen heter conn så ändra

Set Rs = Connect.Execute(SQL)

till

Set Rs = Conn.Execute(SQL)

Och du har ett recordset som heter rs längre ner i koden så byt namn på det första till

Set Rs1 = Conn.Execute(SQL)

If rs1("gjorda") < rs1("inslappta") Then

trots ändringar som du sa står det: Största vinst 2 - 4

jag löste det ;)