The sample demonstrates how to merge mail into a document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();
    document.LoadFromFile(@"..\..\..\..\..\..\Data\Fax.doc");

    string[] filedNames = new string[]{"Contact Name","Fax","Date"};

    string[] filedValues = new string[]{"John Smith","+1 (69) 123456",System.DateTime.Now.Date.ToString()};

    document.MailMerge.Execute(filedNames, filedValues);

  
    //Save doc file.
    document.SaveToFile("Sample.doc", FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()
	document_Renamed.LoadFromFile("..\..\..\..\..\..\Data\Fax.doc")

	Dim filedNames() As String = {"Contact Name","Fax","Date"}

	Dim filedValues() As String = {"John Smith","+1 (69) 123456",Date.Now.Date.ToString()}

	document_Renamed.MailMerge.Execute(filedNames, filedValues)


	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc", FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to encrypt a document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();

    //Create a new paragraph
    Paragraph paragraph = document.AddSection().AddParagraph();

    //Append Text
    paragraph.AppendText("The sample demonstrates how to encryt a document.");
    paragraph.ApplyStyle(BuiltinStyle.Heading4);

    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Microsoft Word is a word processor designed by Microsoft. It was first released in 1983 under the name Multi-Tool Word for Xenix systems. Subsequent versions were later written for several other platforms including IBM PCs running DOS (1983), the Apple Macintosh (1984), the AT&T Unix PC (1985), Atari ST (1986), SCO UNIX, OS/2, and Microsoft Windows (1989).");

    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Microsoft Word is a word processor designed by Microsoft. It was first released in 1983 under the name Multi-Tool Word for Xenix systems. Subsequent versions were later written for several other platforms including IBM PCs running DOS (1983), the Apple Macintosh (1984), the AT&T Unix PC (1985), Atari ST (1986), SCO UNIX, OS/2, and Microsoft Windows (1989).");


    document.Encrypt(this.textBox1.Text);

    //Save doc file.
    document.SaveToFile("Sample.doc",FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");


}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()

	'Create a new paragraph
	Dim paragraph_Renamed As Paragraph = document_Renamed.AddSection().AddParagraph()

	'Append Text
	paragraph_Renamed.AppendText("The sample demonstrates how to encryt a document.")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading4)

	document_Renamed.Encrypt(Me.textBox1.Text)

	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc",FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")


End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to decrypt a document.

private void button1_Click(object sender, EventArgs e)
{
    string fileName = OpenFile();
    if (!string.IsNullOrEmpty(fileName))
    {
        //Create word document
        Document document = new Document();
        document.LoadFromFile(fileName,FileFormat.Doc,this.textBox1.Text);

        //Save doc file.
        document.SaveToFile("Sample.doc", FileFormat.Doc);

        //Launching the MS Word file.
        WordDocViewer("Sample.doc");
    }


}

