Y
yer darn tootin
Hello,
I have a method which takes various string values to create an
automated email.
Anyone know how I can make a particular string value passed appear in
bold type in the email? ( below, the cboPrio.Text value for example )
Email_AutoSend(sEmailTo, USER.Name, cboPrio.Text )
'calls method...
Public Sub Email_AutoSend(ByVal sTo As String, ByVal sSubject As
String, ByVal sBody as String )
Dim oApp As Outlook._Application
oApp = New Outlook.Application
' Create a new MailItem.
Dim oMsg As Outlook._MailItem =
CType(oApp.CreateItem(Outlook.OlItemType.olMailItem), Outlook.MailItem)
With oMsg
..To = sTo
..Subject = sSubJect
..Body = sBody
If bAutoSend Then
..Send()
Else
..Display()
End If
End With
End Sub
thanks for any tips,
B
I have a method which takes various string values to create an
automated email.
Anyone know how I can make a particular string value passed appear in
bold type in the email? ( below, the cboPrio.Text value for example )
Email_AutoSend(sEmailTo, USER.Name, cboPrio.Text )
'calls method...
Public Sub Email_AutoSend(ByVal sTo As String, ByVal sSubject As
String, ByVal sBody as String )
Dim oApp As Outlook._Application
oApp = New Outlook.Application
' Create a new MailItem.
Dim oMsg As Outlook._MailItem =
CType(oApp.CreateItem(Outlook.OlItemType.olMailItem), Outlook.MailItem)
With oMsg
..To = sTo
..Subject = sSubJect
..Body = sBody
If bAutoSend Then
..Send()
Else
..Display()
End If
End With
End Sub
thanks for any tips,
B