Avatar billede Slettet bruger
09. marts 2003 - 12:07 Der er 9 kommentarer og
3 løsninger

Opret bruger

Hej jeg har siddet og rodet med noget opret bruger som ikke helt vil virke, her kan i se min kode <%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("brugere.mdb")
Conn.Open DSN

strSQL = "Select from brugere where brugernavn = " & request.form("navn")
Set rs = Conn.execute(strSQL)

If rs.BOF AND rs.EOF then
Response.write "Brugernavnet kan oprettes"
else
Reponse.write "Optaget"
end if


Conn.Close
Set Conn = Nothing
%>

Kaspar
papir@tdcadsl.dk
Avatar billede Slettet bruger
09. marts 2003 - 12:08 #1
hvad med:

strSQL = "Select * from brugere where brugernavn = " & request.form("navn")
Avatar billede somaliomar Praktikant
09. marts 2003 - 12:08 #2
Hvad er problemet?
Avatar billede -mundi- Nybegynder
09. marts 2003 - 12:10 #3
strSQL = "Select from brugere where brugernavn = '" & request.form("navn")&"'"
Avatar billede Slettet bruger
09. marts 2003 - 12:11 #4
det virker stadig ikke :(
Avatar billede somaliomar Praktikant
09. marts 2003 - 12:11 #5
Eller

strSQL = "Select * from brugere where brugernavn = '" & request.form("navn") & "'"
Set rs = Conn.execute(strSQL)

If rs.EOF then
  Response.write "Brugernavnet kan oprettes"
else
  Reponse.write "Optaget"
end if
Avatar billede Slettet bruger
09. marts 2003 - 12:14 #6
Fejltype:
Provider (0x80004005)
Uspecificeret fejl
/opret/tilfoj.asp, line 5
Avatar billede somaliomar Praktikant
09. marts 2003 - 12:15 #7
Hvis du har Acces-databasen åbn så luk det. Hvis det ikke hjælper genstart din computer.
Avatar billede Slettet bruger
09. marts 2003 - 12:25 #8
Okey nu skal jeg bare have lavet det såden det også virker med email så den komme til at hedde strSQL = "Select * from brugere where brugernavn = '" & request.form("navn") & "' OR '" & request.form("email") & "'" så skal jeg have lavet så hvis kun bruger navn er optaget skal den stille om til opret.asp?fejl=3 og hvis email er optaget skal den stille om til opret.asp?fejl=4 håber i vil hjæpe :)
Avatar billede ellebaek Nybegynder
09. marts 2003 - 19:51 #9
du benytter bare eller
og så kigger du i dben...
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("brugere.mdb")
Conn.Open DSN

strSQL = "select * from brugere"

email = request.form("email")
navn = request.form("navn")

while not rs.eof
if email = rs.fields("email") then
response.redirect (opret.asp?fejl=3)
elseif navn = rs.fields("navn")
response.redirect (opret.asp?fejl=4)
end if
wend
Avatar billede ellebaek Nybegynder
09. marts 2003 - 19:55 #10
eller også benytter du 2 forskellige connections...
sql1 = "select * from brugere where brugernavn LIKE '" & request.form("navn") & "'"
sql2 = "select * from brugere where brugernavn LIKE '" & request.form("email") & "'"
så siger du bare
rs1 = rs1.execute(sql1)
if not rs1.eof then
response.redirect(opret.asp?fejl=3)
end if
rs2 = rs2.execute(sql2)
if not rs2.eof then
response.redirect(opret.asp?fejl=4)
end if

Jeg bøffede lidt rundt i tal og sådan før, men det skulle kunne være til at forstå...
Avatar billede -mundi- Nybegynder
10. marts 2003 - 11:57 #11
strSQL = "Select from brugere where brugernavn = '" & request.form("navn")&"' or email= '"&request.form("email")&"'"
Avatar billede -mundi- Nybegynder
10. marts 2003 - 11:58 #12
hmm det var et svar
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester