Check for dubletter før tilføj til Access db ?

set rs = conn.execute("select * from DinTabel where navn='"& request.form("navn") &"'")
if rs.eof then
'navn eksistere ikke i database
conn.execute("insert into DinTabel.....")
else
'navn eksistere i databasen
end if

Jeg får en :

Microsoft JET Database Engine error '80040e14'

Syntax error in FROM clause.

/go1/strnewuser.asp, line 9


Jeg har prøvet med en anden tabel i samme db... det virker godt nok.. hvorfor kan den ikke lave udtræk fra min user tabel ? Der er ikke noget særligt ved den...

user
----------------
id  (autonum.)
username (text)
password (text)
ip (text)
admin (text)
----------------

Hvad er der galt med den ?

Det hele ser sådan ud.:




<%@LANGUAGE="VBScript"%>

<!--#include file="connect.asp"-->
<%
strnavn = Request.Form("username")
strnavn = Replace(strnavn, "'", "''")
%>
<%
set rs = Myconn.execute("select * from user where username='"& request.form("username") &"'")
if rs.eof then
'navn eksistere ikke i database
sql = "insert into user(Date(), Time(),'"&strusername&"','"&request.form("password")&"')"
Myconn.execute(sql)
Response.Redirect("login.asp")
else
newerror = "Brugeren eksisterer allerede...."
Response.Redirect("newuser.asp")
end if
%>

user er et reserveret ord i SQl så der skal [] omkring.
set rs = Myconn.execute("select * from [user] where username='"& request.form("username") &"'")

Ahhh... jeg ser... prøver.

Jeg får den stadig på linie 13..

sql = "insert into [user] (Date(), Time(),'"&strusername&"','"&request.form("password")&"')"

prøv med:
sql = "insert into [user](username,password,ip,admin) values('"&strusername&"','"&request.form("password")&"','ved ikke','ved ikke')"

Det er den rigtige syntax for indsættelse.

Nej... det samme... ved ikke ... skulle jeg indsætte noget der?

hvordan ser koden ud nu???

<%@LANGUAGE="VBScript"%>

<!--#include file="connect.asp"-->
<%
strnavn = Request.Form("username")
strnavn = Replace(strnavn, "'", "''")
%>
<%
set rs = Myconn.execute("select * from [user] where username='"& request.form("username") &"'")
if rs.eof then
'navn eksistere ikke i database
sql = "insert into [user](username,password,ip,admin) values('"&strusername&"','"&request.form("password")&"','ved ikke','ved ikke')"
Myconn.execute(sql)
Response.Redirect("login.asp")
else
newerror = "Brugeren eksisterer allerede...."
Response.Redirect("newuser.asp")
end if
%>

ved ikke lige om nogle af de andre også er reserveret ord, men du kan jo altid prøve at smide [] omkring dem alle :o)

sql = "insert into [user]([username],[password],[ip],[admin]) values('"&strusername&"','"&request.form("password")&"','ved ikke','ved ikke')"

Perfekt... []'erne klarede det...
Smid et svar ;)

... og lige en lille sidste ting...

Jeg har jo :

else
newerror = "Brugeren eksisterer allerede"
Response.Redirect("newuser.asp")
end if


og så vil jeg udskrive den på newuser.asp med :

<% = request.querystring("newerror")%>

Har jeg lavet fejl der ?

nej, men du mangler at få den med som parameter.

Response.Redirect("newuser.asp?newerror="& newerror)

Nåeh ja... *GG* Takker