tjeck url

er der nogen der lige kan sige hvorfor dette ikke virker ???

--------------------------------------------------
Url = RS("URL")
Urlpart = Left("" & URL & "", 7)

If Urlpart = "http://" Then
  Response.write "url er med http"
Else
If Urlpart <> "http://" Then
  URL = "HTTP://" & URL
End If
End If
--------------------------------------------------

den opfatter heletiden urlpart som forskellig fra http://