Walkthrough: Using a Custom Action to Create a Database at Installation

Статья
11/01/2012

The following walkthrough demonstrates the use of a custom action and the CustomActionData property to create a database and database table during installation.

Note

This walkthrough requires SQL Server on the computer where you will deploy the application.

Note

Your computer might show different names or locations for some of the Visual Studio user interface elements in the following instructions. The Visual Studio edition that you have and the settings that you use determine these elements. For more information, see Visual Studio Settings.

Note

The following instructions demonstrate how to create a deployment project by using a Visual Basic project; the general principles apply to all Visual Studio language projects that support deploying Windows-based applications.

To create an installer class

On the File menu, click New Project.
In the New Project dialog box, select Visual Basic Projects in the Project Type pane, and then select Class Library in the Templates pane. In the Name box, type DBCustomAction.
On the Project menu, click Add New Item.
In the Add New Item dialog box, select Installer Class. In the Name box, type VbDeployInstaller.vb.

To create a data connection object

In Server Explorer, select Data Connections. Right-click and click Add Connection.
In the Choose Data Source dialog box, select Microsoft SQL Server.
In the Add Connection dialog box, do the following:
1. In the Server name list, type or select a server name.
2. Select Use Windows Authentication.
3. In the database box, type master.
4. Click OK to close the dialog box.
From the Data menu, click Add New Data Source, and then use the wizard to add the connection that you established in the previous steps. To verify that the data source is in the project, click Show Data Sources on the Data menu.

To create a text file that contains a SQL statement to create a database

In Solution Explorer, select the DBCustomAction project. On the Project menu, click Add New Item.
In the Add New Item dialog box, click Text File. In the Name box, type sql.txt (must be in lowercase).

Add the following to the sql.txt file:

CREATE TABLE [dbo].[Employees] (
[Name] [char] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
[Rsvp] [int] NULL ,
[Requests] [nvarchar] (4000) COLLATE SQL_Latin1_General_CP1_CI_AS NULL 
) ON [PRIMARY];

ALTER TABLE [dbo].[Employees] WITH NOCHECK ADD 
CONSTRAINT [PK_Employees] PRIMARY KEY CLUSTERED 
(
[Name]
) ON [PRIMARY];

In Solution Explorer, select sql.txt. In the Properties window, set the BuildAction property to Embedded Resource.

To add code to the installer class to read the text file

In Solution Explorer, select VbDeployInstaller.vb. On the View menu, click Code.

Add the following Imports statement at the top of the module:

Imports System.IO
Imports System.Reflection
Imports System.Data.SqlClient

using System.IO;
using System.Reflection;
using System.Data.SqlClient;

Add the following code to the VbDeployInstaller class, after the declaration of MyBase.New:

Public Class VbDeployInstaller

    Dim masterConnection As New System.Data.SqlClient.SqlConnection

    Public Sub New()
        MyBase.New()

        'This call is required by the Component Designer.
        InitializeComponent()

        'Add initialization code after the call to InitializeComponent

    End Sub

    Private Function GetSql(ByVal Name As String) As String
        Try

            ' Gets the current assembly.
            Dim Asm As [Assembly] = [Assembly].GetExecutingAssembly()

            ' Resources are named using a fully qualified name.
            Dim strm As Stream = Asm.GetManifestResourceStream(
              Asm.GetName().Name + "." + Name)

            ' Reads the contents of the embedded file.
            Dim reader As StreamReader = New StreamReader(strm)
            Return reader.ReadToEnd()

        Catch ex As Exception
            MsgBox("In GetSQL: " & ex.Message)
            Throw ex
        End Try
    End Function

    Private Sub ExecuteSql(ByVal DatabaseName As String, ByVal Sql As String)
        Dim Command As New SqlClient.SqlCommand(Sql, masterConnection)

        ' Initialize the connection, open it, and set it to the "master" database
        masterConnection.ConnectionString = My.Settings.masterConnectionString
        Command.Connection.Open()
        Command.Connection.ChangeDatabase(DatabaseName)
        Try
            Command.ExecuteNonQuery()
        Finally
            ' Closing the connection should be done in a Finally block
            Command.Connection.Close()
        End Try
    End Sub

    Protected Sub AddDBTable(ByVal strDBName As String)
        Try
            ' Creates the database.
            ExecuteSql("master", "CREATE DATABASE " + strDBName)

            ' Creates the tables.
            ExecuteSql(strDBName, GetSql("sql.txt"))

        Catch ex As Exception
            ' Reports any errors and abort.
            MsgBox("In exception handler: " & ex.Message)
            Throw ex
        End Try
    End Sub

    Public Overrides Sub Install(
        ByVal stateSaver As System.Collections.IDictionary)

        MyBase.Install(stateSaver)
        AddDBTable(Me.Context.Parameters.Item("dbname"))
    End Sub

End Class

