>#Define olMailItem 0 >oOutlook = createobject("outlook.application") >oNameSpace = oOutlook.GetNameSpace("MAPI") >oMailItem = oOutLook.CreateItem(olMailItem) >With oMailItem > .Subject = "My Message" > .To = "xyz@foo.com" > .ReplyRecipients.add('foo@abc.com') && specify the reply address here > .Send >EndWith >Thanks for the reply but it didn't work. I think the problem might be with exchange server. I don't think exchange server will let you change the reply address. Since all the messages go through exchange I think it has ultimate control not outlook.