На главную
ПРАВИЛА FAQ Помощь Участники Календарь Избранное DigiMania RSS
msm.ru
! Правила раздела Visual Basic: Общие вопросы
Здесь обсуждаются вопросы по языку Visual Basic 1-6 (а так же по схожим языкам, как, например, PowerBASIC).
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.

Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.

Полезные ссылки:
user posted image FAQ Сайта user posted image FAQ Раздела user posted image Кладовка user posted image Наши Исходники user posted image API-Guide user posted image Поиск по Разделу user posted image MSDN Library Online user posted image Google

Ваше мнение о модераторах: user posted image SCINER, user posted image B.V.
Модераторы: SCINER, B.V.
  
> WebBrowser: HTML5
    В Win10 WebBrowser не корректно отображает html5 - ломается позиция некоторых элементов страницы, какой тег в этом виноват - предстоит выяснить. При этом IE11 корректно отображает. Может у меня не стоят какие-то новые патчи для VB?
      Нашёл вот что:
      https://social.msdn.microsoft.com/Forums/ru...opprogrammingru

      Но не понял, что даст подключение Awesomium?

      Добавлено
      Вариант через реестр ещё не проверял.
        Через реестр работает. Страница отображается корректно. Но теперь в проге не работает код, не выдаёт HTML нужного фрейма (выдаёт HTML между тегами <head></head> и <frameset></frameset> ):

        ExpandedWrap disabled
               sHTML2 = WB(Index).document.frames("nameframe").document.documentElement.innerHTML


        также не работает прямое указание через индекс:
        ExpandedWrap disabled
               sHTML2 = WB(Index).document.frames(1).document.documentElement.innerHTML


        в чём проблема?

        Добавлено
        схематическая часть HTML страницы:
        ExpandedWrap disabled
          <frameset>
          <frame id=id1 name=name1> ... </frame>
          <frame id=id2 name=name2> ... </frame>
          <frame id=id3 name=name3> ... </frame>
          ...
          </frameset>


        Добавлено
        также перестало находить элементы по ID (не работает):

        Private WithEvents inpHTML As HTMLInputElement
        Set inpHTML = WB(idxWB).document.getElementById("ElemID")
        Сообщение отредактировано: BlackSun -
          запись в реестр:
          ExpandedWrap disabled
            Private Function WriteBrowserEmul(CodeVer As Long) As ErrObject
            Dim Reg As Object
                Set Reg = CreateObject("WScript.Shell")
                Reg.RegWrite "HKLM\SOFTWARE\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\" & App.EXEName & ".exe", CodeVer, "REG_DWORD"
                Set WriteBrowserEmul = Err
            End Function

          вызов:
          ExpandedWrap disabled
                  WriteBrowserEmul 11001

          или:
          ExpandedWrap disabled
                  WriteBrowserEmul 11000


          Добавлено
          в HTML-странице написано:
          <input name="name1">

          до IE 11 у меня работал код:
          ExpandedWrap disabled
            Private WithEvents inpHTML As HTMLInputElement
             Set inpHTML = WB(idxWB).document.getElementById("name1")


          т.е. параметр name воспринимался как id, теперь в IE 11 id=vbNullString (нашёл элемент поиском и проверил id).

          Добавлено
          осталось разобраться с этим нерабочим:
          ExpandedWrap disabled
            sHTML2 = WB(Index).document.frames(1).document.documentElement.innerHTML
            1. чтобы отключить стили, достаточно ли:
            ExpandedWrap disabled
              WB(index).Document.getElementsByTagName("LINK").Item(0).href = ""


            Страница отображается до WB_DocumentComplete или после?

            2. Как отключить вызов скрипта в <HEAD>? Текст:
            <script src="https://…/имя.js"></script>
            Сообщение отредактировано: BlackSun -
            1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
            0 пользователей:


            Рейтинг@Mail.ru
            [ Script Execution time: 0,0896 ]   [ 15 queries used ]   [ Generated: 24.10.19, 01:55 GMT ]