home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 April / CMCD0404.ISO / Software / Freeware / Programare / Sharpdev / 099bsetup.exe / VBService.xpt < prev    next >
Extensible Markup Language  |  2004-02-04  |  4KB  |  136 lines
  1. <?xml version="1.0"?>
  2. <Template originator   = "Markus Palme"
  3.           created      = "24/11/2002"
  4.           lastModified = "02/01/2003">
  5.  
  6.     <!-- Template Header -->
  7.     <TemplateConfiguration>
  8.         <!--    <Name>${res:Templates.Project.VB.LibraryProject.Name}</Name> -->
  9.         <Name>VB Service</Name>
  10.         <Category>VBNET</Category>
  11.         <Icon>VB.Project.ServiceProject</Icon>
  12.         <LanguageName>VBNET</LanguageName>
  13.         <Description>Creates a new VB service project</Description>
  14.         <!--        <Description>${res:Templates.Project.VB.LibraryProject.Description}</Description> -->
  15.     </TemplateConfiguration>
  16.     
  17.     <!-- Actions -->
  18.     <Actions>
  19.         <Open filename = "MyService.vb"/>
  20.     </Actions>
  21.     
  22.     <Combine name = "${ProjectName}" directory = ".">
  23.         <Options>
  24.             <StartupProject>${ProjectName}</StartupProject>
  25.         </Options>
  26.         
  27.         <Project name = "${ProjectName}" directory = ".">
  28.             
  29.             <Options Target = "Library" PauseConsoleOutput = "False"/>
  30.             
  31.             <Files>
  32.                 <File name="MyService.vb"><![CDATA[Imports System
  33. Imports System.Collections
  34. Imports System.ComponentModel
  35. Imports System.Data
  36. Imports System.Diagnostics
  37. Imports System.ServiceProcess
  38. Imports System.Configuration.Install
  39.  
  40. Public Class MyService
  41.     Inherits System.ServiceProcess.ServiceBase
  42.  
  43.     Public Sub New()
  44.         MyBase.New()
  45.         
  46.         InitializeComponents()
  47.         
  48.         ' TODO: Add any further initialization code
  49.     End Sub
  50.     
  51.     <System.Diagnostics.DebuggerStepThrough()> _ 
  52.     Private Sub InitializeComponents()
  53.         Me.ServiceName = "Service1"
  54.     End Sub
  55.     
  56.     ' This method starts the service.
  57.     <MTAThread()> _
  58.     Shared Sub Main()
  59.         
  60.         ' To run more than one service you have to add them to the array
  61.         System.ServiceProcess.ServiceBase.Run(New System.ServiceProcess.ServiceBase() { _
  62.             New MyService _
  63.         })
  64.     End Sub
  65.     
  66.     ' Clean up any resources being used.
  67.     Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
  68.         MyBase.Dispose(disposing)
  69.         ' TODO: Add cleanup code here (if required)
  70.     End Sub
  71.     
  72.     Protected Overrides Sub OnStart(ByVal args() As String)
  73.         ' TODO: Add start code here (if required)
  74.         '       to start your service.
  75.     End Sub
  76.     
  77.     Protected Overrides Sub OnStop()
  78.         ' TODO: Add tear-down code here (if required) 
  79.         '       to stop your service.
  80.     End Sub
  81.  
  82. End Class
  83.  
  84. <RunInstaller(True)> _
  85. Public Class ProjectInstaller
  86. Inherits Installer
  87.  
  88.     Public Sub New()
  89.         Dim spi As ServiceProcessInstaller = New ServiceProcessInstaller 
  90.         spi.Account = ServiceAccount.LocalSystem
  91.         Dim si As ServiceInstaller = New ServiceInstaller 
  92.         si.ServiceName = "Hello Service Template"
  93.         si.StartType = ServiceStartMode.Automatic
  94.         Installers.AddRange(New Installer()  {spi, si})
  95.     End Sub
  96. End Class 
  97. ]]></File>
  98.         <File name="AssemblyInfo.vb">
  99.             <![CDATA[Imports System.Reflection
  100. Imports System.Runtime.CompilerServices
  101.  
  102. ' Information about this assembly is defined by the following
  103. ' attributes.
  104. '
  105. ' change them to the information which is associated with the assembly
  106. ' you compile.
  107.  
  108. <assembly: AssemblyTitle("")>
  109. <assembly: AssemblyDescription("")>
  110. <assembly: AssemblyConfiguration("")>
  111. <assembly: AssemblyCompany("")>
  112. <assembly: AssemblyProduct("")>
  113. <assembly: AssemblyCopyright("")>
  114. <assembly: AssemblyTrademark("")>
  115. <assembly: AssemblyCulture("")>
  116.  
  117. ' The assembly version has following format :
  118. '
  119. ' Major.Minor.Build.Revision
  120. '
  121. ' You can specify all values by your own or you can build default build and revision
  122. ' numbers with the '*' character (the default):
  123.  
  124. <assembly: AssemblyVersion("1.0.*")>
  125.  
  126. ' The following attributes specify the key for the sign of your assembly. See the
  127. ' .NET Framework documentation for more information about signing.
  128. ' This is not required, if you don't want signing let these attributes like they're.
  129. <assembly: AssemblyDelaySign(false)>
  130. <assembly: AssemblyKeyFile("")>]]></File>
  131.             </Files>
  132.         </Project>
  133.     </Combine>    
  134. </Template>
  135.  
  136.