ASP.NET

Public Shared Function convertDoc2PDF(ByVal sourcePath As Object, ByVal targetPath As Object) As Boolean
        Dim result As Boolean
        Dim paramMissing As Object = Type.Missing
        Dim wordApplication As New ApplicationClass
        Dim wordDocument As Document = Nothing
        Try
            Dim paramSourceDocPath As Object = sourcePath
            Dim paramExportFilePath As String = targetPath
            Dim paramExportFormat As WdExportFormat = WdExportFormat.wdExportFormatPDF
            Dim paramOpenAfterExport As Boolean = False
            Dim paramExportOptimizeFor As WdExportOptimizeFor = WdExportOptimizeFor.wdExportOptimizeForPrint
            Dim paramExportRange As WdExportRange = WdExportRange.wdExportAllDocument
            Dim paramStartPage As Integer = 0
            Dim paramEndPage As Integer = 0
            Dim paramExportItem As WdExportItem = WdExportItem.wdExportDocumentContent
            Dim paramIncludeDocProps As Boolean = True
            Dim paramKeepIRM As Boolean = True
            Dim paramCreateBookmarks As WdExportCreateBookmarks = WdExportCreateBookmarks.wdExportCreateWordBookmarks
            Dim paramDocStructureTags As Boolean = True
            Dim paramBitmapMissingFonts As Boolean = True
            Dim paramUseISO19005_1 As Boolean = False
            wordDocument = wordApplication.Documents.Open( _
                                    paramSourceDocPath, paramMissing, True, _
                                    paramMissing, paramMissing, paramMissing, _
                                    paramMissing, paramMissing, paramMissing, _
                                    paramMissing, paramMissing, paramMissing, _
                                    paramMissing, paramMissing, paramMissing, _
                                    paramMissing)

            If (wordDocument IsNot Nothing) Then
                wordDocument.ExportAsFixedFormat(paramExportFilePath, _
                paramExportFormat, paramOpenAfterExport, _
                paramExportOptimizeFor, paramExportRange, paramStartPage, _
                paramEndPage, paramExportItem, paramIncludeDocProps, _
                paramKeepIRM, paramCreateBookmarks, paramDocStructureTags, _
                paramBitmapMissingFonts, paramUseISO19005_1, _
                paramMissing)
            End If
            result = True
        Catch ex As Exception
            result = False

        Finally

            If (wordDocument IsNot Nothing) Then
                wordDocument.Close(paramMissing, paramMissing, paramMissing)
                wordDocument = Nothing
            End If
            If (wordApplication IsNot Nothing) Then

                wordApplication.Quit(paramMissing, paramMissing, paramMissing)
                wordApplication = Nothing
            End If
            GC.Collect()
            GC.WaitForPendingFinalizers()
            GC.Collect()
            GC.WaitForPendingFinalizers()
        End Try

        Return result

    End Function

 <%@ language="c#" debug="true" trace="false" %> 
<%@ Register TagPrefix="mp" namespace="Microsoft.Web.Samples.MasterPages" assembly="MasterPages" %> 
 
<script runat="server"> 
    void ClickedCapitalize(object o, EventArgs e) { 
        capitalized.Text = Server.HtmlEncode(tb1.Text.ToUpper()); 
    } 
 
    void SayHello(object o, EventArgs e) { 
        name.Text = Server.HtmlEncode(tb2.Text); 
    } 
</script> 
 
<mp:contentcontainer runat="server" MasterPageFile="sub/TestMasterPage.ascx"> 
 
<mp:content id=region1 runat="server"> 
    <a href="MasterPages.htm" runat="server">Relative link test</a><br> 
    <asp:textbox id=tb1 runat="server"/><asp:button text=Capitalize onclick=ClickedCapitalize runat="server"/> 
    <asp:literal id=capitalized runat="server"/> 
</mp:content> 
 
<mp:content id="region2" runat="server"> 
    <asp:textbox id="tb2" runat="server"/><asp:button text="Say hello" onclick="SayHello" runat="server"/> 
    Hello <asp:literal id="name" text="[name goes here]" runat="server"/>! 
</mp:content> 
 
</mp:contentcontainer>