inserire dati su più tabelle contemporaneamente

[Prof_Mauri]

Ciao a tutti, è possibile creare un modulo con cui inserire dati in più tabelle contemporaneamente? Ad es, se ho un database composto da due tabelle,

Clienti
IDCl (contatore)
Cognome e Nome(testo)

Appuntamenti
IDAp (contatore)
data (data)
Descrizione (testo)
IDCl (num)

Si può creare un modulo di questo tipo?

Cliente : (Cognome e Nome che andrà ad inserirsi nella tabella Clienti)
Data : (nella tabella appuntamenti)
Descrizione : (nella tabella appuntamenti)

Così da poter successivamente interrogare il database e vedere per ogni cliente tutti gli appuntamenti, etc.

[optime]

n tabelle, n insert

[Prof_Mauri]

Scusa ma non ho colto, ti sarei grato se potressi essere un po meno ermetico

[optime]

non è che ci sia molto da capire... tu oggi come fai per fare UNA insert? quell'azione va eseguita per le 'n' tabelle che vuoi riempire, perché la sintassi SQL non permette di fare una insert multipla su più tabelle con un'unica istruzione. tutto qui.

[Prof_Mauri]

Forse non ti seguo perchè non uso lo stesso codice a cui fai riferimento tu.
Io uso questo :
<%
a=request.form("Cognome e Nome")
b=request.form("Indirizzo")
set OBJdbConnection=Server.CreateObject("ADODB.Connect ion")
OBJdbConnection.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:\inetpub\webs\.....it\fpdb\.mdb")
Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "Clienti",OBJdbConnection,3,3
rs.AddNew
rs("Cognome e Nome")=a
rs("Indirizzo")=b
rs.update
rs.Close
OBJdbConnection.Close
%>

[optime]

metodo diverso, ma stesso ragionamento. tu usi quel blocco per clienti. dovrai usarne uno simile per ognuna delle altre tabelle.

[Roby_72]

E' lo stesso... A parte l'apertura e la chiusura della connessione, il resto devi moltiplicarlo per ogni tabella da aggiornare...
Se passassi ad una stringa SQL di INSERT più standard e funzionale, risparmieresti mezzo chilometro di codice.

Roby

[Prof_Mauri]

E' possibile avere un esempio riferito al caso prima proposto? non ho ancora capito cosa devo fare! nella stessa pagina che deve processare i dati devo inserire tante volte lo stesso codice per quante sono le tabelle o ne devo creare una apposita per ognuna?

[optime]

la prima che hai detto

[Roby_72]

<%
a=request.form("Cognome e Nome")
b=request.form("Indirizzo")
set OBJdbConnection=Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:\inetpub\webs\.....it\fpdb\.mdb")

a = replace(a, "'", "''")
b = replace(b, "'", "''")

sql = "INSERT INTO Clienti ([Cognome e Nome],Indirizzo) VALUES "&_
"('"& a &"', '"& b &"')"
OBJdbConnection.Execute(sql) 
OBJdbConnection.Close
%>

La parte in grassetto da duplicare.

Roby