15 svar · 464 visningar · startad av scoxi
Jag gör en registreringssida och jag undrar hur man ska skriva för att kolla om användaren redan finns i databasen. Alltså om den finns så går det inte om det går så ska den läggas till. Har fixxat allt annat så det läggs till men man kan ha multiple av t.ex. "scoxi"..
tack på förhand
Du måste skapa en sql-sats för att först räkna förekomsten av användarnamnet innan du skickar in det i databasen.
sql = "select count(kolumnen_usernames) where kolumnen_usernames = '" & Request.form("användarnamn") & "'"
Set rs = conn.execute(sql)
if not cLng(rs(0)) = 0 then
'användarnamnet finns, skicka tebax
else
'användarnamnet finns inte
'lägg till mannen
end if
Ersätt helst eventuella '-tecken också för säkerhets skull.
Varför inte bara..?
sql = "select count(kolumnen_usernames) where kolumnen_usernames = '" & Request.form("användarnamn") & "'"
Set rs = conn.execute(sql)
if rs(0) then
'användarnamnet finns, skicka tebax
else
'användarnamnet finns inte
'lägg till mannen
end if
CLng är onödigt eftersom att du får ett tall tillbaka. Sen känns det lite onödigt att använda Not vid jämförning av tal och strängar.
Eller bara:
sql = "select 1 [b]from tabellen[/b] where kolumnen_usernames = '" & Request.form("användarnamn") & "'"
Set rs = conn.execute(sql)
if not rs.eof then
'användarnamnet finns, skicka tebax
else
'användarnamnet finns inte
'lägg till mannen
end if
Varför använda count?
mvh
Spelar väl ingen roll prestandamässigt i alla fall. I alla fall inte enligt mina tester. :)
Inte för att jag säger att mina ändringar gör någon skillnad så, men det här är mer whatever...
Men jag hade gjort som @nders skrev. :)
Nej, jag håller med, det är nog ingen större skillnad.
Det finns ju ett alternativ till:
*) Se till att fältet inte får lagra dubletter
*) Gör insert
*) Fånga eventuellt fel
Mvh
Blä, känns som en sak man använder när man gör en enkel lokal applikation eller liknande där saker inte behöver vara helt hundra.
För att sitta och tolka felkoder känns inte bra...
Men att ha en constraint på fältet som hindrar dubletter är vettigt!
tack så mkt
vart kan jag läsa mer om sql kommandon som: eof, rs(?), clng o allt vad det är?
Blä, känns som en sak man använder när man gör en enkel lokal applikation eller liknande där saker inte behöver vara helt hundra.
För att sitta och tolka felkoder känns inte bra...
Helt riktigt. inte av den här anledningen i alla fall!
Men att ha en constraint på fältet som hindrar dubletter är vettigt!
Jepp!
mvh
Felkoder och liknande ska spottas in i loggar!
Bara i undantagsfall jag använder dem för någonting annat. :)
Umm hur menar du? Jag sitter ju själv och läser fel i loggar och så, men jag känner mig inte bekväm med att programmatiskt tolka felkoder/felbeskrivningar.
Jag gör det bara i undantagsfall.
Alltså det blir knas när jag ska få in det i resten av koden..
<%
username = Request.Form("username")
password1 = Request.Form("password1")
password2 = Request.Form("password2")
If username = "" OR password1 = "" OR password2 = "" Then
%>
<font color="red" face="verdana" size="1"><b>Du måste fylla i alla fält</b></font>
<%
else
'Öppnar databasen
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\test\anvandare.mdb"
sql = "select count(username) where username = '" & username & "'"
Set rs = conn.execute(sql)
if rs(0) then response.write "upptaget"
'användarnamnet finns, skicka tebax
conn.close
else
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\test\anvandare.mdb"
Add = "INSERT INTO anvandare (username, password) VALUES ( '" & username & "', '" & password1 & "' )"
Conn.Execute(Add)
Conn.Close
Response.Redirect("login.asp")
%>
<font color="green" face="verdana" size="1"><b>Du är nu medlem. Klicka <a href="login.asp">här</a> för att logga in</b></font>
<%
End if
end if
%>
Felmeddelande:
Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A03F6)
'End' förväntas.
/test/regcheck.asp, line 38
else
HEJ!
Felet står i klartext, du har missat ett end if någonstans.
Gör din kod med klara indrag, så ser du väldigt enkelt var det är fel. Dessutom underlättar det för oss andra wF-ianer om du inte skulle lösa ett problem.
