Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как просмотреть HTML? / 21 сообщений из 21, страница 1 из 1
27.08.2003, 16:35
    #32249107
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Я сформировал строку с содержанием html-тегов. Таким образом я хочу сделать красивый cross-tab отчет.
Но как теперь его посмотреть?
В памяти всплывают какие-то манипуляции с "about:..."...
Я уже согласен скидывать контент в файл на диск.
Но таки как его потом закачать в браузер?
Dir и Shell не помогают. Как вариант - мои кривые руки.
Помогите, а?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.08.2003, 19:13
    #32249341
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Что-то нам с Машенькой не везет на этом форуме...
Как закон какой-то: всем отвечают кроме меня.
Абыдна, панимаишь!

На Делфийском форуме у мастаков поживее будет.
Попал я в глубокую ... с этим акцессом. Когда мне платили за работу на Делфи, проблем с информацией не было.

И не надо мне: готовы помочь но случайно никто не знает...
Это тенденция. Прощайте
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.08.2003, 19:23
    #32249347
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Но таки как его потом закачать в браузер?
Код: plaintext
1.
IEXPLORE.EXE  "file://localhost/D:/Program Files/Opera/Cache4/opr0063V.htm" 
OPERA  "file://localhost/D:/Program Files/Opera/Cache4/opr0063V.htm"


Работает, однако...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.08.2003, 19:25
    #32249349
Лифчик
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Это была его предсмертная записка. Зачем он приходил в этот мир? Непонятно...

Гео, ты опоздал, похоже
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.08.2003, 19:35
    #32249358
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
2Лифчик
Да ничего страшного, я думаю...
Это же надо 3 часа проверять инет, вместо того, чтобы посмотреть, как браузер файлы локальные открывает. :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.08.2003, 19:41
    #32249364
4d_monster
4d_monster
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Кстати эти файла можно смотреть на форме ахеса:

- Бросаем контрол "Обозреватель веб-страниц (Microsoft)" [Shell.Explorer.2]

- если надо сменить страницу: Me.WebBrowser1.Navigate "c:\1.htm"

Фсё

Наверно это пост смертная видите он уже посинел к тому времени
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 10:43
    #32249701
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Поглумлюсь-ка я над трупом
Чем ему FollowHyperLink не понравилось?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 10:53
    #32249725
vdimas
vdimas
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Гораздо грамотнее обойтись без промежуточного файла (почти без файла!).
Можно прямо в памяти создавать элементы DOM.

Делай так:

1. Посади на форму ActiveX - Web Browser
2. подключи ссылку на MSHTML.TLB
3. создай файл-"болванку", типа:
Код: plaintext
1.
2.
3.
4.
<html>
    <body>
        <TABLE id= "MainTable" ></TABLE>
    </body>
</html>

4. Выполни Navigate2("полный путь файла")
5. Перехвати событие Document_Complete, и делай с содержимым, что хошь:
Код: plaintext
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.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
Private Sub IE_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Dim doc As MSHTML.HTMLDocument

    Set doc = IE.Document
    
    Dim tbl As HTMLTable
    Set tbl = doc.All.Item( "MainTable" )
    tbl.cols =  3 
    
    Dim i As Integer, j As Integer
    Dim row As HTMLTableRow
    Dim cell As MSHTML.HTMLDTElement
    Dim link As MSHTML.HTMLLinkElement
    Dim graph As MSChart
    Dim rowdata( 1  To  2 )    ' array for Chart Data
    
    For i = 1 To 3
        Set row = tbl.insertRow
        row.bgColor = &HD0D0D8
        row.className = "MyHeader"
        
        Set cell = row.insertCell(0)
        cell.colSpan = 3
        cell.innerText = "This is HEADER ROW #" & i
        
        For j = 1 To 10
            Set row = tbl.insertRow
            row.className = "MyData"
            
            Set cell = row.insertCell(0)
            cell.innerHTML = "<a href='http://{MENU_ITEM}'>Data Row #" & j & "   Column 1</a>"
            
            Set cell = row.insertCell(1)
            cell.innerText = "Column 2"
            
            Set cell = row.insertCell(2)
            
            cell.innerHTML = "<OBJECT style='WIDTH: 20pt; HEIGHT: 13pt;' classid='clsid:3A2B370C-BA0A-11D1-B137-0000F8753F5D'></OBJECT>"
            IE.Visible = True
            
            Set graph = cell.firstChild
            With graph
                .Repaint = False
                .Plot.Backdrop.Fill.Style = VtFillStyleNull
                .Backdrop.Fill.Style = VtFillStyleNull
                .ShowLegend = False
                rowdata(1) = i
                rowdata(2) = j
                .ChartData = rowdata
                .chartType = VtChChartType2dPie
                .Enabled = False
                .ColumnLabelCount = 0
                .RowLabelCount = 0
                
                With .Plot
                    .LocationRect.Max.Set (cell.clientWidth - 1) * 15, (cell.clientHeight - 1) * 15
                    .LocationRect.Min.Set 0, 0
                    '.PlotBase.BaseHeight = cell.clientHeight *  15 
                End With
                .Repaint = True
            End With
        Next j
    Next i
    Me.Visible = True
