Ça sent le brûlé !

rem ============================================================================
dim url$
full_space 0
url$ = "http://s3.e-monsite.com/2010/11/06/73324985piece-swf.swf"
Creer_Browser()
end
rem ============================================================================
SUB Creer_Browser()
    dim_local WB%,res%
    dll_on "kgf" : ' Adapter le chemin
    WB% = dll_call1("WB_Create",handle(0))
    res% = dll_call5("WB_Locate",WB%,20,20,width_client(0)-50,height_client(0)-50)
    res% = dll_call2("WB_Url",WB%,adr(url$))
END_SUB
rem ============================================================================