應CNET要求。把瀏覽目錄類轉貼過來。這個是幾個月以前寫的。（來自ASP.NET版）

asp.net using System;
using System.Text;
using System.Windows.Forms;
using System.Runtime.InteropServices;

namespace Blood.Com.ClassLib
{
    /// <summary>
    /// 目錄對話方塊控制項
    /// </summary>
    public class DirectoryDialog
    {
        [ StructLayout( LayoutKind.Sequential, CharSet=CharSet.Ansi )]
        ///<summary>
        ///瀏覽資訊
        ///</summary>
        public struct BROWSEINFO
        {
            public IntPtr hWndOwner;
            public int pIDLRoot;
            public string pszDisplayName;
            public string lpszTitle;
            public int ulFlags;
            public int lpfnCallback;
            public int lParam;
            public int iImage;
        }

        private const int MAX_PATH = 260;
        /// <summary>
        /// 指定瀏覽類型
        /// </summary>
        public enum BrowseForTypes
        {
            /// <summary>
            /// 瀏覽電腦
            /// </summary>
            Computers = 0x1000,
            /// <summary>
            /// 瀏覽目錄
            /// </summary>
            Directories = 0x1,
            /// <summary>
            /// 瀏覽目錄和檔案
            /// </summary>
            /// <remarks>只能工作於4.71或更高的版本<remarks>
            FilesAndDirectories = 0x4000, // 4.71版
            /// <summary>
            /// 瀏覽系統根目錄
            /// </summary>
            FileSystemAncestors = 0x8
        }

        [ DllImport( "ole32.dll")]
        private static extern int CoTaskMemFree(IntPtr hMem);
        [ DllImport( "kernel32.dll")]
        private static extern IntPtr lstrcat(string lpString1, string lpString2);
        [ DllImport( "shell32.dll")]
        private static extern IntPtr SHBrowseForFolder(ref BROWSEINFO lpbi);
        [ DllImport( "shell32.dll")]
        private static extern int SHGetPathFromIDList(IntPtr pidList, StringBuilder lpBuffer);
        /// <summary>
        /// 顯示公用檔案夾對話方塊
        /// </summary>
        /// <param name="hWndOwner">檔案夾對話方塊所有者</param>
        protected bool RunDialog(IntPtr hWndOwner)
        {
            BROWSEINFO udtBI = new BROWSEINFO();
            IntPtr lpIDList;
            GCHandle hTitle = GCHandle.Alloc(Title, GCHandleType.Pinned);
            // 設定WINDOWS的所有者
            udtBI.hWndOwner = hWndOwner;
            // 設定WINDOWS的所有者
            udtBI.lpszTitle =  Title;
            // 設定WINDOWS的所有者
            udtBI.ulFlags  = (int)BrowseFor;
            // 建立一個字串緩衝用來顯示名稱
            StringBuilder buffer = new StringBuilder(MAX_PATH);
            buffer.Length = MAX_PATH;
            udtBI.pszDisplayName = buffer.ToString();
            // 顯示瀏覽目錄對話方塊
            lpIDList = SHBrowseForFolder(ref udtBI);
            hTitle.Free();
            if (lpIDList.ToInt64() != 0)
            {
                if (BrowseFor == BrowseForTypes.Computers)
                {
                    m_Selected = udtBI.pszDisplayName.Trim();
                }
                else
                {
                    StringBuilder path = new StringBuilder(MAX_PATH);
                    //從lpIDList中取得路徑
                    SHGetPathFromIDList(lpIDList, path);
                    m_Selected = path.ToString();
                }
                //釋放記憶體
                CoTaskMemFree(lpIDList);
            }
            else
            {
                return false;
            }
            return true;
        }
        /// <summary>顯示公用檔案夾對話方塊</summary>
        public DialogResult ShowDialog()
        {
            return ShowDialog(null);
        }
        /// <summary>Shows the common folder dialog.</summary>
        /// <param name="owner">The owner of the folder dialog.</param>
        public DialogResult ShowDialog(IWin32Window owner)
        {
            IntPtr handle;
            if (owner != null)
                handle = owner.Handle;
            else
                handle = IntPtr.Zero;
            if (RunDialog(handle))
            {
                return DialogResult.OK;
            }
            else
            {
                return DialogResult.Cancel;
            }
        }

        /// <summary>
        /// 指定對話方塊的標題
        /// </summary>
        /// <value>對話方塊標題</value>
        /// <exceptions cref="ArgumentNullException">當值為null（VB.NET為Nothing）時拋出錯誤</exceptions>
        public string Title
        {
            get
            {
                return m_Title;
            }
            set
            {
                if (value == null)
                    throw new ArgumentNullException();
                m_Title = value;
            }
        }
        /// <summary>返回選擇的項目</summary>
        /// <value>選擇的項目</value>
        public string Selected
        {
            get
            {
                return m_Selected;
            }
        }
        /// <summary>指定瀏覽類型</summary>
        /// <value>瀏覽類型</value>
        public BrowseForTypes BrowseFor
        {
            get
            {
                return m_BrowseFor;
            }
            set
            {
                m_BrowseFor = value;
            }
        }
        //申明私人變數
        private BrowseForTypes m_BrowseFor = BrowseForTypes.Directories;
        private string m_Title = "";
        private string m_Selected = "";

        /// <summary>
        /// 建構函式
        /// </summary>
        public DirectoryDialog()
        {
            //
            // TODO: 在此處添加建構函式邏輯
            //
        }
    }
}