电子邮件中的HTML空格

w00*_*977 0 html vb6

VB6应用程序发送HTML电子邮件.请看下面的代码.收到的电子邮件中删除了所有空白区域,即第7行的所有空格都被删除,发送的电子邮件说:"这是一个测试".有没有办法发送包含所有空格的HTML电子邮件.

strMailText = strMailText & "<b><font size=""2"" face=""Arial""><br>Test Email</font></b><br><br>"
strMailText = strMailText & "<table border='1'>"
strMailText = strMailText & "<tr>"
strMailText = strMailText & "<td><b><font size=""2"" face=""Arial"">Test Column</font></b></td>"
strMailText = strMailText & "</tr>"

strMailText = strMailText & "<td><font size=""2"" face=""Arial"">This is a         test</font></td>"
strMailText = strMailText & "<tr>"
strMailText = strMailText & "table"

SendEMail strEmailServer, "test@test.com", strEMailTo, _
                                "Test Email", strMailText, True
Run Code Online (Sandbox Code Playgroud)

Ahs*_*hid 7

使用&nbsp;而不是空格.

&nbsp 在基于计算机的文本处理和数字排版中,不间断空间,不间断空间或不可破坏空间(NBSP)是空间字符的变体,可防止其位置处的自动换行(换行).

所以这一行

`strMailText = strMailText & "<td><font size=""2"" face=""Arial"">This is a         test</font></td>"` 
Run Code Online (Sandbox Code Playgroud)

应该写成:

strMailText = strMailText & "<td><font size=""2"" face=""Arial"">This is a&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;test</font></td>"
Run Code Online (Sandbox Code Playgroud)

编辑:

或另一种方法

使用<span>标记而不是空格,并给它填充或边距这样

<span style='padding-left: 15px;'></span>
Run Code Online (Sandbox Code Playgroud)

所以看起来应该是这样的:

strMailText = strMailText & "<td><font size=""2"" face=""Arial"">This is<span style='padding-left: 15px;'></span>test</font></td>"
Run Code Online (Sandbox Code Playgroud)