Recuperare dati da 2 database....

[DeR]

prima parlavo di database, invece devo inviare una mail recuperando i dati da 2 tabelle, in una devo recuperare i dati del cliente, nell'altra devo recuperare gli acquisti.


Devo fare una cosa del genere?


*********************************

Dim sql2, rs2
sql2 = "SELECT * FROM tbcarrello WHERE IDCliente ='" & cliente &"'"

Set rs2 = objConn.Execute(sql2)

Dim sqlMail, rsMail
sqlMail = "SELECT * FROM tbclienti WHERE IDCliente ='" & cliente &"'"

Set rsMail = objConn.Execute(sqlMail)

If Not rsMail.EOF Then

Dim mail
Set mail = Server.CreateObject("CDO.Message")

'INVIO MAIL

End If

rsMail.close
Set rsMail = Nothing

........
.....
.....