Charlie
  To diagnose your html, just open the html in your browser, right click on the 
page and select "View Source", then search for your "Graphic File Names" and 
see how the actual path is shown in the browser.  This will give you a hint as 
to how you should specify the path you are passing.  The only way they aren't 
shown is they aren't found.



----- Original Message ----- 
From: "Charles Parks" <[EMAIL PROTECTED]>
To: "RBASE-L Mailing List" <[email protected]>
Sent: Wednesday, January 30, 2008 6:19 PM
Subject: [RBASE-L] - Re: Variable Web Browser


I still seem to be having some problems with the different graphics.

Here is what I did:
SET VAR vReportOutput = 'html'

SET VAR vReportName = 'BGGlossary'

 SET VAR vWhere = ('Where (BGWord contains' +
      & (CHAR(39)) + .fSearch + (CHAR(39)) +
      & 'or BgDefinition contains' & (CHAR(39)) + .fSearch + (CHAR(39)) +
      & 'or Library contains' & (CHAR(39)) + .fSearch + (CHAR(39)) +
      + ')' +
      & 'order by Library, BGWord')

   SET VAR vChkFile = (CHKFILE('HTML'))
  IF vChkFile <> 1 THEN
   MKDIR HTML
  ENDIF

  SET VAR vChkFile = (CHKFILE('HTML\Images'))
  IF vChkFile <> 1 THEN
   MKDIR html\images

   COPY \\...\graphics\uparrow.gif html\images
      COPY \\...\graphics\rightarrow.gif html\images
         COPY \\....\graphics\downarrow.gif html\images
            COPY \\...\graphics\leftarrow.gif html\images

  ENDIF

  SET VAR vreportoption = 'OPTION HTML'
  SET VAR vreportfilename = (.vScratch + '\' + .vReportName+'.HTML')

  SET VAR vreportparameters = ('|FILENAME'&.vreportfilename +
       + '|BACKGROUND_COLOR WHITE|AUTHOR' & (LUC(.vUser)) +
       + '|Include_Shapes On' +
       + '|Include_Images On' +
       + '|IMAGE_FOLDER Images' +
       + '|LINK_IMG_FILE_FIRST html\Images\UpArrow.gif' +
       + '|LINK_IMG_FILE_PREV Images\LeftArrow.gif' +
       + '|LINK_IMG_FILE_NEXT Images\RightArrow.gif' +
       + '|LINK_IMG_FILE_LAST Images\DownArrow.gif' +
       + '|SHOW_CANCEL_DIALOG OFF')

  SET VAR vreportshow = '|OPEN OFF'

SET VAR vReportSyntax = +
     ('PRINT' &.vReportName & .vWhere & .vreportoption +.vreportparameters 
+.vreportshow)


Which yields
PRINT BGGlossary Where (BGWord contains 'Benchmark' or BgDefinition contains 
'Benchmark' or Library contains 'Benchmark') order by Library, BGWord OPTION 
HTML|FILENAME C:\DOCUME~1\cpo\LOCALS~1\Temp\BGGlossary.HTML|BACKGROUND_COLOR 
WHITE|AUTHOR CPO|Include_Shapes On|Include_Images On|IMAGE_FOLDER 
Images|LINK_IMG_FILE_FIRST html\Images\UpArrow.gif|LINK_IMG_FILE_PREV 
Images\LeftArrow.gif|LINK_IMG_FILE_NEXT 
Images\RightArrow.gif|LINK_IMG_FILE_LAST 
Images\DownArrow.gif|SHOW_CANCEL_DIALOG OFF|OPEN OFF

&vReportSyntax then creates the report in the Variable Web Browser but the new 
grapichs aren't in place.

-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of A. Razzak Memon
Posted At: Wednesday, January 30, 2008 4:27 PM
Posted To: RB7-L
Conversation: [RBASE-L] - Re: Variable Web Browser
Subject: [RBASE-L] - Re: Variable Web Browser


At 05:15 PM 1/30/2008, Charles Parks wrote:

>I have a html report created that I display in the form's Variable Web
>Browser.  Sometimes the report expands multiple pages. Is there a way
>to changes the "pencil in hand" image for page changes to arrows like
>they are in the DB Navigator?

Charlie,

Ask and you shall receive!

Use the LINK_IMG_FILE_FIRST, LINK_IMG_FILE_PREV, LINK_IMG_FILE_NEXT, and 
LINK_IMG_FILE_LAST options to customize and use your own images.

Here's how:

-- Start here ...
IF (CVAL('DATABASE')) <> 'RRBYW14' OR (CVAL('DATABASE')) IS NULL THEN
    CONNECT RRBYW14 IDENTIFIED BY NONE
ENDIF
SET VAR vChkFile = (CHKFILE('HTML'))
IF vChkFile <> 1 THEN
    MD HTML
ENDIF
-- Verify the existence of HTML\Images Sub-Directory
    SET VAR vChkFile = (CHKFILE('HTML\Images')) IF vChkFile <> 1 THEN
    MD HTML\Images
ENDIF
-- Now print the report
CLS
PRINT SalesSumAndSubTot +
OPTION HTML +
|FILENAME HTML\SalesSumAndSubTot.htm +
|SHOW_CANCEL_DIALOG ON +
|BACKGROUND_FILE NONE +
|BACKGROUND_TYPE CENTER +
|BACKGROUND_COLOR WHITE +
|INCLUDE_LINES ON +
|INCLUDE_SHAPES ON +
|INCLUDE_RICHTEXT OFF +
|RICHTEXT_ENCODING_TYPE PLAINTEXT +
|INCLUDE_IMAGES ON +
|IMAGE_FORMAT JPG +
|JPEG_QUALITY 100 +
|IMAGE_DPI -1 +
|PIXELFORMAT 24 +
|INCLUDE_HYPERLINKS ON +
|TITLE Customer Sales Sub-Totals and Totals + SUBJECT ConComp Sales
|Summary Report + AUTHOR Accounting Team of ConComp + KEYWORDS
|Sub-Totals Totals Sales Summary + OPTIMIZE_FOR_IE ON + PAGE_END_LINES
|ON + OUTPUT_STYLES_TO_CSS_FILE ON + CSSFILE +
|OUTPUT_SCRIPTS_TO_JAVA_SCRIPT_FILE ON + JAVA_SCRIPT_FILE_NAME +
|GENERATE_TOC ON + TOC_FILE_NAME Index.htm + IMAGE_FOLDER Images +
|DEFAULT_FONT_NAME Verdana + DEFAULT_FONT_SIZE 9 + DEFAULT_FONT_COLOR
|BLACK + DEFAULT_FONT_BOLD OFF + DEFAULT_FONT_ITALIC OFF +
|DEFAULT_FONT_UNDERLINE OFF + DEFAULT_FONT_STRIKEOUT OFF +
|SEP_FILE_PER_PAGE ON + NAV_SHOW ON + LINK_BACK_COLOR WHITE +
|LINK_H_BACK_COLOR BLUE + LINK_H_FORE_COLOR WHITE + USE_TEXT_LINKS OFF +
|LINK_TEXT_FIRST First + LINK_TEXT_PREV Previous + LINK_TEXT_NEXT Next +
|LINK_TEXT_LAST Last + LINK_FONT_NAME Wingdings + LINK_FONT_SIZE 10 +
|LINK_FONT_COLOR BLUE + LINK_FONT_BOLD OFF + LINK_FONT_ITALIC OFF +
|LINK_FONT_UNDERLINE OFF + LINK_FONT_STRIKEOUT OFF + LINK_IMG_FILE_FIRST
|Images\FirstOff.gif + LINK_IMG_FILE_PREV Images\PrevOff.gif +
|LINK_IMG_FILE_NEXT Images\NextOff.gif + LINK_IMG_FILE_LAST
|Images\LastOff.gif + NAV_TYPE PAGE + NAV_ORIENT HORIZONTAL + NAV_POS
|BOTTOMCENTER + DISABLE_RIGHT_CLICK OFF + DISABLE_COPYING OFF +
|AUTO_MAXIMIZE_WINDOW ON + OPEN ON
RETURN
-- End here ...

Enjoy and make sure to have fun!

Very Best R:egards,

Razzak.


Reply via email to