private string OpenFile()
{
    openFileDialog1.Filter = "Word Document (*.doc)|*.doc";
    openFileDialog1.Title = "Choose a document to Decrypt";

    openFileDialog1.RestoreDirectory = true;
    if (openFileDialog1.ShowDialog() == DialogResult.OK)
    {
        return openFileDialog1.FileName;
    }

    return string.Empty;
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	Dim fileName As String = OpenFile()
	If Not String.IsNullOrEmpty(fileName) Then
		'Create word document
		Dim document_Renamed As New Document()
		document_Renamed.LoadFromFile(fileName,FileFormat.Doc,Me.textBox1.Text)

		'Save doc file.
		document_Renamed.SaveToFile("Sample.doc", FileFormat.Doc)

		'Launching the MS Word file.
		WordDocViewer("Sample.doc")
	End If


End Sub

Private Function OpenFile() As String
	openFileDialog1.Filter = "Word Document (*.doc)|*.doc"
	openFileDialog1.Title = "Choose a document to Decrypt"

	openFileDialog1.RestoreDirectory = True
	If openFileDialog1.ShowDialog() = DialogResult.OK Then
		Return openFileDialog1.FileName
	End If

	Return String.Empty
End Function

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to Convert Word to RTF.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();
    document.LoadFromFile(@"..\..\..\..\..\..\Data\FindAndReplace.doc");

    //Save doc file.
    document.SaveToFile("Sample.rtf", FileFormat.Rtf);

    //Launching the MS Word file.
    WordDocViewer("Sample.rtf");
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()
	document_Renamed.LoadFromFile("..\..\..\..\..\..\Data\FindAndReplace.doc")

	'Save doc file.
	document_Renamed.SaveToFile("Sample.rtf", FileFormat.Rtf)

	'Launching the MS Word file.
	WordDocViewer("Sample.rtf")
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to save a Word document to image with Spire.Doc.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();
    document.LoadFromFile(@"..\..\..\..\..\..\Data\FindAndReplace.doc");

    //Save doc file.
    Image img = document.SaveToImages(0, ImageType.Bitmap);
    img.Save("sample.bmp");

    //Launching the image file.
    WordDocViewer("sample.bmp");
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()
	document_Renamed.LoadFromFile("..\..\..\..\..\..\Data\FindAndReplace.doc")

	'Save doc file.
	Dim img As Image = document_Renamed.SaveToImages(0, ImageType.Bitmap)
	img.Save("sample.bmp")

	'Launching the image file.
	WordDocViewer("sample.bmp")
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to Convert Word to HTML.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();
    document.LoadFromFile(@"..\..\..\..\..\..\Data\FindAndReplace.doc");

    //Save doc file.
    document.SaveToFile("Sample.html", FileFormat.Html);

    //Launching the MS Word file.
    WordDocViewer("Sample.html");
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()
	document_Renamed.LoadFromFile("..\..\..\..\..\..\Data\FindAndReplace.doc")

	'Save doc file.
	document_Renamed.SaveToFile("Sample.html", FileFormat.Html)

	'Launching the MS Word file.
	WordDocViewer("Sample.html")
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to insert watermark into Word document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();

    InsertWatermark(document);

    //Save doc file.
    document.SaveToFile("Sample.doc",FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");


}

private void InsertWatermark(Document document)
{
    Paragraph paragraph = document.AddSection().AddParagraph();
    paragraph.AppendText("The sample demonstrates how to insert a watermark into a document.");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);

    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Microsoft Word is a word processor designed by Microsoft. It was first released in 1983 under the name Multi-Tool Word for Xenix systems. Subsequent versions were later written for several other platforms including IBM PCs running DOS (1983), the Apple Macintosh (1984), the AT&T Unix PC (1985), Atari ST (1986), SCO UNIX, OS/2, and Microsoft Windows (1989).");
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Spire.Doc can generate, modify, convert, render and print documents without utilizing Microsoft Word.");
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("The sample demonstrates how to insert a watermark into a document.");
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Microsoft Word is a word processor designed by Microsoft. It was first released in 1983 under the name Multi-Tool Word for Xenix systems. Subsequent versions were later written for several other platforms including IBM PCs running DOS (1983), the Apple Macintosh (1984), the AT&T Unix PC (1985), Atari ST (1986), SCO UNIX, OS/2, and Microsoft Windows (1989).");
    paragraph = document.Sections[0].AddParagraph();
    paragraph = document.Sections[0].AddParagraph();
    paragraph.AppendText("Spire.Doc can generate, modify, convert, render and print documents without utilizing Microsoft Word.");
    

    TextWatermark txtWatermark = new TextWatermark();
    txtWatermark.Text = "Watermark Demo";
    txtWatermark.FontSize = 90;
    txtWatermark.Layout = WatermarkLayout.Diagonal;
    document.Watermark = txtWatermark;
 
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()

	InsertWatermark(document_Renamed)

	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc",FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")


End Sub

Private Sub InsertWatermark(ByVal document_Renamed As Document)
	Dim paragraph_Renamed As Paragraph = document_Renamed.AddSection().AddParagraph()
	paragraph_Renamed.AppendText("The sample demonstrates how to insert a watermark into a document.")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)


	Dim txtWatermark As New TextWatermark()
	txtWatermark.Text = "Watermark Demo"
	txtWatermark.FontSize = 90
	txtWatermark.Layout = WatermarkLayout.Diagonal
	document_Renamed.Watermark = txtWatermark

End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to insert a textbox into a document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();

    InsertTextbox(document.AddSection());

    //Save doc file.
    document.SaveToFile("Sample.doc",FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");


}

