ENVIAR EMAIL
Estou tentando enviar um email com dados de meu software.
Ate ai td bem, porem como eu faço para formatar o conteudo da linha para o outlook
assunto = "Descrição do Problema: " & txtdesc.Text & Chr(13) & "Obs. HelpDesk: " & txtobs.Text & _
Chr(13) & "Previso: " & txtprevisao.Text & Chr(13) & "Status: " & cmbstatus.Text & Chr(13) & "Executor: " & cmbexec.Text
ShellExecute hwnd, _
vbNullString, _
"mailto:" & " " & _
"?subject=" & "Resposta referente ao protocolo " & Format(txtprot.Text, "000000") & _
"&body=" & Replace(assunto, vbCrLf, "%0D%0A"), _
vbNullString, vbNullString, _
SW_SHOW
precisso que cada txt na variavel assunto aparece em uma linha diferente no outlook, ja tentei concatenar usando %OA no meio mas não funciona.
Se alguem souber, me ajudem!
Ate ai td bem, porem como eu faço para formatar o conteudo da linha para o outlook
assunto = "Descrição do Problema: " & txtdesc.Text & Chr(13) & "Obs. HelpDesk: " & txtobs.Text & _
Chr(13) & "Previso: " & txtprevisao.Text & Chr(13) & "Status: " & cmbstatus.Text & Chr(13) & "Executor: " & cmbexec.Text
ShellExecute hwnd, _
vbNullString, _
"mailto:" & " " & _
"?subject=" & "Resposta referente ao protocolo " & Format(txtprot.Text, "000000") & _
"&body=" & Replace(assunto, vbCrLf, "%0D%0A"), _
vbNullString, vbNullString, _
SW_SHOW
precisso que cada txt na variavel assunto aparece em uma linha diferente no outlook, ja tentei concatenar usando %OA no meio mas não funciona.
Se alguem souber, me ajudem!
O pessoal valeu, mas consegui resolver.
é so trocar %OA, %0A. Não é letra O, e sim numero zero, que mancada rsrsr
é so trocar %OA, %0A. Não é letra O, e sim numero zero, que mancada rsrsr
Tópico encerrado , respostas não são mais permitidas