getting error on sending mail through asp code

See more:

C#

ASP

ASP.NET

hello all,

I want to send a mail through my website using asp code and i am getting the following exception....

The remote server returned an error: (500) Internal Server Error.

the following is my asp code ....

<%
Function emailsub (objFrom,objMessageTextbody, objsubject, recepients)
            Dim objMessage
            Dim objMessageFrom
            Dim objMessageSubject


                Set objMessage = CreateObject("CDO.Message")
                myMail.Subject=objsubject
                myMail.From= objFrom
                myMail.To=recepients
                myMail.TextBody=objMessageTextbody
                myMail.Send
                set myMail=nothing
%>