If sætning ??

Hvad med

IF MyIp <> \"\" OR MyDomain <> \"\" THEN
... når den er angivet
ELSE
... når den ikke er
END IF

Skal der så ikke stå :

IF Referent = MyIp <> \"\" OR MyDomain <> \"\" THEN
... når den er angivet
ELSE
... når den ikke er

END IF

Og hvad skal der stå ved ELSE, bare ingen ting eller hvad ?

Her er sciptet som jeg har lavet :

<%@ LANGUAGE=\"VBSCRIPT\" %>
<%
Set Con = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"referal.mdb\")
Con.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath

Function fixQuotes( theString )
    fixQuotes = Replace( theString, \"\'\", \"\'\'\" )
End Function

If Session(\"Count\") = \"\" Then
    Session(\"Count\") = \"Hit\"

Referent = Request.ServerVariables(\"HTTP_REFERER\")

If Referent = \"myIP\" Then
Referent = \"\"

If Referent = \"www.mydomain.com\" Then
Referent = \"\"


End If

End If

Sql = \"INSERT INTO referal (referent) VALUES(\'\" & fixQuotes(referent)&\"\')\"
Con.Execute(Sql)

End If


%>

Hvis der er en der gider og fortælle mig hvad jeg skal gøre ?!!!

If Referent = \"myIP\" Or \"www.mydomain.com\" Then

Else
Set Con = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"referal.mdb\")
Con.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
Sql = \"INSERT INTO referal (referent) VALUES(\'\" & fixQuotes(referent)&\"\')\"
Con.Execute(Sql)
End If

Hvad skal der stå efter THEN ?? ingen ting eller hvad ??

Ingen ting = så sker der ikke noget hvis det er dit Ip eller domain, altså ingen opdatering af databasen, og der bliver heller ikke lavet et unødvendigt Object

Mit bud:

<%
If Not Referent = \"myIP\" or \"www.mydomain.com\" then

Set Con = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"referal.mdb\")
Con.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath
Sql = \"INSERT INTO referal (referent) VALUES(\'\" & fixQuotes(referent)&\"\')\"
Con.Execute(Sql)
End If
%>

/pfp