<%If Request.QueryString("tilfoj") = "sources" Then
Set Conn2 = Server.CreateObject("ADODB.Connection")
Conn2.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
server.MapPath("database.mdb")
Set rs33 = Server.CreateObject("ADODB.Recordset")
sql = "select * from sources"
rs33.open sql, conn2, 1, 3
rs33.AddNew
rs33("titel") = Request.form("titel")
rs33("beskrivelse") = Request.form("beskrivelse")
rs33("download") = Request.form("download")
rs33("source") = Request.form("source")
rs33("oprettet") = now()
rs33("size") = Request.form("size")
rs33("udvikler") = Request.form("udvikler")
rs33("udvikler_mail") = Request.form("udvikler_mail")
rs33("indsender") = Session("Username")
rs33.Update
rs33.Close
Set rs33 = Nothing
%>
hvad gør jeg galt, den tilføjer en hvor de indtastede data står,
men den tilføj også den tom linje i databasen
--
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