Как передать код html в WebBrowser обычным текстом?

@dymitri · Регистрация: 16.01.2016

Студворк — интернет-сервис помощи студентам

С праздником всех! У меня вопрос, который в начале казался для меня обычным лёгким, но уже второй день не могу найти на него ответ. Мне нужно в Веб-браузере на форме отобразить результат динамически создаваемой (программным способом) страницы. Везде, даже в справке Майкрософт, приводятся примеры вставки кода HTML в примитиве. Нигде нет примера, где бы в WebBrowser1.DocumentText = "..." задавался полный текст страницы. И у меня проблема с этим! Когда я внутри кавычек задаю html-код из любого веб-дизайнерского редактора, то понятное дело, ВизуалСтудио (2013) ругается на кавычки внутри кода. Меняю на одинарные кавычки (хотя редакторы тогда ругаются на одинарные там, где должны быть двойные), всё-равно, проблемы остаются: то заданный цвет не понимает, то ещё что-то. Короче, код принимается лишь в примитиве, когда удаляются все стилевые настройки, ссылки. Вот тогда всё отображается. Но интересует же именно отображение полной оформленной страницы! Хоть многострочным способ, хоть соединяй в одну строку - безрезультатно. Через переменную тоже не выходит: тогда в строковую переменную не заходит html-текст.
Кстати, на просторах нашёл вариант, где человек подгружал в переменную текст со скриптом, и всё получилось, даже многострочно:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim debugjs As String =
        <code>
            var debugjs = true;
 
            var log = function (text) {
                window.external.log('web message: ' + text);
            };
            window.alert = function (s) {
                window.external.log(s);
            };
            window.confirm = function (s) {
                window.external.log(s);
            };
            window.onerror = function (message, url, line) {
                window.external.log('ERROR: ' + message + '\n Line: ' + line + '\n URL: ' + url + '\n');
                return true;
            };
            log("loaded debug.js");
        </code>

Но меня же интересует лишь html со стилями, без скрипта.

Помогите, кто знает как это сделать!!!

Для примера даю текст, который не принимается как значение:

HTML5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
<!DOCTYPE html>
<html lang="ru">
<head>
<title>Список участников</title>
<meta charset="windows-1251"/>
</head>
<body style="font-family:Segoe, Segoe UI, DejaVu Sans, Trebuchet MS, Verdana, sans-serif; font-size:12px; background-color:white;">
<table border="2" style="border:0000 thin #FFFFFF; border-radius:4px">
    <tr>
        <td style="color:#000568;" colspan="2"><h3 align="center">Заголовок</h3></td>
    </tr>
    <tr>
        <td>01</td>
        <td>02</td>
</tr>
</table>
<div><a href="http:/..." style="font-size:8px; font-style:italic; color:#4E4B00;">Разработка:  &copy; Разработчик, 2020</a></div>
</body>
</html>

Добавлено через 20 минут
Кстати, советы с созданием файла не интересны. Т.к. строки будут добавляться в переменную прямо в программе, и по сути вопрос получается вообще о строковых значениях. Как в них запихнуть простым способом "незапихиваемое".

@Orlangur · 19.01.2020, 18:07

dymitri, вместо 1 кавычки просто ставьте 2 и все, к примеру

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim s As String="<!DOCTYPE html>
<html lang=""ru"">
<head>
<title>Список участников</title>
<meta charset=""windows-1251""/>
</head>
<body style=""font-family:Segoe, Segoe UI, DejaVu Sans, Trebuchet MS, Verdana, sans-serif; font-size:12px; background-color:white;"">
<table border=""2"" style=""border:0000 thin #FFFFFF; border-radius:4px"">
    <tr>
        <td style=""color:#000568;"" colspan=""2""><h3 align=""center"">Заголовок</h3></td>
    </tr>
    <tr>
        <td>01</td>
        <td>02</td>
</tr>
</table>
<div><a href=""http:/..."" style=""font-size:8px; font-style:italic; color:#4E4B00;"">Разработка:  &copy; Разработчик, 2020</a></div>
</body>
</html>"

@ovva · 19.01.2020, 18:30

