2012-05-04 2 views
1

Я пробовал несколько вариантов следующего кода, но я все равно получаю тот же результат. Я пытаюсь, чтобы последняя строка «Проблема Описание: ....» появлялась в новой строке.VB.NET: несколько строк по электронной почте

Я попытался vbCrLf, vbCr и & Environment.NewLine & _ Ни одна из которых работы.

Есть ли у кого-нибудь еще предложения?

Просто примечание: другие письма правильно отформатированы. Кроме того, если я добавлю put 2 vbCr (s) в конец строки «Название проблемы», то это выглядит нормально.

Это, в частности, похоже на шип в моей стороне.

Результат:

enter image description here

Код:

Dim mail As New MailMessage() 
Dim strbody As String 

strbody = Nothing 

'set the addresses 
mail.From = New MailAddress("[email protected]") 
mail.[To].Add(Email_Add) 

'set the content 
mail.Subject = Issue_Num & " Issue has been created." 
strbody = "Your issue has been created." & vbCr & vbCr 
strbody += "The Issue Team has received the following issue: " & vbCrLf 
strbody += "Issue ID: " & Issue_Num & vbCrLf 
strbody += "Issue Title: " & Email_Summary & vbLf 
strbody += "Issue Description: " & Description & vbCrLf 

mail.Body = strbody 


'set the server 
Dim smtp As New SmtpClient("mailhost.mailserver.com", 15) 

'send the message 

smtp.Send(mail) 

Когда я использую следующий код:

'set the content 
mail.Subject = Issue_Num & " Issue has been created." 
strbody = "Your issue has been created." & vbCrLf & vbCrLf 
strbody += "The Issue Team has received the following issue: " & vbCrLf 
strbody += "Issue ID: " & Issue_Num & vbCrLf 
strbody += "Issue Title: " & Email_Summary & vbCrLf & vbCrLf 
strbody += "Issue Description: " & Description & vbCrLf 

Я получаю это:

enter image description here

+0

Любая причина, в частности, почему вы используете все разные концы строк? – Blindy

+0

@Blindy Я только что обновил все теги до vcCrLf –

+0

2 часа сна здесь, но не ваш второй выход, что вы хотите? Он соответствует вашему 'vbCrLf' отлично ... – Blindy

ответ

4

сделать формат электронной почты в формате HTML, как это:

mail.IsBodyHtml = True 

А затем добавьте тег HTML перерыв (<br />), где вы хотите разрыв строки.

+0

Работал как чемпион !!! Спасибо –

+0

Рад, что помогло. :) –

-1

тусклый ул как строка

положить HTML-код в виде строки, как this-

str = "<table> <tr> <td> Name : </td> <td> Yuwraj D. Bramhankar </td></tr><tr> <td> Address : </td> <td> 439, Anand Nagar, Nagpur 09 - INDIA</td></tr> </table>" 


mail.Body = str 
Dim smtp As New SmtpClient("mailhost.mailserver.com", 15) 

«отправить сообщение здесь

smtp.Send(mail) 
+0

отформатируйте свой ответ –

0
Message.to.Add(ToEmail) 
Message.From = New MailAddress(FromEmail) 
Message.Attachment.Add(Attachment) 
Dim body As String = "Hello user" + "," 
body += "<br /><br />" 

body += tbEmailBody.Text.Replace(vbCrLf, "<br />") 
'This line and the "Message.IsBodyHtml = True" are the important lines to get it to work. 

body += "<br /><br />" 
body += "<br /><br />Thanks" 
Message.Body = body 
Message.IsBodyHtml = True 

Я не видел этого точного ответа но, возможно, я не обратил на это внимания. Может быть, кому-то еще это будет полезно Удачи.

Смежные вопросы