Problem with form validation

mosow · Jul 19, 2004

I had posted this earlier as part of another message rather than as a
new post.

I have a form that I have created using FP 2000. I change the text
box to validate the entry. When bringing up the page in my browser
from our web server, I get the following message:

'DB1' is null or not an object

This is the name of the field I am trying to validate. I have
included the HTML below.

Any idea on why this is happening and how to correct?

TIA

I can not give you a URL as this is part of an internal site. The
code is below, generated by FrontPage:

<html>

<head>
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Release Date Comparison</title>
</head>

<body>

<a
href="rms_reports.htm">Return
to Report Menu</a>               
Date: <script language="VBScript">
document.write(FormatDateTime(Date(),0))</script>
           
Time: <script language="VBScript">
document.write(FormatDateTime(Time(),0))</script>

Release
Date Comparison

<script Language="JavaScript">
function FrontPage_Form1_Validator(theForm)
{

var checkOK = "0123456789-.,";
var checkStr = theForm.DB1.value;
var allValid = true;
var decPoints = 0;
var allNum = "";
for (i = 0; i < checkStr.length; i++)
{
ch = checkStr.charAt(i);
for (j = 0; j < checkOK.length; j++)
if (ch == checkOK.charAt(j))
break;
if (j == checkOK.length)
{
allValid = false;
break;
}
if (ch == ".")
{
allNum += ".";
decPoints++;
}
else if (ch != ",")
allNum += ch;
}
if (!allValid)
{
alert("Please enter only digit characters in the \"DB1\" field.");
theForm.DB1.focus();
return (false);
}

if (decPoints > 1)
{
alert("Please enter a valid number in the \"DB1\" field.");
theForm.DB1.focus();
return (false);
}
return (true);
}
//--></script>

<script
Language="JavaScript"></script><form
BOTID="0" METHOD="POST" ACTION="DateComparison1.asp" onsubmit="return
FrontPage_Form1_Validator(this)" name="FrontPage_Form1">
<table BORDER="0">
<tr>
<td>Prior Database:</td>
<td><input NAME="DB1"
VALUE="<%=Request("DB1")%>" size="20"></td>
</tr>
<tr>
<td>Prior Release:</td>
<td><input NAME="PV1" VALUE="<%=Request("PV1")%>"
size="20"></td>
</tr>
<tr>
<td>Current Database:</td>
<td><input NAME="DB2" VALUE="<%=Request("DB2")%>"
size="20"></td>
</tr>
<tr>
<td>Current Release:</td>
<td><input NAME="PV2" VALUE="<%=Request("PV2")%>"
size="20"></td>
</tr>
</table>
 
<input TYPE="Submit"><input TYPE="Reset">
</form>
<table width="815" border="1">
<thead>
<tr>
<td width="155">Object Family</td>
<td width="58" align="left">Object</td>
<td width="71" align="center">Prior 
Database</td>
<td width="62" align="center">Prior 
Version</td>
<td width="102" align="center">Prior Date 
Compiled</td>
<td width="71" align="center">Current 
Database</td>
<td width="62" align="center">Current 
Version</td>
<td width="102" align="center">Current  Date 
 Compiled</td>
<td width="104" align="center">Host 
System</td>
</tr>
</thead>
<tbody>
<!--webbot bot="DatabaseRegionStart" startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-columntypes="200,200,2,200,200,2,200,200,200,200"
s-dataconnection="RMS97"
b-tableformat="TRUE" b-menuformat="FALSE" s-menuchoice="Object
Family Name"
s-menuvalue="Object Family Name" b-tableborder="TRUE"
b-tableexpand="TRUE"
b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE"
i-ListFormat="0" b-makeform="TRUE"
s-recordsource="Date_Compare_Single"
s-displaycolumns="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem"
s-criteria="{Database Release 1} EQ {DB1} + {Product Version 1} EQ
{PV1} + {Database Release 2} EQ {DB2} + {Product Version 2} EQ {PV2}
+"
s-order
s-sql="SELECT * FROM Date_Compare_Single WHERE (&quot;Database
Release 1&quot; = :

B1:: AND &quot;Product Version
1&quot; = :

V1:: AND &quot;Database Release 2&quot; =
:

B2:: AND &quot;Product Version 2&quot; = :

V2:

"
b-procedure="FALSE" clientside SuggestedExt="asp"
s-DefaultFields="DB1=0&amp;PV1=0&amp;DB2=0&amp;PV2=0"
s-NoRecordsFound="No records returned." i-MaxRecords="0"
i-GroupSize="0"
BOTID="0" u-dblib="_fpclass/fpdblib.inc"
u-dbrgn1="_fpclass/fpdbrgn1.inc"
u-dbrgn2="_fpclass/fpdbrgn2.inc" tag="TBODY"
local_preview="<tr><td colspan=64
bgcolor="#FFFF00" align="left"
width="100%">Database Results regions will not preview
unless this page is fetched from a Web server with a web browser. The
following table row will repeat once for every record returned by the
query.</td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00"
align="left" width="100%">This is the start of a Database Results
region. The page must be fetched from a web server with a web browser
to display correctly; the current web is stored on your local disk or
network.</td></tr>"
b-WasTableFormat="TRUE" b-ReplaceDatabaseRegion="FALSE"
-->
<%
fp_sQry="SELECT * FROM Date_Compare_Single WHERE (""Database Release
1"" = :

