/****************************************************************************\ * * * Thanks.jfm -- Guest Book Entry Thank You Page * * * * Thanks.jfm is part of the Guest Book solution application. It is called by * * the Guest Book entry form (guest.jfm) after the user has submitted an * * entry to the guest book. It links them to the entries report (entries.jrp) * * or back to the home page. Take a look at the generatedHTML control. This * * is a custom control. Since many forms use this sort of comment at the * * bottom of the page, a custom control was created. * * * * Dependencies: gestbk31.gif * * homepg31.gif * * apps/shared/controls.cc * * * * Links to: ibapps/index.htm * * svr/intrasrv.isv?apps/guestbk/entries.jrp(1,1) * * * * Updated 11/12/96 by IntraBuilder Samples Group * * $Revision: 1.15 $ * * * * Copyright (c) 1996, Borland International, Inc. All rights reserved. * * * \****************************************************************************/ // {End Header} Do not remove this comment// // Generated on 11/12/96 // var f = new thanksForm(); f.open(); class thanksForm extends Form { _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC"); with (this) { color = "a4d5ff"; height = 14; left = 0; top = 0; width = 76; title = "Guest Book"; } with (this.rule1 = new Rule(this)){ top = 4; size = 2; right = 70; } with (this.rule2 = new Rule(this)){ top = 15; size = 2; right = 70; } with (this.guestBookLogo = new Image(this)){ height = 3.4167; width = 10.25; dataSource = "filename GESTBK31.GIF"; alignment = 4; } with (this.titleHTML = new HTML(this)){ height = 2; left = 12; width = 58; color = "steelblue"; text = '

Guest Book

'; } with (this.visitAgainHTML = new HTML(this)){ height = 2; top = 5; width = 70; color = "black"; text = "We hope that you are enjoying your visit to our site. Please visit us again."; } with (this.guestBookLinkImage = new Image(this)){ onImageClick = class::link_to_entries_page; height = 3.4167; top = 7; width = 10.25; dataSource = "filename GESTBK31.GIF"; alignment = 4; } with (this.guestBookLinkHTML = new HTML(this)){ height = 1; left = 12; top = 7; width = 58; color = "black"; text = "View the Guest Book Entries"; } with (this.homePageLinkImage = new Image(this)){ onImageClick = class::link_to_home_page; height = 3.4167; top = 11; width = 10.25; dataSource = "filename HOMEPG31.GIF"; alignment = 4; } with (this.homePageLinkHTML = new HTML(this)){ height = 1; left = 12; top = 11; width = 58; color = "black"; text = "Return to Home Page"; } with (this.generatedHTML1 = new GeneratedHTML(this)){ height = 1; top = 15.5; width = 70; } function link_to_home_page() { location.href="/ibapps/index.htm"; } function link_to_entries_page() { location.href="/svr/intrasrv.isv?apps/guestbk/entries.jrp(1,1)"; } }