K
karin
Hi Everyone -
I am passwording files on a web and my initial code looks like this:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
</body>
</html>
This works perfectly.
I then add a form to the page, and the code changes to:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>Karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
<form>
<p><input type="text" name="Centre" size="20"></p>
<p><input type="text" name="Code" size="20"></p>
</form>
</body>
</html>
Still no problem: The page loads, showing the two fields.
However, as soon as I add Insert Database Results instructions, I get
the following error:
Microsoft VBScript runtime error '800a01f4'
Variable is undefined: 'FP_CharSet'
/karin.asp, line 10
The code looks like this:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>Karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
<table width="100%" border="1">
<thead>
<tr>
<td><b>Centre</b></td>
<td><b>Code</b></td>
</tr>
</thead>
<tbody>
<!--webbot bot="DatabaseRegionStart" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-columntypes="202,202,3,202,202,202,202,202,202,3,202,3,202,202,202,135"
s-dataconnection="SAICJ" b-tableformat="TRUE" b-menuformat="FALSE"
s-menuchoice s-menuvalue b-tableborder="TRUE" b-tableexpand="TRUE"
b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE"
i-ListFormat="0" b-makeform="TRUE" s-recordsource="TRegister"
s-displaycolumns="Centre,Code" s-criteria s-order
s-sql="SELECT * FROM TRegister" b-procedure="FALSE" clientside
SuggestedExt="asp" s-DefaultFields s-NoRecordsFound="No records
returned."
i-MaxRecords="256" 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%"><font
color="#000000">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.</font></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00"
align="left" width="100%"><font
color="#000000">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.</font></td></tr>" --><!--#include
file="_fpclass/fpdblib.inc"-->
<%
fp_sQry="SELECT * FROM TRegister"
fp_sDefault=""
fp_sNoRecords="<tr><td colspan=2 align=left width=""100%"">No records
returned.</td></tr>"
fp_sDataConn="SAICJ"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=2
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file="_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" I-CheckSum="20713" endspan -->
<tr>
<td><!--webbot bot="DatabaseResultColumn" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-column="Centre" b-tableformat="TRUE" b-hasHTML="FALSE"
clientside
local_preview="<font
size="-1">&lt;&lt;</font>Centre<font
size="-1">&gt;&gt;</font>"
preview="<font
size="-1">&lt;&lt;</font>Centre<font
size="-1">&gt;&gt;</font>"
--><%=FP_FieldVal(fp_rs,"Centre")%><!--webbot
bot="DatabaseResultColumn" I-CheckSum="14123" endspan -->
</td>
<td><!--webbot bot="DatabaseResultColumn" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-column="Code" b-tableformat="TRUE" b-hasHTML="FALSE"
clientside
local_preview="<font
size="-1">&lt;&lt;</font>Code<font
size="-1">&gt;&gt;</font>"
preview="<font
size="-1">&lt;&lt;</font>Code<font
size="-1">&gt;&gt;</font>"
--><%=FP_FieldVal(fp_rs,"Code")%><!--webbot
bot="DatabaseResultColumn" I-CheckSum="4979" endspan -->
</td>
</tr>
<!--webbot bot="DatabaseRegionEnd" startspan b-tableformat="TRUE"
b-menuformat="FALSE" u-dbrgn2="_fpclass/fpdbrgn2.inc"
i-groupsize="0"
clientside tag="TBODY"
local_preview="<tr><td colspan=64
bgcolor="#FFFF00" align="left"
width="100%"><font color="#000000">This is
the end of a Database Results
region.</font></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00"
align="left" width="100%"><font
color="#000000">This is the end of a Database Results
region.</font></td></tr>" --><!--#include
file="_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" I-CheckSum="62730" endspan -->
</tbody>
</table>
</body>
</html>
What is it that I am doing wrong?
This is new territory to me - I appreciate all suggestions and help.
Thank you!
Karin
I am passwording files on a web and my initial code looks like this:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
</body>
</html>
This works perfectly.
I then add a form to the page, and the code changes to:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>Karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
<form>
<p><input type="text" name="Centre" size="20"></p>
<p><input type="text" name="Code" size="20"></p>
</form>
</body>
</html>
Still no problem: The page loads, showing the two fields.
However, as soon as I add Insert Database Results instructions, I get
the following error:
Microsoft VBScript runtime error '800a01f4'
Variable is undefined: 'FP_CharSet'
/karin.asp, line 10
The code looks like this:
<%@ Language="VBScript" %>
<% Option Explicit %>
<%
If Session("username") <> "karin" Then
Response.Redirect("../login_db_nav.asp")
%>
<html>
<head>
<title>Karin</title>
</head>
<body>
<p>
This is Karin's page!
</p>
<table width="100%" border="1">
<thead>
<tr>
<td><b>Centre</b></td>
<td><b>Code</b></td>
</tr>
</thead>
<tbody>
<!--webbot bot="DatabaseRegionStart" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-columntypes="202,202,3,202,202,202,202,202,202,3,202,3,202,202,202,135"
s-dataconnection="SAICJ" b-tableformat="TRUE" b-menuformat="FALSE"
s-menuchoice s-menuvalue b-tableborder="TRUE" b-tableexpand="TRUE"
b-tableheader="TRUE" b-listlabels="TRUE" b-listseparator="TRUE"
i-ListFormat="0" b-makeform="TRUE" s-recordsource="TRegister"
s-displaycolumns="Centre,Code" s-criteria s-order
s-sql="SELECT * FROM TRegister" b-procedure="FALSE" clientside
SuggestedExt="asp" s-DefaultFields s-NoRecordsFound="No records
returned."
i-MaxRecords="256" 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%"><font
color="#000000">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.</font></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00"
align="left" width="100%"><font
color="#000000">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.</font></td></tr>" --><!--#include
file="_fpclass/fpdblib.inc"-->
<%
fp_sQry="SELECT * FROM TRegister"
fp_sDefault=""
fp_sNoRecords="<tr><td colspan=2 align=left width=""100%"">No records
returned.</td></tr>"
fp_sDataConn="SAICJ"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=2
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file="_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" I-CheckSum="20713" endspan -->
<tr>
<td><!--webbot bot="DatabaseResultColumn" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-column="Centre" b-tableformat="TRUE" b-hasHTML="FALSE"
clientside
local_preview="<font
size="-1">&lt;&lt;</font>Centre<font
size="-1">&gt;&gt;</font>"
preview="<font
size="-1">&lt;&lt;</font>Centre<font
size="-1">&gt;&gt;</font>"
--><%=FP_FieldVal(fp_rs,"Centre")%><!--webbot
bot="DatabaseResultColumn" I-CheckSum="14123" endspan -->
</td>
<td><!--webbot bot="DatabaseResultColumn" startspan
s-columnnames="Centre,Code,LearnerNo,Firstname,Surname,ID,Tel
No,RegDD,RegMM,RegYYYY,Type,Batch,UserPC,User_name,Browser_type,Timestamp"
s-column="Code" b-tableformat="TRUE" b-hasHTML="FALSE"
clientside
local_preview="<font
size="-1">&lt;&lt;</font>Code<font
size="-1">&gt;&gt;</font>"
preview="<font
size="-1">&lt;&lt;</font>Code<font
size="-1">&gt;&gt;</font>"
--><%=FP_FieldVal(fp_rs,"Code")%><!--webbot
bot="DatabaseResultColumn" I-CheckSum="4979" endspan -->
</td>
</tr>
<!--webbot bot="DatabaseRegionEnd" startspan b-tableformat="TRUE"
b-menuformat="FALSE" u-dbrgn2="_fpclass/fpdbrgn2.inc"
i-groupsize="0"
clientside tag="TBODY"
local_preview="<tr><td colspan=64
bgcolor="#FFFF00" align="left"
width="100%"><font color="#000000">This is
the end of a Database Results
region.</font></td></tr>"
preview="<tr><td colspan=64 bgcolor="#FFFF00"
align="left" width="100%"><font
color="#000000">This is the end of a Database Results
region.</font></td></tr>" --><!--#include
file="_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" I-CheckSum="62730" endspan -->
</tbody>
</table>
</body>
</html>
What is it that I am doing wrong?
This is new territory to me - I appreciate all suggestions and help.
Thank you!
Karin