Hvordan udskifter man '

Replace(strStreng, "'", "''")

//>Rune

Jeg kan ikke få det til at virke... hvor vil du sætte det ind henne??

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("news.mdb")
Conn.Open DSN

strOverskrift = Request.Form("overskrift")
strDato = now
strNyhed = Request.Form("nyhed")
strSkrevetaf = Request.Form("skrevetaf")
strTemaord = Request.Form("temaord")
strArt = Request.Form ("art")

strSQL = "Insert into news (overskrift, dato, nyhed, skrevetaf, temaord, art) values('"& strOverskrift &"', '"& strDato &"', '"& strNyhed &"', '"& strSkrevetaf &"', '"& strTemaord &"', '"& strArt &"')"

Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
response.redirect "adminoversigt.asp"
%>

Det kommer jo an på hvad du vil ha' replacet!

//>Rune

Du kan fx. gøre sådan her:

strOverskrift = Replace(Request.Form("overskrift"), "'", "'')
strDato = now
strNyhed = Replace(Request.Form("nyhed"), "'", "'')
strSkrevetaf = Replace(Request.Form("skrevetaf"), "'", "'')
strTemaord = Replace(Request.Form("temaord"), "'", "'')
strArt = Replace(Request.Form ("art"), "'", "'')

//>Rune

Fjong

Fint - mange tak for det!!!

Anytime....
Thx 4 Poinz

//>Rune