home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1997 May
/
Pcwk0597.iso
/
borland
/
ib
/
setups
/
intrabld
/
data.z
/
KBLOGIN.JFM
< prev
next >
Wrap
Text File
|
1996-12-11
|
3KB
|
96 lines
/****************************************************************************\
* *
* KbLogin.jfm -- Knowledge Base Update Login Form *
* *
* KbLogin.jfm is part of the Knowledge Base prebuilt business solution. It *
* is called by the Knowledge Base Update form to provide login security. *
* If a correct user name and password are entered, the update form is opened.*
* This is made possible by setting two custom properties of the login form, *
* one is a SecurityManager object reference and the other is the update form *
* object reference. The security information can be viewed or modified by *
* running the apps\security\smadmin.jfm form. *
* *
* Dependencies: knowbs31.gif *
* paper_22.gif *
* apps\shared\controls.cc *
* apps\shared\security.jcf *
* *
* Updated 11/13/96 by IntraBuilder Samples Group *
* $Revision: 1.8 $ *
* *
* Copyright (c) 1996, Borland International, Inc. All rights reserved. *
* *
\****************************************************************************/
// {End Header} Do not remove this comment//
// Generated on 11/13/96
//
var f = new kbloginForm();
f.open();
class kbloginForm extends smLoginForm from (_sys.env.home() + "APPS\\SHARED\\SECURITY.JCF"){
_sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
with (this) {
color = "ffffc4";
height = 11;
left = 0;
top = 0;
width = 72;
title = "Knowledge Base Security";
background = "filename paper_22.gif";
}
with (this.rule1 = new Rule(this)){
top = 4;
size = 2;
right = 70;
pageno = 0;
}
with (this.rule2 = new Rule(this)){
top = 9.5;
size = 2;
right = 70;
pageno = 0;
}
with (this.KnowledgeBaseLogo = new Image(this)){
height = 3.4167;
width = 10.25;
dataSource = "filename KNOWBS31.GIF";
alignment = 4;
pageno = 0;
}
with (this.HeadingHTML = new HTML(this)){
height = 2;
left = 12;
width = 58;
color = "navy";
text = {||'<H1><FONT SIZE="+4"><FONT COLOR="maroon">L</FONT></FONT>ogin <FONT SIZE="+4"><FONT COLOR="maroon">R</FONT></FONT>equired</H1>'};
pageno = 0;
}
with (this.hintHTML = new HTML(this)){
height = 1;
left = 12;
top = 2;
width = 58;
color = "black";
text = "(Hint: Use Mark or JosΘ. Password matches user name.)";
}
with (this.GeneratedHTML1 = new GeneratedHTML(this)){
height = 1;
top = 10;
width = 70;
pageno = 0;
}
}