Ciao ragazzi, vorrei chiedervi un aiuto e cioè:

Ho 2 database, uno per gli UTENTI l'altro per la MAILINGLIST.
Vorrei poter modificare anche l'indirizzo email nel database MAILINGLIST quando l'utente modifica l'indirizzo email nel database UTENTI.
provo a fare così ma non va, sapete dirmi dove sbaglio?
grazie in anticipo.


codice:
If UCase(EMail_Originale) <> UCase(EMail) Then
Confermato = "False"
'dichiarazione variabili
Dim Connmailing, StrConnectmailing, SQLmailing, RSmailing, Mail

'apro la connessione al db della Mailinglist
Set Connmailing = Server.CreateObject("ADODB.Connection")
StrConnectmailing = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & server.mappath("/mdb-database/MailingList.mdb") & ";Persist Security Info = False"
Connmailing.open StrConnectmailing
				
'Controllo che non ci sia gia la stessa EMail
SQLmailing = " SELECT Email FROM Mailing WHERE Email = '" & EMail_Originale & "' "
Set RSmailing = Connmailing.Execute(SQLmailing)
If Not RSmailing.EOF Then
If EMail <> RSmailing("Email") Then

'scrivo la query per inserire nome, cognome ed email degli utenti
SQLmailing = " Insert INTO Mailing (Nome, Cognome, Email, Provincia) VALUES ('"& Nome &"', '"& Cognome &"','"& EMail &"','"& Provincia &"')"
Set RSmailing = Connmailing.Execute(SQLmailing)			
End if
End if