I am running Outlook 2000 (SR-1) on Windows 2000 with all COM add-ins deselected. I am not running WinFax.
I am trying to get an Outlook Custom form (written by Microsoft) to behave.
The form in question is “Questionnaire” downloaded from :
http://www.microsoft.com/education/?ID=Questionnaire
I have published it to my Personal Forms Library and it works as intended but with one BIG problem:
Once the recipient of the questionnaire sends back the questionaire to the sender, the recipient cannot close Outlook completely (the small window with the message “Please wait while Microsoft Outlook exits” remains on the screen). The only way to get rid of this is to kill it off using “End Task”.
The problem seems to be in the VBS code for the cmdSend_Click() event (see below).
If anyone can help I would be very grateful.
Jeremy Morton
Function Item_Open ()
Set MyInspector = Item.GetInspector
MyInspector.ShowFormPage(“Questionnaire”)
End Function
Sub cmdSend_Click()
Set objPage = Item.GetInspector.ModifiedFormPages(“Questionnaire”)
Set objControl = objPage.Controls(“cmdSend”)
objControl.Visible = False
set MyItem = Item.Forward
Recip = Item.SenderName
MyItem.To = Recip
MyItem.Subject = “RE: ” & Item.Subject
MyItem.Send
Item.Delete
End sub
