View Single Post
  #3  
Old May 7th 06, 04:56 AM posted to microsoft.public.outlook
XP User
external usenet poster
 
Posts: 7
Default MS Visual Basic error in Outlook

"XP User" wrote in message
Vba Project OTM - Thisoutlooksession(code)
window pops up, and I have to stop the degugger
to send an email.
I've been using OL 2002 for 2 year, never had this problem,
How can I fix it


The Debugger shows:

Compile Error:
Syntax Error

[Application] [ItemSend]

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

Dim objNS As NameSpace

Dim objFolder As MAPIFolder

Set objNS = Application.GetNamespace("MAPI")

Set objFolder = objNS.PickFolder

If TypeName(objFolder) "Nothing" _ And

IsInDefaultStore(objFolder) Then

Set Item.SaveSentMessageFolder = objFolder

End If


Ads