Kolla om namn redan finns i DB?

Följande borde fungera:

epost = Trim(Request.Form("epost"))

strConnection="DSN=myDSN"
strSQL="SELECT epost FROM table WHERE epost='" & epost & "'"
Set conFoo = Server.CreateObject("ADODB.Connection")
conFoo.Open strConnection

Set rsFoo = conFoo.Execute(strSQL)

If rsFoo.BOF = -1 AND rsFoo.EOF = -1 Then
  rsFoo.Close
  Set rsFoo = Nothing
  strSQL = "INSERT INTO table ..."
  conFoo.Execute (strSQL)
Else
  rsFoo.Close
  Set rsFoo = Nothing
  Response.Redirect "fel.asp"
  Response.End
End If

Först körs en SELECT-sats med epostadressen som skickades med formuläret som argument i WHERE. Resultatet lagras i ett recordset kallat rsFoo. IF-satsen kontrollerar sedan om detta recordset är tomt. Om så är fallet existerar inte mailadressen i databasen och INSERT-satsen utförs.
Om recordsetet innehåller data skickas användaren vidare till sidan fel.asp.

Hoppas det blev lite klarare ;)

/Morph

[Redigerat av Morph den 15 nov 2000]

Hello,

när SELECT satsen körs så kommer ej connection objectet att stängas eller "förstöras" vilket det borde göra direkt efter att select satsen körts. Connection objectet förstörs ej heller om select satsen ej körs, bör göras direkt efter att connection objectet stängts.

cya,

------------------
'*********************
Response.Write("PatrikB")
Response.End
'*********************