Grazie Roby, il tuo codice funziona perfettamente!
Adesso pero` per il mio esame sarebbe meglio che usassi questo
codice:
<%
dim DVR, DBQ, CS, oC, oRS
DVR = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DBQ = "DBQ=" & Server.MapPath("db_servizi/servizi.mdb") & ";"
CS = DVR & DBQ
set oC = server.createobject("ADODB.connection")
set oRS = server.createobject ("ADODB.recordset")
set oCM = server.createobject ("ADODB.command")
%>
<%
'query = "INSERT INTO tabella (servizio,descrizione) VALUES('"&servizio&"','"&descrizione&"')"
servizio = replace(servizio,"'","''")
descrizione= replace(descrizione,"'","''")
SQL = "INSERT INTO tabella (servizio,descrizione) VALUES ('"&servizio&"','"&descrizione&"')"
'SQL = SQL & "(servizio, descrizione)
'SQL = SQL & "VALUES ('pippo', '"&descrizione&"')"
oC.Open CS
oCM.ActiveConnection = oC
oCM.CommandText = SQL
oCM.CommandType = adCmdText
oCM.Execute
response.write SQL
%>
Il problema e` che mi inserisce record vuoti, non prende i testi dal form e di certo e` per il fatto che non sono specificate le variabili servizio e descrizione. Ho provato in vari modi ma non ci riesco
Aiutami tu!!!