Ed ecco qui il codice che uso:
codice:
For I = 0 to (AllItems.Length - 1)
strId = AllItems(I).GetAttribute("EntryID")
strDate = AllItems(I).GetAttribute("LastModificationTime")
'
rs.Open "SELECT * FROM root WHERE EntryID = '" & strId & "'", objConnection'
if rs.RecordCount = 1 then
response.Write("C'è già e modifico")
ssql = "DELETE * FROM root WHERE EntryID = '" & strId & "'"
objConnection.Execute(ssql)
ssql = "INSERT INTO root values ('"&strId&"','"&strNome&"','"&strCognome&"','"&strTel&"','"&strMail&"','"&strUff&"','"&strCell&"','"&strDate&"')"
objConnection.Execute(ssql)
else
ssql = "INSERT INTO root values ('"&strId&"','"&strNome&"','"&strCognome&"','"&strTel&"','"&strMail&"','"&strUff&"','"&strCell&"','"&strDate&"')"
objConnection.Execute(ssql)
end if
rs.close
next
devo integrare il controllo sulla data di modifica...se il valore del campo "DataUltimaModifica" è minore/uguale di strDate,allora non devo fare niente...altrimenti modifica il record.
Grazie..ciao ciao!!!