G
Guest
I have several computers, most running Win2k with Office 2000 sp3, and 1
machine running WinXP with Office 2000 sp3.
Problem is, when I try to send email from Excel on the WinXP machine I get a:
Run-time error '-2113732605 (82030003)';
Internal application error.
This error only arises on the WinXP machine.
------- My Code: -----------
Private Sub EMail_Lbl_Click()
SendMail
End Sub
Sub SendMail()
Dim olApp As Outlook.Application
Dim olMail As MailItem
Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)
With olMail
.To = "xxx"
.Subject = "xxx"
.Display
End With
Set olMail = Nothing
Set olApp = Nothing
End Sub
machine running WinXP with Office 2000 sp3.
Problem is, when I try to send email from Excel on the WinXP machine I get a:
Run-time error '-2113732605 (82030003)';
Internal application error.
This error only arises on the WinXP machine.
------- My Code: -----------
Private Sub EMail_Lbl_Click()
SendMail
End Sub
Sub SendMail()
Dim olApp As Outlook.Application
Dim olMail As MailItem
Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)
With olMail
.To = "xxx"
.Subject = "xxx"
.Display
End With
Set olMail = Nothing
Set olApp = Nothing
End Sub