Попробуйте так

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim xm As XElement =
   <html lang="ru">
       <head>
           <title>Список участников</title>
           <meta charset="windows-1251"/>
       </head>
       <body style="font-family:Segoe, Segoe UI, DejaVu Sans, Trebuchet MS, Verdana, sans-serif; font-size:12px; background-color:white;">
           <table border="2" style="border:0000 thin #FFFFFF; border-radius:4px">
               <tr>
                   <td style="color:#000568;" colspan="2"><h3 align="center">Заголовок</h3></td>
               </tr>
               <tr>
                   <td>01</td>
                   <td>02</td>
               </tr>
           </table>
           <div><a href="http:/..." style="font-size:8px; font-style:italic; color:#4E4B00;">Разработка:   Разработчик, 2020</a></div>
       </body>
   </html>
    WebBrowser1.Stop()
    WebBrowser1.Document.OpenNew(True)
    WebBrowser1.DocumentText = xm.ToString
End Sub

@dymitri · 20.01.2020, 04:22 **[ТС]**

Сообщение от Orlangur1991

вместо 1 кавычки просто ставьте 2 и все, к примеру

Благодарю вас за неравнодушие, конечно, но ваш пример не стал работать (не принимает сразу же первую строчку).

Сообщение от ovva

Попробуйте так
...

Огромная вам благодарность! Ваш вариант прекрасно работает. Очень помогли, что не нужно весь код править под VB (менять кавычки и т.д.) !

Кстати для информации. Когда я начинал тему, у меня не работало даже с одинарными кавычками. Но подключившись на ноуте к интернету (для создания этой темы), подгрузились к Студии какие-то файлы и стал работать даже мой вариант, с единственным неудобством переделывать кавычки! И почему-то иногда на ноуте при работе в различных проектах бывает просит установки каких-то шрифтов что ли, ещё чего-то, но при переносе на стационарный копм, всё работает нормально. Хотя версия Студии и даже образ один и тот же.

Так что вопрос считаю закрытым. Как всегда этот форум помог!

Добавлено через 1 час 51 минуту

Сообщение от ovva

As XElement

А ещё вопросик. Как можно в эту переменную добавить стоки? Ответа в нете не нашёл. Просто ничего типа xm += "..." или xm &= "..." не работает (как и xm = xm & <...>). Получается, я не могу отрыть тег, добавить строковую переменную и закрыть тег. Это как бы операции со строками, а тут эти операции соединения строк не работают.

@ovva · 20.01.2020, 15:22

Сообщение от dymitri

Как можно в эту переменную добавить стоки?

Приведу пример, а дальше думаю, разберетесь. Нужно конечно иметь в виду, что здесь не просто строки, а объект класса XElement (пространство имен System.Xml.Linq) и операции с ним д.б. соответствующие. Замечу также что т.к. это xml то некоторые правила html здесь не проходят, например нельзя просто задать тег <hr>, а обязательно указать его закрытие <hr></hr>.

Кликните здесь для просмотра всего текста

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
    Dim v1 As String = "test1"
    Dim v2 As String = "test2"
    Dim v3 As String = "Реализовать запись значения переменной"
    Dim s1 As String = "This is a Header"
    Dim xm0 As XElement = <h1><%= s1 %></h1>
    Dim xm As XElement =
<html lang="ru">
    <head>
        <title>Список участников</title>
        <meta charset="windows-1251"/>
    </head>
    <body style="font-family:Segoe, Segoe UI, DejaVu Sans, Trebuchet MS, Verdana, sans-serif; font-size:12px; background-color:white;">
        <table border="2" style="border:0000 thin #FFFFFF; border-radius:4px">
            <tr>
                <td style="color:#000568;" colspan="2"><h3 align="center"><%= v3 %></h3></td>
            </tr>
            <tr>
                <td><%= v1 %></td>
                <td><%= v2 %></td>
            </tr>
        </table>
        <div><a href="http:/..." style="font-size:8px; font-style:italic; color:#4E4B00;">Разработка:   Разработчик, 2020</a></div>
        <%= xm0 %>
    </body>
</html>
    WebBrowser1.Stop()
    WebBrowser1.Document.OpenNew(True)
    WebBrowser1.DocumentText = xm.ToString
End Sub

@dymitri · 20.01.2020, 17:35 **[ТС]**

Сообщение от ovva

объект класса XElement

Да, действительно, подобные примеры я уже видел, но на другом ЯП, поэтому списал сложность просто на другой синтаксис. Но в VB это как всегда проще понять, нагляднее что ли. Поэтому сразу же стал понятен алгоритм подстановки строк. Ещё раз огромная благодарность вам за помощь!!!

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

Как передать код html в WebBrowser обычным текстом?

Решение

Решение