Hej jeg har et stykke kode som skal sætte nogen ting ind i en
mdb.
Det skal være muliget at skrive tegnet ' jeg fik lavet dette styk
kode, nogen der kan finde en fejl og evt hjælpe mig?
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.Mappath("../database/apc.mdb")
Conn.Open DSN
Dim strForfatter, strTitel, strIndhold
strForfatter = Request.Form("Forfatter")
strForfatter = Replace(strForfatter, "'", "''")
strTitel = Request.Form("Titel")
strTitel = Replace(strTitel, "'", "''")
strIndhold = Request.Form("Indhold")
strIndhold = Replace(strIndhold, "'", "''")
strSQL = "Insert into nyheder (Forfatter, Titel, Dato, Emne,
Indhold) values('" & strForfatter & "','" & strTitel & "','" &
Request.Form("dato") & "','" & Request.Form("emne") & "','" &
strIndhold & "')"
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
Response.Redirect "index2.asp"
%>
På forhånd tak
Mvh. P.Meisner
--
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