home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / ib / setups / intrabld / data.z / THANKS.JFM < prev    next >
Text File  |  1996-12-11  |  5KB  |  141 lines
  1. /****************************************************************************\
  2. *                                                                            *
  3. * Thanks.jfm  --  Guest Book Entry Thank You Page                            *
  4. *                                                                            *
  5. * Thanks.jfm is part of the Guest Book solution application. It is called by *
  6. * the Guest Book entry form (guest.jfm) after the user has submitted an      *
  7. * entry to the guest book. It links them to the entries report (entries.jrp) *
  8. * or back to the home page. Take a look at the generatedHTML control. This   *
  9. * is a custom control. Since many forms use this sort of comment at the      *
  10. * bottom of the page, a custom control was created.                          *
  11. *                                                                            *
  12. * Dependencies:  gestbk31.gif                                                *
  13. *                homepg31.gif                                                *
  14. *                apps/shared/controls.cc                                     *
  15. *                                                                            *
  16. * Links to:      ibapps/index.htm                                            *
  17. *                svr/intrasrv.isv?apps/guestbk/entries.jrp(1,1)              *
  18. *                                                                            *
  19. * Updated 11/12/96 by IntraBuilder Samples Group                             *
  20. * $Revision:   1.15  $                                                       * 
  21. *                                                                            *
  22. * Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
  23. *                                                                            *
  24. \****************************************************************************/
  25.  
  26. // {End Header} Do not remove this comment//
  27. // Generated on 11/12/96
  28. //
  29. var f = new thanksForm();
  30. f.open();
  31. class thanksForm extends Form {
  32.    _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC");
  33.    with (this) {
  34.       color = "a4d5ff";
  35.       height = 14;
  36.       left = 0;
  37.       top = 0;
  38.       width = 76;
  39.       title = "Guest Book";
  40.    }
  41.  
  42.  
  43.    with (this.rule1 = new Rule(this)){
  44.       top = 4;
  45.       size = 2;
  46.       right = 70;
  47.  
  48.    }
  49.  
  50.    with (this.rule2 = new Rule(this)){
  51.       top = 15;
  52.       size = 2;
  53.       right = 70;
  54.  
  55.    }
  56.  
  57.    with (this.guestBookLogo = new Image(this)){
  58.       height = 3.4167;
  59.       width = 10.25;
  60.       dataSource = "filename GESTBK31.GIF";
  61.       alignment = 4;
  62.  
  63.    }
  64.  
  65.    with (this.titleHTML = new HTML(this)){
  66.       height = 2;
  67.       left = 12;
  68.       width = 58;
  69.       color = "steelblue";
  70.       text = '<H1><FONT SIZE="+4"><FONT COLOR="mediumvioletred">G</FONT></FONT>uest <FONT SIZE="+4"><FONT COLOR="mediumvioletred">B</FONT></FONT>ook</H1>';
  71.  
  72.    }
  73.  
  74.    with (this.visitAgainHTML = new HTML(this)){
  75.       height = 2;
  76.       top = 5;
  77.       width = 70;
  78.       color = "black";
  79.       text = "We hope that you are enjoying your visit to our site. Please visit us again.";
  80.  
  81.    }
  82.  
  83.    with (this.guestBookLinkImage = new Image(this)){
  84.       onImageClick = class::link_to_entries_page;
  85.       height = 3.4167;
  86.       top = 7;
  87.       width = 10.25;
  88.       dataSource = "filename GESTBK31.GIF";
  89.       alignment = 4;
  90.  
  91.    }
  92.  
  93.    with (this.guestBookLinkHTML = new HTML(this)){
  94.       height = 1;
  95.       left = 12;
  96.       top = 7;
  97.       width = 58;
  98.       color = "black";
  99.       text = "<A HREF='/svr/intrasrv.isv?apps/guestbk/entries.jrp(1,1)'>View the Guest Book Entries</A>";
  100.  
  101.    }
  102.  
  103.    with (this.homePageLinkImage = new Image(this)){
  104.       onImageClick = class::link_to_home_page;
  105.       height = 3.4167;
  106.       top = 11;
  107.       width = 10.25;
  108.       dataSource = "filename HOMEPG31.GIF";
  109.       alignment = 4;
  110.  
  111.    }
  112.  
  113.    with (this.homePageLinkHTML = new HTML(this)){
  114.       height = 1;
  115.       left = 12;
  116.       top = 11;
  117.       width = 58;
  118.       color = "black";
  119.       text = "<A HREF='/ibapps/index.htm'>Return to Home Page</A>";
  120.  
  121.    }
  122.  
  123.    with (this.generatedHTML1 = new GeneratedHTML(this)){
  124.       height = 1;
  125.       top = 15.5;
  126.       width = 70;
  127.  
  128.    }
  129.  
  130.    function link_to_home_page()
  131.    {
  132.       location.href="/ibapps/index.htm";
  133.    }
  134.  
  135.    function link_to_entries_page()
  136.    {
  137.       location.href="/svr/intrasrv.isv?apps/guestbk/entries.jrp(1,1)";
  138.    }
  139.  
  140. }
  141.