Felaktig variabeltyp.

Function checkuser(user)
  user = "" & user
  SET RStyp = MinCon.Execute("SELECT vip FROM person WHERE username='" & user & "'")
  IF RStyp("vip") = "ja" THEN
  user = user & " <IMG SRC=""pictures/vip.gif"" BORDER=""0"" ALT=""V.I.P Medlem"">"
  END IF
  checkuser = user
End Function

Får detta felmeddelande:
Feltyp:
(0x80020009)
Felaktig variabeltyp.
/LMG/txt/databas.txt, line 65

ibland funkar det och ibland inte, varför??

IF RStyp("vip") = "ja" THEN

Det är RAD 65.

Vad är VIP för datatyp i databasen?

Function checkuser(user)
  user = "" & user
  SET RStyp = MinCon.Execute("SELECT vip FROM person WHERE username='" & user & "' and vip = 'ja'" )
  if not RStyp.eof then  
      user = user & " <IMG SRC=""pictures/vip.gif"" BORDER=""0"" ALT=""V.I.P Medlem"">"
       end if
  checkuser = user
End Function

Om du har VIP som datatyp bool (ja/nej) så räcker det med

if rstyp("vip") = true then
...

' eller t.o.m

if rstyp("vip") then
...

OT: var inte "V.I.P" ett 80-talsfenomen?

Tackar, kodem med EOF funkade :)
Den är som TEXT :)