Sostituisci queste due righe:
codice:
objMail.To = destinatario 
objMail.From = mittente@nome_azienda
con
codice:
objMail.To = "destinatario@dominio.com" 
objMail.From = "mittente@altrodominio.it"
Nota che, senza le virgolette, destinatario è una variabile che da qualche parte deve essere valorizzata (ma dubito che tu l'abbia fatto), mentre il mittente, con quella "chiocciolina", mi sa che è una cosa turca
Inoltre, affinchè la mail parta, i campi To e From DEVONO esere due indirizzi di posta (quindi, niente "pippo", bensì "pippo@inventoqualcosa.it")
In particolare, To deve anche essere un indirizzo vero, altrimenti il minimo che possa succedere è che la mail non arriva :-D