ASP, SQL, Access?

Her er noget af det kode jeg har lavet:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("db/links.mdb")

SQLstmt = "SELECT * FROM profiler WHERE  mail='" & session("brugernavn") & "'"

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)

%>

<FORM METHOD="post" ACTION="default.asp?mode=retprofil">

<INPUT TYPE="text" NAME="navn" VALUE="<%=rs("navn")%>" SIZE="30" MAXLENGTH="50">

<TEXTAREA NAME="profil"><%=rs("profil")%></TEXTAREA>

<INPUT TYPE="submit" VALUE="Ret/opret profil">

</FORM>

<%

rs.Close
Set rs = Nothing

Conn.Close
set Conn = Nothing
Set SQLstmt = nothing

Men når der ikke er oprettet en post i tabellen profiler i databasen der matcher session("brugernavn"), så går den kold - i det tilfælde skal den blot returnere tomme felter som brugeren kan udfylde!

Hvis du hendter data er det sikker noget i stil med:

SQL = "SELECT * FROM profil WHERE email = '" & Session("brugeremail") & "'"

Såkan du gøre sådan her:

Set rs = Conn.execute(SQL)
if NOT rs.EOF then
  'Bruger profilen findes
  navn = rs("navn")
  adresse = rs("adresse")
  osv..

else
  'Bruger profilen findes ikke
end if
%>

Når du så laver form'en kan du bruger de variable med teksten fra databaen navn,adresse osv..

Navn : <input type="text" name="navn" value="<%=navn%>">
Aderesse : <input type="text" name="adr" value="<%=adresse%>">

Hvis profilen ikke findes vil de variable navn, adresse osv være tomme og dermed er formen også tom.

eagleeye> Ja, men så skal der i stedet for din else-sætning komme:

Navn : <input type="text" name="navn" value="">
Aderesse : <input type="text" name="adr" value="">

Hvordan gør jeg det?

Nåååå .. undskyld - du havde svaret - tak!

eagleeye> Dit løsning returnerer:

Error Type:
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/brinkster/default.asp

Har løst den nu!

Hvis du bruger rs("kolonne") efter denne if sætning og der ingen bruger profil er vil den fejl komme:

if not rs.EOF then

else

end if

Response.write rs("kolonnnenavn")  'Hvis der ikke er en profil vil der give den fejl