Avatar billede Slettet bruger
17. juni 2006 - 22:58 Der er 9 kommentarer og
1 løsning

Aktiver bruger

Hej..:)

Jeg er lige gået igang med at lave et godt brugersystem det er derfor jeg opretter mange spørgesmål. Det undskylder jeg:P
Men jeg er kommet i en fejl. Hvor man skal aktivere brugeren. Jeg kan ikke finde ud af at får den til at virke,
Det jeg har skrevet ser sådan her ud.
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("/db/System.mdb")
Conn.Open DSN
strSQL = "UPDATE Bruger  SET Aktiv = 'Ja' WHERE id ='" & Request.QueryString("id") & "'"
Set rs = Conn.Execute(strSQL)
%><%
Conn.close
set Conn=nothing
%>

Nogle der kan hjælpe?
Avatar billede Slettet bruger
17. juni 2006 - 23:29 #1
Prøv at udskrive din strSQL og paste den her.

Hvis id er integer/number, skal pings (') udelades.

Kommer der en egentlig fejlmeddellelse? hvis ja hvilken?

/1.
Avatar billede Slettet bruger
18. juni 2006 - 10:49 #2
Avatar billede Slettet bruger
18. juni 2006 - 10:51 #3
Det virker nu. Skulle fjerne ' som du sagde. SvaR?
Avatar billede Slettet bruger
18. juni 2006 - 10:56 #4
Lige en til ting. Hvordan gør man at man får et link hvor man kan aktivere brugeren som man lige har oprettet.
Avatar billede nielle Nybegynder
18. juni 2006 - 11:38 #5
Du kan jo aktivere brugeren i det øjeblik som du opretter den.

Men hvis det er fordi at du vil sende en mail til den opgivede e-mail adresse, så kan du gøre det ved at bruge SQL-sætningen "SELECT @@IDENTITY" lige umiddelbart efter at du har kørt den "INSERT INTO ..." sætning som opretter brugeren. "SELECT @@IDENTITY" returnere dt id som den nye post blev oprettet under:

sql = "INSERT INTO bruger (navn, passwd, email, aktiv) VALUES ('nielle', 'xxx', 'nielle@nada.dk', 'Nej')"
Conn.Execute(sql)

sql = "SELECT @@IDENTITY AS NewID"
Conn.Execute(sql)
Set rs = Conn.Execute(sql)

aktiveringsLink = "http://leol.dk/design/Aktiver.asp?id=" & rs("NewID")
Avatar billede Slettet bruger
18. juni 2006 - 12:06 #6
DEt virker ikke. Jeg prøvede det nemligt
sql = "SELECT @@IDENTITY AS NewID"
Conn.Execute(sql)
Set rs = Conn.Execute(sql)

response.write("http://leol.dk/design/Aktiver.asp?id=" & rs("NewID") & "")
Avatar billede nielle Nybegynder
18. juni 2006 - 12:10 #7
Ud over oplyningen om at det ikke virkede, kunne du måske lokkes til at give lidt flere detaljer... Hvad skete der? Hvad skete der ikke? Hvad havde du forventet at der skulle ske? Fik du en fejl? Hvad var fejlbeskeden så? Den slags oplysninger.
Avatar billede Slettet bruger
18. juni 2006 - 12:23 #8
Her er et svar.

/1
Avatar billede Slettet bruger
18. juni 2006 - 12:51 #9
Finder bare på noget andet nielle
Avatar billede nielle Nybegynder
18. juni 2006 - 13:26 #10
Det er nu ellers den rigtige måde at gøre det på ... hvis det fejler for dig, så er det sikkert bare en lille dum kodefejl, som kan rettes op.

Hvis det er denne her fejl du får:

Microsoft VBScript runtime error '800a01a8'

Object required: 'Conn'

/design/New_profile.asp, line 66

- så betyder den simpelthen at din databasefobindelse ikke er åben. Måske har du bare kommet til at sætte Conn til Nothing lidt for tidligt.
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