Prova così:

v = SPLIT(attivita,",",-1,1)
For Each elements In v
sql1 = "INSERT INTO transazione (attivita) VALUES ('" & V(i)& "')"
Set conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & Server.Mappath("../../data/agenti2/areagenti.mdb")
conn.Execute sql1
conn.Close
next

se metti l' 'execute' all' interno del ciclo..... =))) Perchè cosi farà sempre l' execute dell' ultima assegnazione della variabile ossia .... sull' ultimo elemento dell' array .

Fred

v = SPLIT(attivita,",", -1, 1)
For Each elements In v

sql1 = "INSERT INTO transazione (attivita) VALUES ('" & elements & "')"
Set conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & Server.Mappath("../../data/agenti2/areagenti.mdb")
conn.Execute sql1
conn.Close

next


naturalmente non ci va + v(i), ma elements

---

Modificato da enigma il 08 aprile 2003 18.12 -

Funziona, come hai detto tu, con questa sintassi:

Dim conn , sql_insert
Set conn=Server.CreateObject("ADODB.Connection")

Conn.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & Server.Mappath("../../data/agenti2/areagenti.mdb")
v = SPLIT(attivita,",", -1, 1)
For Each elements In v

sql1 = "INSERT INTO transazione (attivita) VALUES ('" & elements & "')"
Set conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & Server.Mappath("../../data/agenti2/areagenti.mdb")
conn.Execute sql1
conn.Close

next

grazie mille sei troppo forte, sei bravissimo, mi hai risolto un problema che non è da poco (almeno per me), sai sono una grafica e di asp ne capisco poco, se ti serve qualche animazione in flash o qualche ritocco grafico non ti fare problema a contattarmi chiaramente gratis per te.

ciao

ancora grazie