B1:: AND ""Product Version 1"" = :

V1:: AND ""Database
Release 2"" = :

B2:: AND ""Product Version 2"" = :

V2:

"
fp_sDefault="DB1=0&PV1=0&DB2=0&PV2=0"
fp_sNoRecords="<tr><td colspan=9 align=left width=""100%"">No records
returned.</td></tr>"
fp_sDataConn="RMS97"
fp_iMaxRecords=0
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice="Object Family Name"
fp_sMenuValue="Object Family Name"
fp_iDisplayCols=9
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>


<tr>
<td width="155"><%=FP_FieldVal(fp_rs,"Object Family Name")%>
</td>
<td width="58" align="left"><%=FP_FieldVal(fp_rs,"Object Name")%>
</td>
<td width="71" align="center"><%=FP_FieldVal(fp_rs,"Database Release 1")%>
</td>
<td width="62" align="center"><%=FP_FieldVal(fp_rs,"Product Version 1")%>
</td>
<td width="102" align="center"><%=FP_FieldVal(fp_rs,"Enterprise Date Compiled 1")%>
</td>
<td width="71" align="center"><%=FP_FieldVal(fp_rs,"Database Release 2")%>
</td>
<td width="62" align="center"><%=FP_FieldVal(fp_rs,"Product Version 2")%>
</td>
<td width="102" align="center"><%=FP_FieldVal(fp_rs,"Enterprise Date Compiled 2")%>
</td>
<td width="104" align="center"><%=FP_FieldVal(fp_rs,"HostSystem")%>
</td>
</tr>


</tbody>
</table>

</body>

</html>

Jim Buyens · Jul 19, 2004

I wasn't able to reproduce your results because I don't
have a copy of your database, and I don't have an
installed copy of FrontPage 2000.

However, I tried a similar scenario with the Northwinds
database and FP2003, and the problem didn't occur. That
is, I tried setting a form field criteria, letting
FrontPage create the form, applying form field validation
to a text box, and then running the page. It worked.

You might have some luck *not* having the DRW create the
form, and instead creating your own form by hand. If that
doesn't do it, you can try upgrading to Office 2000 SP3,
or upgrading to FrontPage 2003.

If a co-worker or someone else nearby has FP2003, you
might try opening the page, rerunning the DRW, saving, and
testing.

Jim Buyens
Microsoft FrontPage MVP
http://www.interlacken.com
Author of:
*----------------------------------------------------
|\---------------------------------------------------
|| Microsoft Office FrontPage 2003 Inside Out
||---------------------------------------------------
|| Web Database Development Step by Step .NET Edition
|| Microsoft FrontPage Version 2002 Inside Out
|| Faster Smarter Beginning Programming
|| (All from Microsoft Press)
|/---------------------------------------------------
*----------------------------------------------------

-----Original Message-----
I had posted this earlier as part of another message rather than as a
new post.

I have a form that I have created using FP 2000. I change the text
box to validate the entry. When bringing up the page in my browser
from our web server, I get the following message:

'DB1' is null or not an object

This is the name of the field I am trying to validate. I have
included the HTML below.

Any idea on why this is happening and how to correct?

TIA

I can not give you a URL as this is part of an internal site. The
code is below, generated by FrontPage:

<html>

<head>
<meta http-equiv="Content-Type" content="text/html;
charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Release Date Comparison</title>
</head>

<body>

<a
href="rms_reports.htm">Return
to Report Menu</a> 
Date: <script language="VBScript">
document.write(FormatDateTime(Date(),0))</script>

Time: <script language="VBScript">
document.write(FormatDateTime(Time(),0))</script>

Release
Date Comparison

<script Language="JavaScript">
function FrontPage_Form1_Validator(theForm)
{

var checkOK = "0123456789-.,";
var checkStr = theForm.DB1.value;
var allValid = true;
var decPoints = 0;
var allNum = "";
for (i = 0; i < checkStr.length; i++)
{
ch = checkStr.charAt(i);
for (j = 0; j < checkOK.length; j++)
if (ch == checkOK.charAt(j))
break;
if (j == checkOK.length)
{
allValid = false;
break;
}
if (ch == ".")
{
allNum += ".";
decPoints++;
}
else if (ch != ",")
allNum += ch;
}
if (!allValid)
{
alert("Please enter only digit characters in the \"DB1 \" field.");
theForm.DB1.focus();
return (false);
}

if (decPoints > 1)
{
alert("Please enter a valid number in the \"DB1\" field.");
theForm.DB1.focus();
return (false);
}
return (true);
}
//--></script>

