在 Visual Studio 2005 中创建控制台应用程序
在 Visual Studio 2005 中的“文件” 菜单上，指向“新建” 并单击“项目” 。
在“新建项目” 对话框中，选择一种语言，然后在“项目类型” 框中选择“Windows” 。
在“模板” 框中，选择“控制台应用程序” 。
在“位置” 框中，键入指向应用程序的创建位置的路径，然后单击“确定” 。
在“解决方案资源管理器”中，右键单击“引用”节点，然后单击快捷菜单上的“添加引用”。
在“添加引用”对话框的“.NET”选项卡上，选择组件列表中的“Windows SharePoint Services”，然后单击“确定”。
在 .vb 和 .cs 文件中，为 Microsoft.SharePoint 命名空间添加 using 指令，如下所示。
Imports Microsoft.SharePoint
在 .vb 或 .cs 文件中，将下面的代码添加到 Main 方法。
Overloads Sub Main(args() As String)
Dim siteCollection As New SPSite("http://Server_Name")
Dim sites As SPWebCollection = siteCollection.AllWebs
Dim site As SPWeb
For Each site In sites
Dim lists As SPListCollection = site.Lists
Console.WriteLine("Site: " + site.Name + " Lists: "
+ lists.Count.ToString())
Next site
Console.WriteLine("Press ENTER to continue")
Console.ReadLine()
End Sub 'Main
单击“调试”菜单上的“启动”，或按 F5 以返回代码