' i Database

replace ' med '' - fx;

strSQL = "Insert into test (Projektnavn, Projektbeskrivelse,Teamejer,) values('" & replace(Request.Form("Projektnavn"),"'","''") & "', '" & replace(Request.Form("Projektbeskrivelse"),"'", "''") & "', '" & replace(Request.Form("Teamejer"),"'","''") & "')"

Jeg får flg. fejl
Microsoft VBScript compilation error '800a03ee'

Expected ')'

/d_projekt/be_projekter_copy(1).asp, line 8

strSQL = "Insert into Projekter (Projektnavn, Projektbeskrivelse,Teamejer,deltagerprojektleder,overstrategisketiltag,strategisketiltag,iprojekter,ovrigeprojekter,prioritet ,projektfase,Projektstatus,Tidsfrist) values('" & replace (Request.Form("Projektnavn"),"," & "," & replace (Request.Form("Projektbeskrivelse"),"," & "," & replace (Request.Form("Teamejer"),"," & "," & replace (Request.Form("deltagerprojektleder"),"," & "," & replace (Request.Form("overstrategisketiltag"),"," & "," & replace (Request.Form("strategisketiltag"),"," & "," & replace (Request.Form("iprojekter"),"," & "," & replace (Request.Form("ovrigeprojekter"),"," & "," & replace (Request.Form("prioritet"),"," & "," & replace (Request.Form("projektfase"),"," & "," & replace (Request.Form("Projektstatus"),"," & "," & replace (Request.Form("Tidsfrist"),",")& ")"

Det skal hedde :

strSQL = "Insert into Projekter (Projektnavn, Projektbeskrivelse,Teamejer,deltagerprojektleder,overstrategisketiltag,strategisketiltag,iprojekter,ovrigeprojekter,prioritet ,projektfase,Projektstatus,Tidsfrist) values('" & replace (Request.Form("Projektnavn"),",") & "," & replace (Request.Form("Projektbeskrivelse"),",") & "," & replace (Request.Form("Teamejer"),",") & "," & replace (Request.Form("deltagerprojektleder"),",") & "," & replace (Request.Form("overstrategisketiltag"),",") & "," & replace (Request.Form("strategisketiltag"),",") & "," & replace (Request.Form("iprojekter"),"," & ",") & replace (Request.Form("ovrigeprojekter"),",") & "," & replace (Request.Form("prioritet"),",") & "," & replace (Request.Form("projektfase"),",") & "," & replace (Request.Form("Projektstatus"),",") & "," & replace (Request.Form("Tidsfrist"),",")& ")"

Nu får jeg denne fejl
Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'replace'

be_projekter.asp, line 9

replace (Request.Form("NOGET"),"'","''")

det er  (Request.Form("NOGET")," ' " , " ' ' " )


giver et lidt lettere overblick ;)

Sådan der :

strSQL = "Insert into Projekter (Projektnavn, Projektbeskrivelse,Teamejer,deltagerprojektleder,overstrategisketiltag,strategisketiltag,iprojekter,ovrigeprojekter,prioritet ,projektfase,Projektstatus,Tidsfrist) values('" & replace(Request.Form("Projektnavn"),"'","''") & "," & replace(Request.Form("Projektbeskrivelse"),"'","''") & "," & replace(Request.Form("Teamejer"),"'","''") & "," & replace(Request.Form("deltagerprojektleder"),"'","''") & "," & replace(Request.Form("overstrategisketiltag"),"'","''") & "," & replace(Request.Form("strategisketiltag"),"'","''") & "," & replace(Request.Form("iprojekter"),"'","''") & "," & replace(Request.Form("ovrigeprojekter"),"'","''") & "," & replace(Request.Form("prioritet"),"'","''") & "," & replace(Request.Form("projektfase"),"'","''") & "," & replace(Request.Form("Projektstatus"),"'","''") & "," & replace(Request.Form("Tidsfrist"),"'","''") & ")"

monstersurf : det kan godt være det giver et bedre overblik, men det har ikke samme funktion. (Request.Form("NOGET")," ' " , " ' ' " ) replacer fx. ikke "re't", men kun hvis der stod "ret ' t".

Og det går jo ikke.

Uanset så virker det ikke

først og fremmest skal du have styr på hvad der er tekst/notat-felter og hvad der ikke er... 

tekst/notat-felter skal indsættes sådan; '" & VAR & "'
og tal sådan; " & VAR & "
og så hedder en replacefunktion dette; replace(VAR,"'","''")

Hej alle
Tak for hjælpen, jeg bliver desværre nødt til at lukke nu.

Fjern , efter teameje i din sql sætning:
strSQL = "Insert into test (Projektnavn, Projektbeskrivelse,Teamejer,) ...

Er du sikker på det, hvis du er der nu ?

er du kommet videre?

Nej , det er jeg faktisk ikke

ok - så fortæl hvor du er gået i stå så vi kan yde lidt mere hjælp

Ja, tak.
Sådan ser min kode ud:
<%
strDSN_bestil = "DSN=projekter; MaxBufferSize=512;PageTimeout=2;"

strSQL = "Insert into Projekter (Projektnavn, Projektbeskrivelse, Teamejer, deltagerprojektleder,overstrategisketiltag,strategisketiltag,installationsprojekter,ovrigeprojekter,prioritet ,projektfase,Projektstatus,Tidsfrist) values('" & replace (Request.Form("Projektnavn"),",") & "," & replace (Request.Form("Projektbeskrivelse"),",") & "," & replace (Request.Form("Teamejer"),",") & "," & replace (Request.Form("deltagerprojektleder"),",") & "," & replace (Request.Form("overstrategisketiltag"),",") & "," & replace (Request.Form("strategisketiltag"),",") & "," & replace (Request.Form("installationsprojekter"),"," & ",") & replace (Request.Form("ovrigeprojekter"),",") & "," & replace (Request.Form("prioritet"),",") & "," & replace (Request.Form("projektfase"),",") & "," & replace (Request.Form("Projektstatus"),",") & "," & replace (Request.Form("Tidsfrist"),",")& ")"

set rsPost = Server.CreateObject("ADODB.Recordset")
rsPost.Open strSQL, strDSN

%>

hvis du indsætter i tekst eller notatfelter skal der enkelt-pling omkring - så

" & replace (Request.Form("Projektbeskrivelse"),",") & ",

bliver til

'" & replace (Request.Form("Projektbeskrivelse"),",") & "',

det er kun tal-felter der ikke skal enkelt-pling omkring. Ret det, og fortæl derefter hvilken fejl der meldes.

jeg får denne fejl. Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'replace'

be_projekter2.asp, line 4

<%
strDSN_bestil = "DSN=projekter; MaxBufferSize=512;PageTimeout=2;"

strSQL = "Insert into Projekter (Projektnavn, Projektbeskrivelse, DTeamejer, Ddeltagerprojektleder,overstrategisketiltag,strategisketiltag,installationsprojekter,ovrigeprojekter,Dprioritet ,projektfase,Projektstatus,Tidsfrist) values('" & replace (Request.Form("Projektnavn"),",") & ",'" & replace (Request.Form("Projektbeskrivelse"),",") & "','" & replace (Request.Form("DTeamejer"),",") & "','" & replace (Request.Form("Ddeltagerprojektleder"),",") & "','" & replace (Request.Form("overstrategisketiltag"),",") & "','" & replace (Request.Form("strategisketiltag"),",") & "','" & replace (Request.Form("installationsprojekter"),"," & "','") & replace (Request.Form("ovrigeprojekter"),",") & "','" & replace (Request.Form("Dprioritet"),",") & "','" & replace (Request.Form("projektfase"),",") & "','" & replace (Request.Form("Projektstatus"),",") & "','" & replace (Request.Form("Tidsfrist"),",")& "')"
set rsPost = Server.CreateObject("ADODB.Recordset")
rsPost.Open strSQL, strDSN_bestil
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 


%>

du skal ikke have mellemrum i replace - altså ikke;

'" & replace(Request.Form("Projektbeskrivelse"),",") & "'

men sådan

'" & replace(Request.Form("Projektbeskrivelse"),",") & "'

samtidig skal du altså sørge for afslutte alt hvad du starter - fx mangler du en pling her;

'" & replace (Request.Form("Projektnavn"),",") & ",

så den skal hedde

'" & replace (Request.Form("Projektnavn"),",") & "',

Jeg har nu fulgt dit råd og koden ser nu sådan ud:
strSQL = "Insert into Projektertest (Projektnavn, Projektbeskrivelse) values('" & replace (Request.Form("Projektnavn"),",") & "','"& replace(Request.Form("Projektbeskrivelse"),",")& "')"
Så får jeg denne fejl

Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'replace'

/d_projekt/be_projekter2.asp, line 10

der er stadig mellemrum efter replace i den første - og så bruger du ikke replace-funktionen som jeg helt til at starte med fortalte den skulle bruges;

strSQL = "Insert into Projektertest (Projektnavn, Projektbeskrivelse) values('" & replace(Request.Form("Projektnavn"),"'","''") & "','" & replace(Request.Form("Projektbeskrivelse"),"'","''") & "')"

Hej Keysersoze
Yes, nu virker det. Tusind tak for hjælpen og din tålmodighed.
Hilsen Liri