Page 1 of 1
delivered directly a HTML-code at the Shell.explorer ?
Posted: Tue Nov 21, 2006 11:31 am
by NK
Hello
Is it possible, to delivered directly a HTML-code at the Shell.explorer ?
Code: Select all
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
Posted: Tue Nov 21, 2006 3:39 pm
by Rochinha
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
Posted: Tue Nov 21, 2006 5:41 pm
by NK
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
Posted: Wed Nov 22, 2006 1:22 am
by Rochinha
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
Posted: Wed Nov 22, 2006 1:45 pm
by NK
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
Posted: Thu Nov 23, 2006 3:24 am
by Rochinha
Amiguinho
I understand now. External file is your best way.
Bye
