How to skip email address that wont resolve

[badmonkey]

I'm using a vb script to send mails . the recipient email address is picked from a column in excel, however sometimes there would be a wrong or empty email address that wont resolve and that would crash the script, how do I get it to skip to the next row if the email address is not resolving or is empty, my code is below

With Mail_Object.CreateItem(o)
.Display 'disable display and enable send to send automatically
.Subject = " Something:
.To = Range("L" & i).Value
.HTMLBody = "Hello "
"****** Script </BODY>" & .HTMLBody


.Send