使用專案範本建立屬於自己的入門套件(上)
文／沈炳宏

==========程式=========
程式1
DataAccess.vsz|
{AE77B8D0-6BDC-11d2-B354-0000F81F0C06}|
#5017|30|#5024|
{AE77B8D0-6BDC-11d2-B354-0000F81F0C06}|
129|0|Project
==========程式=========

==========程式=========
程式2
VSWIZARD 7.0
Wizard=VsWizard.VsWizardEngine.7.1
Param="WIZARD_NAME = DataAccess"
Param="WIZARD_UI = FALSE"
Param="PROJECT_TYPE = CSPROJ"
==========程式=========

==========程式=========
程式3
function OnFinish(selProj, selObj) {
    var oldSuppressUIValue = true;
      try {
        oldSuppressUIValue = dte.SuppressUI;
var strProjectPath = wizard.FindSymbol
("PROJECT_PATH");
var strProjectName = wizard.FindSymbol
("PROJECT_NAME");
var strSafeProjectName = CreateSafeName
(strProjectName);
wizard.AddSymbol("SAFE_PROJECT_NAME", 
strSafeProjectName);
 
var proj = CreateCSharpProject(strProjectName, 
strProjectPath, "default.csproj");
 
            var InfFile = CreateInfFile();
            if (proj) {
                  AddReferencesForClass(proj);
AddFilesToCSharpProject(proj, strProjectName, 
strProjectPath, InfFile, false);
            }
            proj.Save();
      }
      catch(e) {
            if( e.description.length > 0 )
                  SetErrorInfo(e);
            return e.number;
      }
    finally {
            dte.SuppressUI = oldSuppressUIValue;
            if( InfFile )
                  InfFile.Delete();
    }
}
 
function GetCSharpTargetName(strName, 
strProjectName) {
      var strTarget = strName;
      switch (strName) {
            case "File1.cs":
                  strTarget = "Class1.cs";
                  break;
      }
      return strTarget; 
}
            
function DoOpenFile(strName) {
      var bOpen = false;
    
      switch (strName) {
            case "Class1.cs":
                  bOpen = true;
                  break;
      }
      return bOpen; 
}
 
function SetFileProperties(oFileItem, strFileName) {
    if(strFileName == "File1.cs") {
oFileItem.Properties("SubType").Value = "Code";
    }
==========程式=========

==========程式=========
程式4
namespace [!output SAFE_NAMESPACE_NAME] {
      using System;
      /// [!output SAFE_CLASS_NAME].
      /// </summary>
      class [!output SAFE_CLASS_NAME] {
            /// <summary>
            /// 應用程式進入點.
            /// </summary>
            static void Main(string[] args) {
//
// TODO: 增加啟動應用程式的程式碼
//
            }
      }
}
==========程式=========

==========程式=========
程式5
<VSTemplate Version="2.0.0"
xmlns="http://schemas.microsoft.com/
developer/vstemplate/2005" Type="Project">
  <TemplateData>
    <Name>WindowsApplication1</Name>
    <Description> WindowsApplication1
</Description>
    <ProjectType>VisualBasic</ProjectType>
    <ProjectSubType>
    </ProjectSubType>
    <SortOrder>1000</SortOrder>
    <CreateNewFolder>true</CreateNewFolder>
    <DefaultName>WindowsApplication1
</DefaultName>
    <ProvideDefaultName>true
</ProvideDefaultName>
    <LocationField>Enabled</LocationField>
    <EnableLocationBrowseButton>true
</EnableLocationBrowseButton>
    <Icon>__TemplateIcon.ico</Icon>
  </TemplateData>
  <TemplateContent>
    <Project TargetFileName=
"WindowsApplication1.vbproj" 
File="WindowsApplication1.vbproj" 
ReplaceParameters="true">
    <ProjectItem ReplaceParameters="true" 
TargetFileName="Form1.vb">
Form1.vb
</ProjectItem> 
     </Folder>
    </Project>
  </TemplateContent>
</VSTemplate>
==========程式=========