salve, premetto che vorrei eliminare il problema dell'apostrofo. mi potete dire dove devo infilare il replace in questo codice?
codice:
<%
on error resume next
dim strQuerya
strQuerya="INSERT INTO table("
dim strValoria
strValoria=" VALUES("
dim strSqla
strSqla=""

for each item in request.form
if item<>"Submita" then

strQuerya= strQuerya & item & ","
strValoria= strValoria & "'"&server.HTMLEncode(request.form(item))&"',"
end if

next
strQuerya=mid(strQuerya,1,len(strQuerya)-1) &")"
strValoria=mid(strValoria,1,len(strValoria)-1) &")"

set rs =server.createObject("ADODB.Recordset")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/mdb-database/db.mdb")
strSql= strQuerya & strValoria
rs.open strSql,strConn
set rs=nothing
%>
dopo questo codice c'è il form.