Hello,
i'm trying to take user input from a few text boxes and have it populate into an email. this is what i have so far:
Imports System
Imports System.IO
Imports Outlook = Microsoft.Office.Interop.Outlook
Public Class NewHireEmail
Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
Process.Start("https://nipr.com/help/look-up-your-npn")
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim oApp As Outlook.Application
oApp = New Outlook.Application
Dim oMsg As Outlook.MailItem
oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem)
oMsg.Recipients.Add("test@test.com")
oMsg.Subject = "test"
oMsg.HTMLBody = "<HTML><BODY>test - test</BODY></HTML>"
oMsg.Display()
End Sub
End Class
i've only gone this far and tried testing it to see if outlook does indeed open a new message before putting in what i want in the body, etc..
thank you