Well I did something that's working fine...
I've added a LEGEND with CUSTOM FIELDS variables to my users i.e: [name] [email] [phone]
My users create there templates like this...
Hello [name], you are subscribe to this newsletter with the email [email] and your phone number is [phone]!
And after you do a "replace function" like this...
myHtmlStr =rs("htmlContent")
myHtmlStr = replace(myStr,"[name]",rs("name"))
myHtmlStr = replace(myStr,"[email]",rs("email"))
myHtmlStr = replace(myStr,"[phone]",rs("phone"))
... ' and now send the html file via email in html format
CALL SendMail("My Business",me@me.com,"Dec. newsletter",rs("email"), rs("name"), myHtmlStr )
Et voilà!