Jørn Andersen wrote in dk.edb.internet.webdesign.serverside.asp:
> On Sun, 14 Oct 2001 17:51:20 +0000 (UTC), Asger <flubbyb@hotmail.com>
> wrote:
>
> Hej Asger,
>
> Prøv at kigge på, hvad du egentlig gør:
>
> >Dem vil jeg så have sat ind i en database. Jeg har prøvet at
> >skrive:
> >
> >Set Conn = Server.CreateObject("ADODB.Connection")
> >DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
> >DSN = DSN & "DBQ=" & Server.MapPath
> >("/brugersystem/db/brugere.mdb")
> >Conn.Open DSN
>
> Indtil nu har du connectet - det er sikkert OK.
>
> >strSQL = "Select * from brugere"
> >' Udfør forespørgsel (rs indeholder nu resultatet)
> >Set rs = Conn.Execute(strSQL)
>
> Og hvad kan du så bruge det til? Du vil jo ikke udvælge, men indsætte.
> - Drop disse 3 linier.
>
> >strSQL = "Insert into brugere (brugernavn, password, e-mail)
> >values('" & Request.Form("brugernavn") & ", " &
> >Request.Form("password") & ", " & Request.Form("e-mail") & "')"
>
> Du mangler vistnok et par enkelt-anførselstegn:
> strSQL = "Insert into brugere (brugernavn, password, e-mail)
> values('" & Request.Form("brugernavn") & "', '" &
> Request.Form("password") & "', '" & Request.Form("e-mail") & "')"
>
> (det hele i een lang linie)
>
> Her har du dannet en SQL-streng, men du bruger den bare ikke til
> noget.
>
> Indsæt:
> Conn.Execute(strSQL)
> - så får udført din SQL.
>
> Check:
> <URL:
http://html.dk/tutorials/asp/>
> - især letion 17 og frem.
>
>
> Good luck,
> Jørn
>
>
> --
> Jørn Andersen
> Brønshøj
Mange tak for hjælpen!
Jeg har nu fået ændret lidt på mit script, men når jeg nu bruger den
rettede SQL sætning få jeg den standard fejlmeddelse "HTTP 500 - Intern
serverfejl"
Få en sikkerheds skyld så er hele scriptet her:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("/brugersystem/db/brugere.mdb")
Conn.Open DSN
Do While Not rs.EOF
If Request.Form("brugernavn") = rs("brugernavn") Then
Response.Write "Det brugernavn er der desværre en anden der har taget,
prøv venligst et andet."
Response.Write "Tryk <a href='opret_bruger_side.asp'
target='hovedramme'>her</a> for at komme tilbage."
End if
rs.MoveNext
Loop
strSQL = "Insert into brugere (brugernavn, password, e-mail) values('" &
Request.Form("brugernavn") & "', '" & Request.Form("password") & "', '"
& Request.Form("e-mail") & "')"
Conn.Execute(strSQL)
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
Hvad pokker kan der være galt???
Please help me!
Asger
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP ???
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials