vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2019
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
MSHTML.HTMLDocument *erstellen* incl. Head Element / Div Element / Tabelle 
Autor: woerny
Datum: 31.07.18 12:10

Hallo @ all,

ich möchte eine HtmlSeite (lokal) in einem IE-Control abbilden.
Mit dem folgendem Beisppiel Code funktioniert das soweit.
Sub testMSHTML_VBA()
 
    Dim iRow As Integer, jCol As Integer
    Dim objDocument     As MSHTML.HTMLDocument
    Set objDocument = objWebbrowser.Document
 
    'call WebbrowserLeeren
                      objWebbrowser.Document.Clear
 
    Dim objTable        As MSHTML.HTMLTable
    Set objTable = objDocument.createElement("Table")
                   objDocument.Body.appendChild objTable
        objTable.Style.borderCollapse = "collapse"
 
 
        Dim objRow          As MSHTML.HTMLTableRow
        Dim objCell         As MSHTML.HTMLTableCell
 
    For iRow = 1 To 3
        Set objRow = objTable.insertRow
        For jCol = 1 To 3
            Set objCell = objRow.insertCell
                objCell.Style.verticalAlign = "top"
                objCell.innerHTML = "<p>Zeile " & iRow & ", Spalte " & jCol & "</p>"
                objCell.Style.BorderColor = "#cccccc"
                objCell.Style.BorderStyle = "solid"
                objCell.Style.BorderWidth = "1px"
                objCell.Style.padding = "5px"
                '------------------------------------------------
                    If (iRow + jCol) Mod 2 = 0 Then
                        objCell.Style.backgroundColor = "#eeeeee"
                        objCell.Style.FontWeight = "bold"
                    End If
                '------------------------------------------------
                objCell.Style.fontFamily = "Calibri"
                objCell.Style.FontSize = "10pt"
                objCell.Style.Color = "#ff0000"
        Next jCol
    Next iRow
End Sub
Da ich aber eine umfangreiche Tabelle darstellen möchte,
würde ich gerne auf eine externe CSS referenzieren und weitere Einstellungen im HEAD'er ergänzen.

Darüber hinaus, müsste ich den ein oder anderen DIV-Container erstellen.

Wäre vielleicht einer von euch so nett, mich hierbei zu unterstützen,
oder evtl. mir einen Link zur Verfügung zu stellen, wie ich mir das selbst erschliessen könnte.

Wie kann ich einen Head Element einbauen?
z.b:
<head>
  <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1">
  <meta name="viewport" content="width=device-width, initial-scale=1">
  <link rel="stylesheet" type="text/css" href="./Daten/myDefault.css" />
</head>
wie kann ich ein DIV Element einbauen?
<td id="F1"><div class="tooltip">  <span class="tooltiptext">mein _
  Hinweis</span></div></td>
Vielen Dank
LG
Werner



alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
MSHTML.HTMLDocument *erstellen* incl. Head Element / Div Ele...396woerny31.07.18 12:10
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...202Souffleurlos31.07.18 18:06
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...204woerny31.07.18 23:50
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...187Souffleurlos01.08.18 18:12
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...180Franki03.08.18 02:39
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...177woerny03.08.18 12:46
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...188Franki05.08.18 02:48
Re: MSHTML.HTMLDocument *erstellen* incl. Head Element / Div...166W. Wolf20.08.18 14:10

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2019 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel