delivered directly a HTML-code at the Shell.explorer ?

NK · Post by NK » Tue Nov 21, 2006 11:31 am

Hello

Is it possible, to delivered directly a HTML-code at the Shell.explorer ?

         oActiveX = TActiveX():New( oDlg, "Shell.Explorer" )
         oActiveX:SetProp( "ToolBar", .T. )
         oActiveX:SetProp( "StatusBar", .T. )
         oActiveX:SetProp( "MenuBar", .T. )
         oActiveX:SetProp( "Visible", .T. )
         cHtmlCode := '<a href="http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>'
 ?????????
         oDlg:oClient = oActiveX

Best Regards, Norbert

Rochinha · Post by **Rochinha** » Tue Nov 21, 2006 3:39 pm

Amiguinho

É possivel sim:

Code: Select all

cURLHtml := [http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>]
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" 
           oActiveX = TActiveX():New( oWnd, "Shell.Explorer.2" )
           oWnd:oClient = oActiveX
           oActiveX:Do("Navigate2",cURLHtml)
   ACTIVATE WINDOW oWnd

NK · Post by NK » Tue Nov 21, 2006 5:41 pm

Rochinha wrote:Amiguinho

É possivel sim:

Code: Select all

cURLHtml := [http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>]
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" 
           oActiveX = TActiveX():New( oWnd, "Shell.Explorer.2" )
           oWnd:oClient = oActiveX
           oActiveX:Do("Navigate2",cURLHtml)
   ACTIVATE WINDOW oWnd

Example 1 does not function
IExporer Message "Action interrupted was able to produce Internet Explorer no connection to the requested web page. Possibly it is temporarily not available."
e )

Code: Select all

        cLink := [<a href="http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>]
        oActiveX = TActiveX():New( oDlg, "Shell.Explorer.2" )
        oDlg:oClient = oActiveX
        oActiveX:Do("Navigate2",cLink)

Example 2 works, but I would like to generate not each time a file.
e )

Code: Select all

        cLink := [<a href="http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>]
        memowrite("C:\alpha-VIS\TEMP\x.html",cLink)

        oActiveX = TActiveX():New( oDlg, "Shell.Explorer" )
        oDlg:oClient = oActiveX
        cLinkFile := "file:///C:/alpha-vis/temp/x.html"
        oActiveX:DO( "Navigate", cLinkFile)

any other ideas ?

Regards, Norbert

Rochinha · Post by **Rochinha** » Wed Nov 22, 2006 1:22 am

Amiguinho

Look this

This works fine

Code: Select all

#include "fivewin.ch"

function main
cURLHtml := [http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562]
//" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>] 
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" 
       oActiveX = TActiveX():New( oWnd, "Shell.Explorer.2" ) 
       oWnd:oClient = oActiveX 
       oActiveX:Do("Navigate2",cURLHtml) 
ACTIVATE WINDOW oWnd

NK · Post by NK » Wed Nov 22, 2006 1:45 pm

Rochinha wrote:Amiguinho

Look this

This works fine

Code: Select all

#include "fivewin.ch"

function main
cURLHtml := [http://www.wetter.com/home/extern/ex_search.php?ms=1&ss=1&sss=2&search=90562]
//" target="_blank"><img src="http://www.wetter.com/home/woys/woys.php?,F,1,DEPLZ,90562" border="0" alt=""></a>] 
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support" 
       oActiveX = TActiveX():New( oWnd, "Shell.Explorer.2" ) 
       oWnd:oClient = oActiveX 
       oActiveX:Do("Navigate2",cURLHtml) 
ACTIVATE WINDOW oWnd

With the url alone it does go agrees naturally, the representation then simply.

Only with the URL:
http://www.alphasoft.de/test/bad.bmp

with full html-Code:

There is codes of different bidders for the own homepages. I would like to use that. Then I must would go simply the way over the external File.

Thank you very much for your aid.

Norbert

Rochinha · Post by **Rochinha** » Thu Nov 23, 2006 3:24 am

Amiguinho

I understand now. External file is your best way.

Bye