ispirati
codice:Set Rs = New adodb.Recordset Rs.Fields.Append "Testo", adBSTR, 50 Rs.Fields.Append "Numero", adCurrency, , adFldMayBeNull Rs.Open Rs.AddNew Rs.Fields(0) = testo_da_file Rs.Fields(1) = numero_da_file Rs.Update Rs.Close
ispirati
codice:Set Rs = New adodb.Recordset Rs.Fields.Append "Testo", adBSTR, 50 Rs.Fields.Append "Numero", adCurrency, , adFldMayBeNull Rs.Open Rs.AddNew Rs.Fields(0) = testo_da_file Rs.Fields(1) = numero_da_file Rs.Update Rs.Close