Har sökt runder här på sidan men hittar inget om detta.

Det är så att jag vill utföra en kontroll av "user" på tabellen "usr". På sidan där man registrerar sig har jag ett fäl som heter "user", när man har fyllt i ett nickname ska det kontrolleras med databasen och om det är ledig ska det gå att registrera. Men om detta är upptaget ska det skrivas ut att det nickname du valt redan finns.

Jag har försökt med en if-sats:

<code>
<%
If request.form("user") = rs("user") Then
response.write "Det nickname du angav finns redan!"
End if
%>
</code>

Vadför kan man inte göra så här?

du måste ha en sql-sats som retunerar t.ex. id't för raden. Sedan kolla du om rs.eof = true, då finns namnet redan, ananrs inte

Hur menar du? Ska jag först hämta värdet sen kolla rs.eof = true?

m...


Öppna databas
Köra conn.execute med lite sql-kod och spara i en variabel
kolla:
if variabel.eof then
tomt
else
finns
end if

Lite mer utförligt exempel:
<code>
<%
Dim rs

Dim strSQL
Dim strUser
strUser = "" & Request.Form("user")
If Len(strUser) > 0 Then
Set con = Server.CreateObject("ADODB.Connection")
con.Open ">>>Din anslutningssträng<<<"

strSQL = "SELECT Null FROM tblUsers WHERE user = '" & Replace(strUser, "'", "''") & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL, con

If rs.EOF Then

strSQL = "INSERT INTO tblUsers (user) VALUES ('" & Replace(strUser, "'", "''") & "')"
con.Execute strSQL

Response.Write "Tack för att du registrerade dig!"
Else
Response.Write "Ditt smeknamn finns redan!"
End If

rs.Close
Set rs = Nothing

con.Close
Set con = nothing
If = rs("user") Then

End if

Else
Response.Write "Du har inte angivit ett smeknamn."
End If
%>
</code>