ASP.NET & Word (Word Application) - BuiltInDocumentProperties

Imports Microsoft.Office.Interop.Word
Public Class AspNetWordDocProperties
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim Wrd As New Microsoft.Office.Interop.Word.Application
        Dim DocName As String = "MyDoc/MyWord.doc"

        Wrd.Application.Visible = False
        Wrd.Documents.Add()
        With Wrd
            .Selection.Font.Name = "Verdana"
            .Selection.Font.Size = "25"
            .Selection.Font.Bold = True
            .Selection.Font.Italic = True
            .Selection.TypeText("Welcome To www.ThaiCreate.Com")
        End With

        Wrd.ActiveDocument.BuiltInDocumentProperties("Title").Value = "Doc Title"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Subject").Value = "Doc Subject"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Author").Value = "Doc Author"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Manager").Value = "Doc Manager"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Company").Value = "Doc Company"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Category").Value = "Doc Category"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Application Name").Value = "Doc Application Name"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Keywords").Value = "Doc Keywords"
        Wrd.ActiveDocument.BuiltInDocumentProperties("Comments").Value = "Doc Comments"

        Wrd.ActiveDocument.SaveAs(Server.MapPath(DocName))
        Wrd.Application.Quit()
        Wrd = Nothing

    End Sub
End Class