通过ASP表单发送HTML邮件

时间:2012-06-15 01:40:18

标签: html email asp-classic

我有一个ASP表格。我希望以HTML格式发送完整的表单详细信息(表格)。

我正在做的旧方法是将整个脚本写入变量,然后以这种方式发送消息。

message = "<html><body>"
message = message + " "&_ 'Many lines of codes!
message = message + "</body></html>"

由于我的表单可能会很长,您是否有更好的建议如何发送整个HTML页面,而不是将其放在变量中?

1 个答案:

答案 0 :(得分:1)

创建template.html并以您喜欢的方式布局页面。如果要向多个收件人广播,可以在模板中添加“Hi [varFirstName]”文本。

然后您可以在代码中导入该模板文件,如下所示。

    Dim fso,templatesource,body
    Set fso = Server.CreateObject("Scripting.FileSystemObject")
    Set templatesource = fso.OpenTextFile(server.MapPath("template.html")) 
    template=templatesource.ReadAll
    template= Replace(template,"[varFirstName]",rsSource("firstname"))
    file.close
    templatesource.close
    Set templatesource = nothing
    Set fso = nothing