textbox

[CCkfm2000]

Hi, :hi:



I’m using outlook 2003, and have create a simple dialog box with 2 text box and 3 option buttons.

How do I paste/insert the textbox into the body of the email.

Thank for all the help. :thumb

[CCkfm2000]

ok i've come up with this but this will not add the text in textbox1 into body of email

Dim msg As String
Private Sub CommandButton1_Click()
Set OutlookApp = New Outlook.Application
Set myItem = OutlookApp.CreateItem(olMailItem)
msg = msg & TextBox1.Value
With myItem
.Body = msg
End With
Unload Me
End Sub

[CCkfm2000]

pretty grim :help