MS Visual Basic error in Outlook

[XP User]

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 ?

 

[XP User]

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