End Sub


Можно придать нехилый внешний вид своим приложухам, да и отчетики можно программно формировать произвольные. :))
Только не забывать вставлять в HTML-код разделители страниц, если это-отчет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:31
    #32250473
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Веревка оборвалась...

А таки гордость у акцессовцев есть!
Вон как попинали, когда усомнился в компетентности!

Продолжим разговор в таком случае...

Гео!
Локальное открытие не вопрос.
Знаешь ли ты что:
Команда Shell "iexplore" не запускает браузер!
Ей нужен полный путь.
Я его и указываю но это согласись не красиво.
Неизвестно как пойдет на других машинах.
И на машинах без ИЕ точно не пойдет. (мне известны случаи удаления его и пользование нетскейпом)

Лох!
А что это такое?
FollowHyperLink
Оно мне уже нравится, но что это!

Наконец, Дима!
Ты юзал этот компонент?
Лично у меня он не изменяет программно размеры. ...Width = ... не реагирует. А мои пользователи имеют дисплеи с совершенно разными разрешениями. Так я точно никому не угожу.

Вопрос остался открыт.

Лох, на тебя одна надежда...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:32
    #32250477
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Во вражеской Delphi ShellExecute запускает документы зарегистрированного типа.

А в любимом Accesse?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:40
    #32250497
incold
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
2 Жмурик\r
Чтобы обращали внимание нужно вопросы задавать более правильно, написал бы хочу открыть файл тем приложением, которое установлено в системе по умолчанию.\r
Быстрее бы ответили.\r
И еще есть поиск.\r
\r
Вот здесь обсуждалось
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:42
    #32250506
Alexus12
Alexus12
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
У безвременно почившего DOS есть команда
start filename.ext
которая открывает зарегистренные файлы.
Вот и пиши Shell ("start ...")!!!

А еще недавно уважаемый Сенин Виктор приводил пример использования API на ту же тему, поищи по "start".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:43
    #32250507
Alex Juice
Alex Juice
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
>А что это такое?
>FollowHyperLink

Дык то самое...
Код: plaintext
Application.FollowHyperlink  "C:\1 .htm"

откроет тебе этот файл в браузере
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 17:45
    #32250513
incold
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
И еще (пока Лох отлучился).

Если нужно открывать только ссылки, то вполне хватит предложенного Лохом метода

Что такое FollowHyperLink можно прочитать в справке
The FollowHyperlink method opens the document or Web page specified by a hyperlink address.

expression.FollowHyperlink(Address, SubAddress, NewWindow, AddHistory, ExtraInfo, Method, HeaderInfo)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 18:00
    #32250543
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Жмурик писал:Во вражеской Delphi ShellExecute запускает документы зарегистрированного типа.

Вообщето это API функция...
Можешь смело объявлять и юзать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 18:05
    #32250555
incold
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Да, бедняга, наверное уже не дышит, а его все пинают
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 18:36
    #32250600
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Спасибо, брацы!
Вопрос решен.

Век живи, век учись, толку нет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 19:35
    #32250660
fedd
fedd
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
>век живи...

- voodoo, voodoo, what you don't dare do people
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.08.2003, 21:28
    #32250725
Лифчик
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Ура! Жмурик живчиком оказался


...принесли его домой...оказался он живой...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2003, 07:29
    #32250824
vdimas
vdimas
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
2 Жмурик

Да, порой не изменяет размеры, если всякими Width и Height пользоваться. Однако есть еще способ.

Win32 API MoveWindow
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
'объявление в каком-нить модуле'
Public Declare Function MoveWindow Lib  "user32"  Alias  "MoveWindow"  (ByVal hwnd As Long, _
        ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, _
        ByVal bRepaint As Long) As Long

'в ресайзе:'

    MoveWindow myIE,  0 ,  0 , me.InternalWidth/ 15 , me.InternalHeight/ 15 , true
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2003, 14:00
    #32251421
Жмурик
Жмурик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как просмотреть HTML?
Дима

но у встроенного браузера нет свойства handle.
hwnd дает глюк.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как просмотреть HTML? / 21 сообщений из 21, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 339ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1679675]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 50ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 196ms
total:  339ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]