XProfan

Pour cette prends Du simple qui Télécharger-Unit.

03.05.2006 ▲

pouvoir cela pas Dein Browser ? - Mozilla Firefox zeigt den Voir le texte source qui grade geladenen page à: Ansicht -> Seitenquelltext Montrer -

04.05.2006 ▲

Frank
Abbing

Beim IE versteckt sich qui Funktion sous Ansicht/Voir le texte source.
je denke mais, Georg voudrais cela selber programmieren. alors la fois iFs Vorschlag testen.

04.05.2006 ▲

Georg
Hovenbitzer

allô zusammen,

vous avez alle droite

qui Unit de iF pouvoir eigentlich oui c'est ca cela quoi je voudrais, ABER vous scheitert à qui page là on sich là s'inscrire muss et qui wohl sur Sessions ID gemacht wird.
alors viens je avec cela pas plus.

il y a pour meiner attitude deux Opportunités:

1. wget ou bien curl soweit trop bekommen, dass vous sich einloggen et qui page tirer, cet ensuite auswerten.
ici ist cela Problem, dass je qui beiden Programme encore pas en supplément gebracht habe sich einzuloggen.

2. là je mir qui page dans dem Moment ansehe wohin je qui données aus dem Voir le texte source besoin, cherche je une Possibilité im Hintergrund qui Option des Browsers, den Voir le texte source trop montrer, trop nutzen.
on pourrait cela Browserfenster fernsteuern, quoi mir mais pas si bien comme (Tastaturcodes senden, im Editfenster alles markieren, kopieren et auswerten)

je hoffe es versteht einer quoi je là geschrieben habe et peux mir une Tip donner.

Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a)

04.05.2006 ▲

Clemens
Meier

Es venez sur cela Login à. tu peux toi avec qui PCU de iF aussi s'inscrire. ça dépend, si du une htaccess überwinden musst ou bien si un formulaire benutzt wird. et naturellement, dass du qui Logindaten la hâte.

dans beiden Fällen musst du qui URL quelque chose changement. Pour une htaccess devrait il comment folgt air:
[...]

Ist es un formulaire, musst du qui Zugangsdaten à qui URL tour hängen. Sähe ensuite so aus (je crois, qui PCU de iF akzeptiert Querys):
[...]

avec qui Session pourrait es aussi ne...aucune Problem donner. Akzeptiert qui Browser aucun Cookies, wird qui Sessionid chez chacun URL avec angehängt. So bekommst du vous alors. Musst alors dans den Voir le texte source voyons, dir qui Sessionid avec qui entsprechenden Variablen rauspicken et cet ensuite jeweils à deine URLs dranhängen.

XProfan 9.1; XP SP2; FF; Editpad

tu peux avec qui Unit qui Loginurl (php?) qui Logindaten per get senden - et erhältst une page quelle warscheinlich aussi qui SessionID im Source avons wird. Eigendlich ist cela quoi Du vouloir ne...aucune Problem, sei car, qui LoginPHP abverlangt qui Logindaten ausschließlich per poste statt per Get.

Clemens
Meier

Im letzteren piège pourrait il qui Procédure aus dem Fil [...]

benutzen. ensuite mais pas den gleichen faute faire comment je et oublier qc qui DLL einzubinden

XProfan 9.1; XP SP2; FF; Editpad

Uwe
''Pascal''
Niemeier

@ Georg: comment bzw. wohin peut du qui page Montrer? Normaler Browser ou bien HTML-Contrôle sous Profan?
dans letzterem le cas: comment erzeugst du es?

Möglicherweise gibt es une COM-Solution, ou bien on pourrait qui Dossier im Cache ausfindig faire...

SeeYou
Pascal

Georg
Hovenbitzer

allô zusammen,

déjà la fois vielen Dank pour qui Aider

je liebe cet Forum

je probiere es zur Zeit sur trois Opportunités.

1. per vieux.dll et einem AtlAxWin Contrôle
- avec cela habe je es geschaft qui page darzustellen. Hierbei wird ne...aucune Login nécessaire, là wohl cela Cookie benutzt wird et il sich avec cela automatisch einloggt.

2. per PCU de iF
- ici ca va eh bien aussi, quoi ebenso à dem Cookie liegt. cela zurück donner comme String haut chez cette page pas hin, je leite cette moins un MultiEdit plus et dabei verabschiedet sich cela ganze (chez google.de klappt es avec qui Anzeige). Abspeichern dans einer Dossier funktioniert.

3. Procédure vom Clemens
- cet haut pas entier hin, là cet wohl toujours seulement den ersten Frame nimmt. So sieht mir, dass quoi angezeit wird, aus.

il y a alors déjà une lösung worauf je aufbauen peux.

Es serait mich mais toujours intéresser si on den IE anzapfen peux um sich de là den Voir le texte source trop tirer.
Dadurch bräuchte on qui page pas doppelt aufzurufen, là je vous mir trop dem la date oui ansehe.

@Pascal
eh bien ca va avec beiden, alors IE et HTML Contrôle.
avec dem Cache J'ai eu mir aussi déjà überlegt, là si on sous dem Browser sich den Voir le texte source ansieht, steht oui là qui Dossier. ou bien wird qui dans diesem Moment seulement erstellt ? avec COM kenne je mich pas aus, mais peut-être la hâte du oui une concept.

Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a)

