Use some logic, check in Google to find out what GetDefaultFolder means. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Hatley, Ken Sent: Tuesday, April 06, 2004 2:41 PM To: Exchange Discussions Subject: RE: Auto Folder creation
I like this better, how do I set it to a sub folder? -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Fyodorov, Andrey FTL Sent: Tuesday, April 06, 2004 1:16 PM To: Exchange Discussions Subject: RE: Auto Folder creation And if you don't want to play with forms, a VBscript like this can do it: Set Application = CreateObject("Outlook.Application") Set myNameSpace = Application.GetNameSpace("MAPI") Set myInboxFolder = myNamespace.GetDefaultFolder(6) Set myFolder = myInboxFolder.parent Set myNewFolder = myFolder.Folders.Add("My Stuff") Set myNewFolder = myFolder.Folders.Add("My Stuff 2") Set myNewFolder = myFolder.Folders.Add("My Stuff 3") Set myNewFolder = myFolder.Folders.Add("My Stuff 4") -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Fyodorov, Andrey FTL Sent: Tuesday, April 06, 2004 1:41 PM To: Exchange Discussions Subject: RE: Auto Folder creation Create a form with a big button. Assign a script like below to the form. When you run the form and click on the button, it will create folders called "My Stuff" and "Mu Stuff 2" under a currently selected folder. Sub CommandButton1_Click() Set SelectedFolder = Application.ActiveExplorer.CurrentFolder Set myNewFolder = SelectedFolder.Folders.Add("My Stuff") Set myNewFolder = SelectedFolder.Folders.Add("My Stuff 2") End Sub -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Hatley, Ken Sent: Tuesday, April 06, 2004 12:40 PM To: Exchange Discussions Subject: RE: Auto Folder creation Anyone have any examples -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Fyodorov, Andrey FTL Sent: Tuesday, April 06, 2004 11:12 AM To: Exchange Discussions Subject: RE: Auto Folder creation A script could probably do it. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Hatley, Ken Sent: Tuesday, April 06, 2004 11:43 AM To: Exchange Discussions Subject: Auto Folder creation Is there ways to auto create a list of folders in Outlook from a spreadsheet or any other automated way so I do not have to manually type in 500 some odd folders? I am using Outlook as a temporary contact management solution by creating folders and then using posts to keep chronological records on each but don't want to manually type the list in. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&; lang =english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&; lang=english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&; lang =english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&; lang =english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&; lang=english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&lang =english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with. _________________________________________________________________ List posting FAQ: http://www.swinc.com/resource/exch_faq.htm Web Interface: http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=exchange&text_mode=&lang=english To unsubscribe: mailto:[EMAIL PROTECTED] Exchange List admin: [EMAIL PROTECTED] To unsubscribe via postal mail, please contact us at: Jupitermedia Corp. Attn: Discussion List Management 475 Park Avenue South New York, NY 10016 Please include the email address which you have been contacted with.