private void InsertTextbox(Section section)
{
    Paragraph paragraph = section.AddParagraph();
    paragraph.AppendText("The sample demonstrates how to insert a textbox into a document.");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);

    paragraph = section.AddParagraph();
    paragraph.Format.HorizontalAlignment = Spire.Doc.Documents.HorizontalAlignment.Left;
    Spire.Doc.Fields.TextBox textBox = paragraph.AppendTextBox(50,20);

}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()

	InsertTextbox(document_Renamed.AddSection())

	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc",FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")


End Sub

Private Sub InsertTextbox(ByVal section_Renamed As Section)
	Dim paragraph_Renamed As Paragraph = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendText("The sample demonstrates how to insert a textbox into a document.")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)

	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.Format.HorizontalAlignment = Spire.Doc.Documents.HorizontalAlignment.Left
	Dim textBox As Spire.Doc.Fields.TextBox = paragraph_Renamed.AppendTextBox(50,20)

End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to insert an image into a Word document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();

    InsertImage(document.AddSection());

    //Save doc file.
    document.SaveToFile("Sample.doc",FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");


}

private void InsertImage(Section section)
{
    Paragraph paragraph = section.AddParagraph();
    paragraph.AppendText("The sample demonstrates how to insert a image into a document.");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);

    paragraph = section.AddParagraph();
    paragraph.Format.HorizontalAlignment = Spire.Doc.Documents.HorizontalAlignment.Left;
    paragraph.AppendPicture(Image.Properties.Resources.Word);
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()

	InsertImage(document_Renamed.AddSection())

	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc",FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")


End Sub

Private Sub InsertImage(ByVal section_Renamed As Section)
	Dim paragraph_Renamed As Paragraph = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendText("The sample demonstrates how to insert a image into a document.")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)

	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.Format.HorizontalAlignment = Spire.Doc.Documents.HorizontalAlignment.Left
	paragraph_Renamed.AppendPicture(My.Resources.Word)
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub

The sample demonstrates how to insert hyperlinks into a Word document.

private void button1_Click(object sender, EventArgs e)
{
    //Create word document
    Document document = new Document();

    InsertHyberlink(document.AddSection());

    //Save doc file.
    document.SaveToFile("Sample.doc",FileFormat.Doc);

    //Launching the MS Word file.
    WordDocViewer("Sample.doc");


}

private void InsertHyberlink(Section section)
{
    Paragraph paragraph = section.AddParagraph();
    paragraph.AppendText("Spire.XLS for .NET \r\n e-iceblue company Ltd. 2002-2010 All rights reserverd");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);

    paragraph = section.AddParagraph();
    paragraph.AppendText("Home page");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);
    paragraph = section.AddParagraph();
    paragraph.AppendHyperlink("www.e-iceblue.com", "www.e-iceblue.com", HyperlinkType.WebLink);

    paragraph = section.AddParagraph();
    paragraph.AppendText("Contact US");
    paragraph.ApplyStyle(BuiltinStyle.Heading2);
    paragraph = section.AddParagraph();
    paragraph.AppendHyperlink("mailto:support@e-iceblue.com", "support@e-iceblue.com", HyperlinkType.EMailLink);
}

private void WordDocViewer(string fileName)
{
    try
    {
        System.Diagnostics.Process.Start(fileName);
    }
    catch { }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
	'Create word document
	Dim document_Renamed As New Document()

	InsertHyberlink(document_Renamed.AddSection())

	'Save doc file.
	document_Renamed.SaveToFile("Sample.doc",FileFormat.Doc)

	'Launching the MS Word file.
	WordDocViewer("Sample.doc")


End Sub

Private Sub InsertHyberlink(ByVal section_Renamed As Section)
	Dim paragraph_Renamed As Paragraph = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendText("Spire.XLS for .NET " & vbCrLf & " e-iceblue company Ltd. 2002-2010 All rights reserverd")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)

	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendText("Home page")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)
	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendHyperlink("www.e-iceblue.com", "www.e-iceblue.com", HyperlinkType.WebLink)

	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendText("Contact US")
	paragraph_Renamed.ApplyStyle(BuiltinStyle.Heading2)
	paragraph_Renamed = section_Renamed.AddParagraph()
	paragraph_Renamed.AppendHyperlink("mailto:support@e-iceblue.com", "support@e-iceblue.com", HyperlinkType.EMailLink)
End Sub

Private Sub WordDocViewer(ByVal fileName As String)
	Try
		Process.Start(fileName)
	Catch
	End Try
End Sub