sending email ?

hi ,
Thanks for all the help and support.
I am trying to send email from  the application . I tried   more than three sets of code
But it is showing some exceptions
 
I am pasting the code here .IF any one can find the error please help me to fix the error . Because i don't know anything about smtp port , or things like that . I have never worked on email applications


Instead of pointing out the error's ,if anybody has  working function for sending email ,please paste it as reply .
 
I
Public Function SendEmail(ByVal strFrom As String, ByVal strTo As String, ByVal strSubject As String, ByVal strBody As String, ByVal strAttachmentPath As String, ByVal IsBodyHTML As Boolean) As Boolean
        Dim arrToArray As String()
        Dim splitter As Char = ";"

     ...