</script><input NAME="DB1"
VALUE="<%=Request("DB1")%>" size="20"></td>
</tr>
<tr>
<td>Prior Release:</td>
<td><input NAME="PV1" VALUE="<%=Request("PV1")%>"
size="20"></td>
</tr>
<tr>
<td>Current Database:</td>
<td><input NAME="DB2" VALUE="<%=Request("DB2")%>"
size="20"></td>
</tr>
<tr>
<td>Current Release:</td>
<td><input NAME="PV2" VALUE="<%=Request("PV2")%>"
size="20"></td>
</tr>
</table>
 
<input TYPE="Submit"><input TYPE="Reset">
</form>
<table width="815" border="1">
<thead>
<tr>
<td width="155">Object Family</td>
<td width="58" align="left">Object</td>
<td width="71" align="center">Prior 
Database</td>
<td width="62" align="center">Prior 
Version</td>
<td width="102" align="center">Prior Date 
Compiled</td>
<td width="71" align="center">Current 
Database</td>
<td width="62" align="center">Current 
Version</td>
<td width="102" align="center">Current Date 
Compiled</td>
<td width="104" align="center">Host 
System</td>
</tr>
</thead>
<tbody>

<%
fp_sQry="SELECT * FROM Date_Compare_Single WHERE (""Database Release
1"" = :B1:: AND ""Product Version 1"" = :V1:: AND ""Database
Release 2"" = :B2:: AND ""Product Version 2"" = :V2:"
fp_sDefault="DB1=0&PV1=0&DB2=0&PV2=0"
fp_sNoRecords="<tr><td colspan=9 align=left width=""100%"">No records
returned.</td></tr>"
fp_sDataConn="RMS97"
fp_iMaxRecords=0
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice="Object Family Name"
fp_sMenuValue="Object Family Name"
fp_iDisplayCols=9
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>


<tr>
<td width="155"><!--webbot

bot="DatabaseResultColumn" startspan

s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Object Family Name" b-tableformat="TRUE"
b-hasHTML="FALSE"
clientside
local_preview="<font
size="-

1">&lt;&lt;Object Family

Name&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Object Family

Name&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Object Family Name")%>
</td>
<td width="58" align="left"><%=FP_FieldVal(fp_rs,"Object Name")%>
</td>
<td width="71" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Database Release 1" b-tableformat="TRUE"
b-hasHTML="FALSE"
clientside
local_preview="<font
size="-

1">&lt;&lt;Database Release

1&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Database Release

1&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Database Release 1")%>
</td>
<td width="62" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Product Version 1" b-tableformat="TRUE"
b-hasHTML="FALSE"
clientside
local_preview="<font
size="-

1">&lt;&lt;Product Version

1&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Product Version

1&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Product Version 1")%>
</td>
<td width="102" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Enterprise Date Compiled 1" b- tableformat="TRUE"
b-hasHTML="FALSE" clientside
local_preview="<font
size="-

1">&lt;&lt;Enterprise Date

Compiled 1&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Enterprise Date

Compiled 1&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Enterprise Date Compiled 1")%><!- -webbot
bot="DatabaseResultColumn" i-CheckSum="1376" endspan -->
</td>
<td width="71" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Database Release 2" b-tableformat="TRUE"
b-hasHTML="FALSE"
clientside
local_preview="<font
size="-

1">&lt;&lt;Database Release

2&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Database Release

2&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Database Release 2")%>
</td>
<td width="62" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Product Version 2" b-tableformat="TRUE"
b-hasHTML="FALSE"
clientside
local_preview="<font
size="-

1">&lt;&lt;Product Version

2&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Product Version

2&gt;&gt;"
--><%=FP_FieldVal(fp_rs,"Product Version 2")%>
</td>
<td width="102" align="center"><!--webbot
bot="DatabaseResultColumn"
startspan
s-columnnames="Object Family Name,Object Name,Database Release
1,Product Version 1,Enterprise Date Compiled 1,Database Release
2,Product Version 2,Enterprise Date Compiled 2,HostSystem,HostSystem"
s-column="Enterprise Date Compiled 2" b- tableformat="TRUE"
b-hasHTML="FALSE" clientside
local_preview="<font
size="-

1">&lt;&lt;Enterprise Date

Compiled 2&gt;&gt;"
preview="<font
size="-

1">&lt;&lt;Enterprise Date

I am trying to understand this code...	3	Jul 26, 2008
@ my wits end	1	Sep 12, 2006
any ideas why I can update one table in my database but not the other?	2	Sep 22, 2006
Please help, FP generated code produces a "Too few parameters. Expected1" error!	7	Jun 6, 2005
Database Results Error	1	Sep 9, 2004
DataBase results Error continued	1	Sep 10, 2004
FP Database help needed...	6	Oct 18, 2005
Database Update Buttons	8	May 25, 2005

Problem with form validation

mosow

Jim Buyens

Ask a Question

Similar Threads