Regarding Email sending from one user to another -Important urgent

[siri]

HI All ,

After a long back posting thread .Please help[ me in finding the option .

I have a script for sending an email from one user to another .The below mentioned is the script.

Code:

Set objEmail = CreateObject("CDO.Message")

objEmail.From = "sirisha.guntur@ge.com"
objEmail.To = "Arnot.Heron@ge.com"
objEmail.Subject = "Test script passed successfully "
objEmail.Textbody = "Server1 is no longer accessible over the network."

objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "amermsx.med.ge.com"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update

objEmail.Send

When i execute this script error is poping u[ on the screen AS "Transport faield to connect server"

How canm i rectify the problem .
Niranjan help me in thsi regards ASAP .