[Gambas-user] Bug in FExplorer
Peter
k-p.richter at ...20...
Wed Aug 18 23:50:38 CEST 2004
Hallo Benoit,
FExplorer say 'Broken link ...' by intern link in helpfiles (...html#link)
because of:
IF Exist(sLink) THEN
in SUB GotoLink(...)
My provisional change (without check for intern link):
IF sLink LIKE "http://*" THEN
sExec = Application.Env["BROWSER"]
IF NOT sExec THEN sExec = "mozilla"
SHELL sExec & " " & Chr$(34) & sLink & Chr$(34)
ELSE
'----------Ri 08.04
iPos = Instr(sLink, ".html#")
IF iPos THEN
sText = Left(sLink, iPos + 4)
ELSE
sText = sLink
ENDIF
IF Exist(sText) THEN ' for IF Exist(sLink) then
'-----------
etc
Regards
Peter
More information about the User
mailing list