This topic has been archived. It cannot be replied.
-
工作学习 / IT技术讨论 / Need a help: How to write VB code linking a public folder in an email server that shows in Outlook 2000 , This folder is not in Personal Folders? thanks!
-xxiieejj(junming);
2003-3-20
(#1097846@0)
-
try this假设你的Folder Name is “Public folder”
Dim myOlApp as Outlook.Application
Dim myNameSpace as Outlook.NameSpace
Dim myFolder as Outlook.MAPIFolder
Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNameSpace("MAPI")
Set myFolder = myNameSpace.Folders("Public folder")
如果想去下一层的folder，则可以：
Dim newFolder as Outlook.MAPIFolder
Set newFolder = myFolder .Folders(folderName)
-guestagain(guest again);
2003-3-20
{432}
(#1098681@0)