%@ Language=VBScript %>
Follow these 3 simple steps to receive Margie's free monthly eNewsletter written to support you to living a more rewarding, successful and courageous life.
"Thanks so much Margie for sharing another thoughtprovoking and inspiring newsletter. If only more of the emails that landed in my inbox were so uplifting!"
Chris P, Denver, Colorado
<% Dim YourName Dim FNLength Dim FNStart Dim FirstName Dim LNLength Dim LNStart Dim LastName Dim EmailAddress YourName = Trim(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(CleanData(Request("YourName"),"text"), "Mr. ",""), "Mrs. ", ""), "Dr. ", ""), "Miss ", ""), "Mr.",""), "Mrs.", ""), "Dr.", ""), "Miss", "")) FNLength = len(YourName) FNStart = InStr(1,YourName," ",0) FirstName = Left(YourName, FNStart) LastName = Right(YourName, FNLength-FNStart) EmailAddress = Request("EmailAddress") %>