Betingelser.

Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../system/xxopret.mdb\")
Conn.Open DSN

rov = \"select * from bands where burger = \'\" & Brugernavn & \"\'\"
set rs = conn.Execute(rov)
if rs.eof then
response.write(\"Brugernavnet er optaget\")

else
\'opret ny

end if

-> netsrac: \"where burger = \" ?? ;-)

-> idiotbarn: Helt generelt gælder det også, at hvis brugernavn skal være unikt, bør din database afspejle det faktum. I tabeldesign i Access kan du sætte \"Indexed\" til \"Yes (No Duplicates)\".

Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../system/xxopret.mdb\")
Conn.Open DSN

If Kodeord = Gentag_Kodeord Then
rov = \"select * from bands where burger = \'\" & Brugernavn & \"\'\"
set rs = conn.Execute(rov)
if rs.eof then
response.write(\"Brugernavnet er optaget\")

else
\'opret ny

end if
else
\'passwords er ikke ens
response.write(\"Passwords er ikke ens!\")
end if

hmm, kopi/paste af netsrac\'s + lidt mere, så \"burger\" skal rettes til \"bruger\" , med mindre du er sulten :)

/Mattias

Okay en stavebøf *G*

Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../system/xxopret.mdb\")
Conn.Open DSN

rov = \"select * from bands where bruger = \'\" & Brugernavn & \"\'\"
set rs = conn.Execute(rov)
if rs.eof then
response.write(\"Brugernavnet er optaget\")

else
\'opret ny

end if

kan i ikke lave en masse kommentare... jeg kan ikke se logiken i det.... hva med kode = Gentag_kode ?

<%

Kodeord = Request.Form(\"kodeord\") \'hvis feltet hedder kodeord
Gentag_Kodeord = Request.Form(\"gentag_kodeord\") \'hvis nr. 2 felt hedder gentag_kodeord

Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../system/xxopret.mdb\")
Conn.Open DSN \'Opretter forbindelse med DB\'en

If Kodeord = Gentag_Kodeord Then \'Hvis Kodeord er lig Gentag_Kodeord Så:
    rov = \"select * from bands where bruger = \'\" & Brugernavn & \"\'\"
    set rs = conn.Execute(rov)
    if rs.eof then \'Hvis rs.eof(End Of File) er lig True Så (dvs. at hvis der er nogen resultater fra vores dbudtræk):

        response.write(\"Brugernavnet er optaget\")

    else \'Ellers

        \'opret ny

    end if
else \'Ellers
    \'passwords er ikke ens
    response.write(\"Passwords er ikke ens!\")
end if

%>

/Mattias

Takker....
Hvordan undgår man at få denne her fejl:
Response-objekt fejl \'ASP 0156 : 80004005\'

Headerfejl

/bandzone/Opretny/Data2.asp, linje 123

HTTP-headerne skrives allerede til klientbrowseren. Ændringer af HTTP-headers skal foretages, inden sideindholdet skrives.

Ved at sætte <%response.buffer = True %> aller øverst i filen, som det aller første på siden.

jeg har fundet ud af det...men der er nu et problem...

Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"../system/xxopret.mdb\")
Conn.Open DSN

If Kodeord = Gentag_Kodeord Then

rov = \"select * from bands where Brugernavn = \'\" & Brugernavn & \"\'\"
set rs = conn.Execute(rov)

\'Hvis rs.eof(End Of File) er lig True Så (dvs. at hvis der er nogen resultater fra vores dbudtræk):

if rs.eof then
        response.write(\"Brugernavnet er optaget\")

    else
\'opret brugeren...

Problemet er at den skriver altid Brugernavnet er optaget, også selv om det ikke er...

Hvor kommer brugernavn fra ? en form ?

Så skal det være:
rov = \"select * from bands where Brugernavn = \'\" & request.form(\"Brugernavn\") & \"\'\"

Jeg har:
Brugernavn = Request.Form(\"Brugernavn\")
rov = \"select * from bands where Brugernavn = \'\" & Brugernavn & \"\'\"

Så det skulle jo være der,ik?

Jo det skulle det jo så...prøv at udskirve brugernavn og se om den indeholder noget ?

jo jo den indeholder godtnok data...

Dooh det skal jo være omvendt:

if rs.eof then
\'opret brugeren...
    else
        response.write(\"Brugernavnet er optaget\")
end if

he he..ok, det prøver jeg lige

fedt..tak