Fattar noll

Har gjort en accessdatabas som skall hantera registreringar.
Den reggar allt som den skall in i databasen.

När jag "skickar" in uppgifterna så skall den regga sen skicka mej till en sida som heter golf.asp.

När jag trycker på skicka så händer följande:

Felmeddelande:

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/golf.asp, line 12

xx = xx & rs.Fields("Efternamn") & ", " & rs.Fields("Fornamn") & ", " & rs.Fields("Hcp") "</a>" & vbcrlf
-----------------------------------------------------------------------------------------^

Koden ser ut som följer:

rs.Open "Select * From players Where typ = Kund Order By Kon, Efternamn ASC", conn
'rs.Open "SELECT users.Namn, Funktion.* FROM users INNER JOIN Funktion ON users.ID = Funktion.ID", conn

If NOT rs.EOF Then
	Do Until rs.EOF
		xx = xx & rs.Fields("Efternamn") & ", " & rs.Fields("Fornamn") & ", " & rs.Fields("Hcp") "</a>" & vbcrlf
	rs.MoveNext
	Loop
End IF

rs.Close
Set rs = Nothing
conn.Close
Set conn = nothing
%>

Vore tacksam för hilfe...

Meningen är att det skall presenteras på följande sätt.

2 kategorier: Kunder / Ejkunder
dessa är könsindelade.