HtmlDocument.CreateElement(String) Metod

public:
 System::Windows::Forms::HtmlElement ^ CreateElement(System::String ^ elementTag);

public System.Windows.Forms.HtmlElement CreateElement(string elementTag);

public System.Windows.Forms.HtmlElement? CreateElement(string elementTag);

member this.CreateElement : string -> System.Windows.Forms.HtmlElement

Public Function CreateElement (elementTag As String) As HtmlElement

Parametrar

Returer

Ett nytt element av den angivna taggtypen.

Exempel

I följande kodexempel används data från Northwind-databasen för att skapa en HTML-tabell med .CreateElement Metoden AppendChild används också, först för att lägga till celler (TD element) till rader (TR element), sedan lägga till rader i tabellen och slutligen lägga till tabellen i slutet av det aktuella dokumentet. Kodexemplet kräver att programmet har en WebBrowser kontroll med namnet WebBrowser1.

private void DisplayCustomersTable()
{
    DataSet customersSet = new DataSet();
    DataTable customersTable = null;
    SqlDataAdapter sda = new SqlDataAdapter("SELECT * FROM Customers", "Data Source=localhost;Integrated Security=SSPI;Initial Catalog=Northwind;");
    sda.Fill(customersTable);
    customersTable = customersSet.Tables[0];

    if (webBrowser1.Document != null)
    {
        HtmlElement tableRow = null;
        HtmlElement headerElem = null;

        HtmlDocument doc = webBrowser1.Document;
        HtmlElement tableElem = doc.CreateElement("TABLE");
        doc.Body.AppendChild(tableElem);

        HtmlElement tableHeader = doc.CreateElement("THEAD");
        tableElem.AppendChild(tableHeader);
        tableRow = doc.CreateElement("TR");
        tableHeader.AppendChild(tableRow);

        foreach (DataColumn col in customersTable.Columns)
        {
            headerElem = doc.CreateElement("TH");
            headerElem.InnerText = col.ColumnName;
            tableRow.AppendChild(headerElem);
        }

        // Create table rows.
        HtmlElement tableBody = doc.CreateElement("TBODY");
        tableElem.AppendChild(tableBody);
        foreach (DataRow dr in customersTable.Rows)
        {
            tableRow = doc.CreateElement("TR");
            tableBody.AppendChild(tableRow);
            foreach (DataColumn col in customersTable.Columns)
            {
                Object dbCell = dr[col];
                HtmlElement tableCell = doc.CreateElement("TD");
                if (!(dbCell is DBNull))
                {
                    tableCell.InnerText = dbCell.ToString();
                }
                tableRow.AppendChild(tableCell);
            }
        }
    }
}

Private Sub DisplayCustomersTable()
    ' Initialize the database connection.
    Dim CustomerData As New DataSet()
    Dim CustomerTable As DataTable

    Try
        Dim DBConn As New SqlConnection("Data Source=localhost;Integrated Security=SSPI;Initial Catalog=Northwind;")
        Dim DBQuery As New SqlDataAdapter("SELECT * FROM CUSTOMERS", DBConn)
        DBQuery.Fill(CustomerData)
    Catch dbEX As DataException

    End Try

    CustomerTable = CustomerData.Tables("Customers")

    If (Not (WebBrowser1.Document Is Nothing)) Then
        With WebBrowser1.Document
            Dim TableElem As HtmlElement = .CreateElement("TABLE")
            .Body.AppendChild(TableElem)

            Dim TableRow As HtmlElement

            ' Create the table header.
            Dim TableHeader As HtmlElement = .CreateElement("THEAD")
            TableElem.AppendChild(TableHeader)
            TableRow = .CreateElement("TR")
            TableHeader.AppendChild(TableRow)

            Dim HeaderElem As HtmlElement
            For Each Col As DataColumn In CustomerTable.Columns
                HeaderElem = .CreateElement("TH")
                HeaderElem.InnerText = Col.ColumnName
                TableRow.AppendChild(HeaderElem)
            Next

            ' Create table rows.
            Dim TableBody As HtmlElement = .CreateElement("TBODY")
            TableElem.AppendChild(TableBody)
            For Each Row As DataRow In CustomerTable.Rows
                TableRow = .CreateElement("TR")
                TableBody.AppendChild(TableRow)
                For Each Col As DataColumn In CustomerTable.Columns
                    Dim Item As Object = Row(Col)
                    Dim TableCell As HtmlElement = .CreateElement("TD")
                    If Not (TypeOf (Item) Is DBNull) Then
                        TableCell.InnerText = CStr(Item)
                    End If
                    TableRow.AppendChild(TableCell)
                Next
            Next

        End With
    End If
End Sub

Kommentarer

elementTag kan vara någon av HTML-taggarna som stöds i Internet Explorer förutom FRAME och IFRAME.

CreateElement returnerar ett element som inte är kopplat till det aktuella dokumentträdet. Om du vill lägga till elementet i dokumentet använder du antingen InsertAdjacentElement metoderna eller AppendChild .

Den här metoden påverkar inte tillståndet för ett befintligt dokuments källkod när du använder WebBrowser kontrollens snabbmenykommando Visa källa eller DocumentText kontrollens egenskaper DocumentStream ochWebBrowser.

När du skapar nya element med CreateElementkan du inte ange vissa egenskaper, till exempel Name. Om du behöver ange attributet Namn tilldelar du dem som HTML till egenskapen för InnerHtml ett annat objekt i dokumentet.

Se även

• createElement-metod