Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Otwieranie pliku
mikmas
From Łódź Stadt




Typ: neutral
Postów: 772
Zarejestrowany: Apr 2003
Otwieranie pliku

Mam kontrolkę shdocvw. Otwiera ona html'e z dysku. Jak skopiować zawartość pliku, do którego odwołuje się link kliknięty przez usera?


_____________________________________________
4C;65;70;69;65;6A;20;62;79;9C;20;73;69;EA;20;
62;61;72;64;7A;69;65;6A;20;73;6B;6F;6E;63;65;
6E;74;72;6F;77;61;B3;20;6E;61;20;6F;64;70;6F;
77;69;65;64;7A;69;2C;20;61;20;6E;69;65;20;6E;
61;20;72;6F;7A;73;7A;79;66;72;6F;77;79;77;61;
6E;69;75;20;3A;50

15-03-2005 20:00
Pokaż profil mikmas  Wyślij email do mikmas   Odwiedź stronę mikmas       3632553
Jelcyn
Admin forum




Typ: admin
Postów: 895
Zarejestrowany: Apr 2002

nie do końca wiem o co Ci chodzi. Aby przechwycić nazwę linku w jaki klika user możesz dać coś takiego:

Private Sub Form_Load()
Web.Navigate ("f:/bat/ss.htm"
End Sub

Private Sub Web_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
    MsgBox URL
End Sub


z tym, że jak na stronie są IFRAMKI to mi wyświetla się komunikat również dla IFRAMEK.

A jak pobrać źródło strony? Ja gdzieś na tym forum znalazłem odpowiedni kawałek kodu, przerobiłem go do jakiegoś swojego programu i ostatecznie u mnie tak wygląda:

            Do Until WEB1.ReadyState = READYSTATE_COMPLETE
                DoEvents
            Loop
                   
            Z = WEB1.Document.body.innerHTML


_____________________________________________
Jelcyn
vb4all(małpka)canpol.pl
http://www.coderscity.pl/no-vb4all * http://www.jelcyn.com

17-03-2005 11:05
Pokaż profil Jelcyn  Wyślij email do Jelcyn   Odwiedź stronę Jelcyn       270849979    6237704
mikmas
From Łódź Stadt




Typ: neutral
Postów: 772
Zarejestrowany: Apr 2003

Właśnie o to mi chodziło! Thx!


_____________________________________________
4C;65;70;69;65;6A;20;62;79;9C;20;73;69;EA;20;
62;61;72;64;7A;69;65;6A;20;73;6B;6F;6E;63;65;
6E;74;72;6F;77;61;B3;20;6E;61;20;6F;64;70;6F;
77;69;65;64;7A;69;2C;20;61;20;6E;69;65;20;6E;
61;20;72;6F;7A;73;7A;79;66;72;6F;77;79;77;61;
6E;69;75;20;3A;50

17-03-2005 13:09
Pokaż profil mikmas  Wyślij email do mikmas   Odwiedź stronę mikmas       3632553
Wszystkich odpowiedzi: 2 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1