Uwe
''Pascal''
Niemeier

allô Georg!

ici un experimenteller Code, um aus einem ATL-WebContol den Voir le texte source trop ermitteln:
Kompilieren Marque Séparation

 $H Windows.ph
--------------------------------------------------------------------------------------------

proc StringToGUID---------------Umwandlung String > globally unique identifier

    parameters GUID$,GUID&
    declare Temp$
    Temp$=space$(80)
    ~MultiByteToWideChar(1,1,addr(GUID$),-1,addr(Temp$),80)
    external("ole32","CLSIDFromString",addr(Temp$),GUID&)
    endproc-----------------------------------------------------------------------

    proc CallMethod--------------------------Methode eines COM-Interfaces aufrufen

        parameters IFace&,Method&
        declare VTable&
        VTable&=long(IFace&,0)
        Method&=long(VTable&,Method&*4)
        case %pcount=2:return call( Method&,IFace& )
        case %pcount=3:return call( Method&,IFace&,&(3) )
        case %pcount=4:return call( Method&,IFace&,&(3),$(4) )
        case %pcount=5:return call( Method&,IFace&,&(3),&(4),&(5) )
        endproc-----------------------------------------------------------------------

        proc Quelltext_Lesen----------------------------Quelltext_Lesen---------------

            parameters WebCtrl&
            declare IID#,Error&
            dim IID#,16
            external("ole32","CoInitialize",0)
            print "ATL-WebControl",WebCtrl&
            print
            declare IUnknown&
            Error&=external("atl","AtlAxGetControl",WebCtrl&,addr(IUnknown&))
            print "Error AtlAxGetControl",Error&
            print "IUnknown",IUnknown&
            print
            declare IWebBrowser&
            StringToGUID("{D30C1661-CDAF-11d0-8A3E-00C04FC9E26E}",IID#)--IID_IWebBrowser2
            Error&=CallMethod(IUnknown&,0,IID#,addr(IWebBrowser&))-------IUnknown::QueryInterface
            print "Error IUnknown::QueryInterface",Error&
            print "IWebBrowser",IWebBrowser&
            print
            declare IHTMLDocument2&
            Error&=CallMethod(IWebbrowser&,18,addr(IHTMLDocument2&))--IWebbrowser::get_Document
            print "Error IWebbrowser::get_Document",Error&
            print "IHTMLDocument2",IHTMLDocument2&
            print
            declare IHTMLElement&
            Error&=CallMethod(IHTMLDocument2&,9,addr(IHTMLElement&))--IHTMLDocument2::get_body
            print "Error IHTMLDocument2::get_body",Error&
            print "IHTMLElement",IHTMLElement&
            print
            declare Text&
            Error&=CallMethod(IHTMLElement&,62,addr(Text&))--IHTMLElement::get_outerHTML
            print "Error IHTMLElement::get_outerHTML",Error&
            print "Pointer outerHTML",Text&
            declare Size&,Text#,Text$
            Size&=external("oleaut32","SysStringLen",Text&)
            dim Text#,Size&
            ~WideCharToMultiByte(0,0,Text&,-1,Text#,Size&,0,0)
            external("oleaut32","SysFreeString",Text&)
            Text$=string$(Text#,0)
            dispose Text#
            dispose IID#
            external("ole32","CoUninitialize")
            return Text$
            endproc-----------------------------------------------------------------------
            --------------------------------------------------------------------------------------------
            window 0,0-800,600
            usermessages 16
            def AtlAxWinInit(0) !"atl.dll","AtlAxWinInit"
            def AtlAxCreateControl(4) !"atl.dll","AtlAxCreateControl"
            declare Atl&,Web&,a$
            Atl&=usedll("atl.dll")
            AtlAxWinInit()
            a$="C:Test.html"-----------Pfad oder URL
            Web&=control("AtlAxWin",a$,$50300000,400,0,380,250,%hwnd,0,0,$200)-HTML-Contol anlegen
            a$=Quelltext_Lesen(Web&)
            create("Multiedit",%hwnd,a$,0,290,780,250)----Text anzeigen

            while 1

                waitinput
                case %umessage=16:break

            endwhile

            destroywindow(Web&)

freedll Atl&

qui le crochet daran: Du erwähntest Frames... dans dem le cas wirst du seulement den Frameset angezeigt kriegen, es sei car, tu peux qui gewünschte page direct anspringen.

je werde mais encore pour den anderen Opportunités schaun

BTW: Wird den qui besagte page überhaupt im Cache abgelegt (si vous sicherheitsrelevant ist, peux cela doch aussi unterdrückt volonté)?

HTH
Pascal

06.05.2006 ▲

Georg
Hovenbitzer

allô Pascal,

qui Code klappt avec deux kleinen Changements très bien.
Dem Multiedit sollte on den le contenu par mess zukommen laisser, là qui meisten Seiten plus que 255 marque avons.
Desweiteren habe je pour dem AtlAxWin Contrôle Aufruf un Waitinput gesetzt, là es si le page encore pas vollständig geladen wurde trop einem Systemfehler venez.

je connais mich avec COM pas du tout aus, venez on eh bien à cela original Browserfenster ran ou bien muss on sich toujours un eigenes erstellen?

Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a)

08.05.2006 ▲