public class VbDeployInstaller
{


System.Data.SqlClient.SqlConnection masterConnection = new System.Data.SqlClient.SqlConnection();
public VbDeployInstaller() : base()
{

//This call is required by the Component Designer.
InitializeComponent();

//Add initialization code after the call to InitializeComponent

}

private string GetSql(string Name)
{

try {
// Gets the current assembly.
Assembly Asm = Assembly.GetExecutingAssembly();

// Resources are named using a fully qualified name.
Stream strm = Asm.GetManifestResourceStream(Asm.GetName().Name + "." + Name);

// Reads the contents of the embedded file.
StreamReader reader = new StreamReader(strm);
return reader.ReadToEnd();

} catch (Exception ex) {
Interaction.MsgBox("In GetSQL: " + ex.Message);
throw ex;
}
}

private void ExecuteSql(string DatabaseName, string Sql)
{
System.Data.SqlClient.SqlCommand Command = new System.Data.SqlClient.SqlCommand(Sql, masterConnection);

// Initialize the connection, open it, and set it to the "master" database
masterConnection.ConnectionString = My.Settings.masterConnectionString;
Command.Connection.Open();
Command.Connection.ChangeDatabase(DatabaseName);
try {
Command.ExecuteNonQuery();
} finally {
// Closing the connection should be done in a Finally block
Command.Connection.Close();
}
}

protected void AddDBTable(string strDBName)
{
try {
// Creates the database.
ExecuteSql("master", "CREATE DATABASE " + strDBName);

// Creates the tables.
ExecuteSql(strDBName, GetSql("sql.txt"));

} catch (Exception ex) {
// Reports any errors and abort.
Interaction.MsgBox("In exception handler: " + ex.Message);
throw ex;
}
}


public override void Install(System.Collections.IDictionary stateSaver)
{
base.Install(stateSaver);
AddDBTable(this.Context.Parameters.Item("dbname"));
}

}

On the Build menu, click Build DBCustomAction.

To create a deployment project

On the File menu, click Add, and then click New Project.
In the Add New Project dialog box, open the Other Project Types node and select Setup and Deployment Projects in the Project Type pane. Then select Setup Project in the Templates pane. In the Name box, type DBCustomAction_Setup.
In the Properties window, select the ProductName property and type DB Installer.
In the File System Editor, select the Application Folder. On the Action menu, click Add, and then click Project Output.
In the Add Project Output Group dialog box, select Primary output for the DBCustomAction project.

To create a custom installation dialog box

Select the DBCustomAction_Setup project in Solution Explorer. On the View menu, point to Editor, and click User Interface.
In the User Interface Editor, select the Start node under Install. On the Action menu, click Add Dialog.
In the Add Dialog dialog box, select the Textboxes (A) dialog box, and then click OK.
On the Action menu, click Move Up. Repeat until the Textboxes (A) dialog box is above the Installation Folder node.
In the Properties window, select the BannerText property and type Specify Database Name.
Select the BodyText property and type This dialog box enables you to specify the name of the database to be created on the database server.
Select the Edit1Label property and type Name of database:.
Select the Edit1Property property and type CUSTOMTEXTA1.
Select the Edit2Visible, Edit3Visible, and Edit4Visible properties and set them to False.

To create a custom action

Select the DBCustomAction_Setup project in Solution Explorer. On the View menu, point to Editor, and then click Custom Actions.
In the Custom Actions Editor, select the Install node. On the Action menu, click Add Custom Action.
In the Select item in project dialog box, double-click the Application Folder.
Select Primary output from DBCustomAction (Active), then click OK to close the dialog box.
Make sure that Primary output from DBCustomAction (Active) item is selected in the Custom Actions Editor. In the Properties window, select the CustomActionData property and type /dbname=[CUSTOMTEXTA1]. This data is passed to the custom action that is run at the end of the installation. For more information, see CustomActionData Property.
On the Build menu, click Build DBCustomAction_Setup.

To install the application on your development computer

Select the DBCustomAction_Setup project in Solution Explorer. On the Project menu, click Install.

This will run the installer on your development computer.

Note

You must have install permissions on the computer in order to run the installer.

To deploy the application to another computer

In Windows Explorer, navigate to your project directory and find the built installer. The default path will be \documents and settings\yourloginname\DBCustomAction_Setup\project configuration\ DBCustomAction_Setup.msi. The default project configuration is Debug.
Copy DBCustomAction_Setup.msi and all other files and subdirectories in the directory to another computer.

Note

To install the application on a computer that is not on a network, copy the files to traditional media such as CD-ROM.

On the target computer, double-click the Setup.exe file to run the installer.

Note

You must have install permissions on the computer in order to run the installer.

To uninstall the application

In Windows Control Panel, double-click Add or Remove Programs.
In the Add or Remove Programs dialog box, select DBCustomAction_Setup, click Remove, and then click OK to close the dialog box.

Tip

To uninstall the application from your development computer, on the Project menu, click Uninstall.

Change History

Date	History	Reason
August 2011	Added C# code	Customer feedback.

August 2011

Added C# code

Customer feedback.

Поделиться через

Walkthrough: Using a Custom Action to Create a Database at Installation

To create an installer class

To create a data connection object

To create a text file that contains a SQL statement to create a database

To add code to the installer class to read the text file

To create a deployment project

To create a custom installation dialog box

To create a custom action

To install the application on your development computer

To deploy the application to another computer

To uninstall the application

See Also

Reference

Concepts

Other Resources

Change History

Дополнительные ресурсы