Error in exported session variable.
The problem that I am having is the Tier field (exported variable) displayed on the page does not automatically update after the first time it is displayed (HTML target frame for this page is _blank). The db.Reset function doesn't seem to be working. I've tried adding <% response.buffer=true %> so that the page doesn't display until after it is done running the program and also added the meta tag to prevent cacheing of the page but this doesn't help. After the page is done loading, I can click Refresh on the browser and the correct Tier will display. The ASP code is split because there is a need to display the session variable before the grid is displayed.
<% response.buffer=true %>
<HTML>
<HEAD>
<TITLE>Central Office Report</TITLE>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
</HEAD>
<BODY>
<%
Set N = Server.CreateObject("ASP.db")
N.dbMDB = Server.MapPath("SERF.mdb")
N.dbUnit = 14
W=Request("OE_NAME") ' Get what the user type in during the sql1 program
if (W <> "") then ' Is this the first time in? If so, set the session
Session("SesOE_NAME") = W ' variable so the user's entry will be remembered.
N.dbReset(14) ' new parameters just came in.
LOCALSQL = Session("SesOE_NAME")' + "%"
sq = "SELECT OE_NAME, CO_NAME AS [Central Office], Tier, Colocation AS [Colocation/MSA], [CoLo Construction Complete] AS [Construction Schedule] FROM [Central Offices] WHERE (((OE_NAME)='"
sq = sq & LOCALSQL
sq = sq & "'))"
sq = sq & " ORDER BY [CO_NAME]"
N.dbSQL = sq
end if
%>
<P align="center"><IMG border="0" src="../images/cntrl_offc.gif">
<BR>
<FONT face="Arial" size="4">for <B><%=Session("SesOE_NAME")%></B> (<%=Session("ASPdb_14_Tier")%>)</FONT>
<p>
<%
N.dbExportFlds = "0,2"
N.dbColor = "white, 000066, #FFCC00, black, #EEEEEE"
N.dbMode = "Grid"
N.dbNavigation = "None"
N.dbStatusBar = "False"
N.dbGridInc = "600"
N.dbGridColSort = False
N.dbGridHideFlds = "0,2"
N.dbGridTableTag = "CellPadding=2 width=650"
N.dbNameMap = "Construction Schedule,Construction Schedule<FONT color=red>*</FONT>"
N.dbMagicCell = "Colocation/MSA,align=center;Construction Schedule,align=center"
N.dbOptions = "CellFontTag=Face=Arial Size=2"
N.ASPdb
%>
<p>
<FONT color="#FF0000" face="Arial" size="2">*</FONT>
<FONT face="Arial" size="1"> Colocation construction ONLY - "Complete" does not mean service readiness. Conduct a location search for product availability information.</FONT>
</BODY>
</HTML>
Error in exported session variable. (reply)
Ralph,
I think you have a bug in your code. dbSQL will be undefined most of the time!
Mark.
------------
Ralph Asbury at 1/3/01 12:30:42 PM
The problem that I am having is the Tier field (exported variable) displayed on the page does not automatically update after the first time it is displayed (HTML target frame for this page is _blank). The db.Reset function doesn't seem to be working. I've tried adding <% response.buffer=true %> so that the page doesn't display until after it is done running the program and also added the meta tag to prevent cacheing of the page but this doesn't help. After the page is done loading, I can click Refresh on the browser and the correct Tier will display. The ASP code is split because there is a need to display the session variable before the grid is displayed.
<% response.buffer=true %>
<HTML>
<HEAD>
<TITLE>Central Office Report</TITLE>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
</HEAD>
<BODY>
<%
Set N = Server.CreateObject("ASP.db")
N.dbMDB = Server.MapPath("SERF.mdb")
N.dbUnit = 14
W=Request("OE_NAME") ' Get what the user type in during the sql1 program
if (W <> "") then ' Is this the first time in? If so, set the session
Session("SesOE_NAME") = W ' variable so the user's entry will be remembered.
N.dbReset(14) ' new parameters just came in.
LOCALSQL = Session("SesOE_NAME")' + "%"
sq = "SELECT OE_NAME, CO_NAME AS [Central Office], Tier, Colocation AS [Colocation/MSA], [CoLo Construction Complete] AS [Construction Schedule] FROM [Central Offices] WHERE (((OE_NAME)='"
sq = sq & LOCALSQL
sq = sq & "'))"
sq = sq & " ORDER BY [CO_NAME]"
N.dbSQL = sq
end if
%>
<P align="center"><IMG border="0" src="../images/cntrl_offc.gif">
<BR>
<FONT face="Arial" size="4">for <B><%=Session("SesOE_NAME")%></B> (<%=Session("ASPdb_14_Tier")%>)</FONT>
<p>
<%
N.dbExportFlds = "0,2"
N.dbColor = "white, 000066, #FFCC00, black, #EEEEEE"
N.dbMode = "Grid"
N.dbNavigation = "None"
N.dbStatusBar = "False"
N.dbGridInc = "600"
N.dbGridColSort = False
N.dbGridHideFlds = "0,2"
N.dbGridTableTag = "CellPadding=2 width=650"
N.dbNameMap = "Construction Schedule,Construction Schedule<FONT color=red>*</FONT>"
N.dbMagicCell = "Colocation/MSA,align=center;Construction Schedule,align=center"
N.dbOptions = "CellFontTag=Face=Arial Size=2"
N.ASPdb
%>
<p>
<FONT color="#FF0000" face="Arial" size="2">*</FONT>
<FONT face="Arial" size="1"> Colocation construction ONLY - "Complete" does not mean service readiness. Conduct a location search for product availability information.</FONT>
</BODY>
</HTML>
Error in exported session variable. (reply)
I don't know what that means but I managed to make it work by placing another call to ASPdb above the first one.
Code below:
==========================================
<%
Set N = Server.CreateObject("ASP.db")
N.dbMDB = Server.MapPath("SERF.mdb")
N.dbUnit = 13
W=Request("OE_NAME") ' Get what the user type in during the sql1 program
if (W <> "") then ' Is this the first time in? If so, set the session
Session("SesOE_NAME") = W ' variable so the user's entry will be remembered.
N.dbReset(14) ' new parameters just came in.
LOCALSQL = Session("SesOE_NAME")' + "%"
sq = "SELECT Tier FROM [Central Offices] WHERE (((OE_NAME)='"
sq = sq & LOCALSQL
sq = sq & "'))"
'sq = sq & " ORDER BY [CO_NAME]"
N.dbSQL = sq
N.dbExportFlds = "0"
N.dbGridHideFlds = "0"
N.dbMode = "Grid"
N.dbNavigation = "None"
N.dbStatusBar = "False"
N.ASPdb
End if
%>
<P align="center"><IMG border="0" src="../images/cntrl_offc.gif">
<BR>
<FONT face="Arial" size="4">for <B><%=Session("SesOE_NAME")%></B> (<%=Session("ASPdb_13_Tier")%>)</FONT>
<p>
<%
Set N = Server.CreateObject("ASP.db")
N.dbMDB = Server.MapPath("SERF.mdb")
N.dbUnit = 14
W=Request("OE_NAME") ' Get what the user type in during the sql1 program
if (W <> "") then ' Is this the first time in? If so, set the session
Session("SesOE_NAME") = W ' variable so the user's entry will be remembered.
N.dbReset(14) ' new parameters just came in.
LOCALSQL = Session("SesOE_NAME")' + "%"
sq = "SELECT OE_NAME, CO_NAME AS [Central Office], Tier, Colocation AS [Colocation/MSA], [CoLo Construction Complete] AS [Construction Schedule] FROM [Central Offices] WHERE (((OE_NAME)='"
sq = sq & LOCALSQL
sq = sq & "'))"
sq = sq & " ORDER BY [CO_NAME]"
N.dbSQL = sq
N.dbExportFlds = "0,2"
N.dbColor = "white, 000066, #FFCC00, black, #EEEEEE"
N.dbMode = "Grid"
N.dbNavigation = "None"
N.dbStatusBar = "False"
N.dbGridInc = "600"
N.dbGridColSort = False
N.dbGridHideFlds = "0,2"
N.dbGridTableTag = "CellPadding=2 width=650"
N.dbNameMap = "Construction Schedule,Construction Schedule<FONT color=red>*</FONT>"
N.dbMagicCell = "Colocation/MSA,align=center;Construction Schedule,align=center"
N.dbOptions = "CellFontTag=Face=Arial Size=2"
N.ASPdb
End if
%>
------------
Mark at 1/3/01 2:04:29 PM
Ralph,
I think you have a bug in your code. dbSQL will be undefined most of the time!
Mark.
------------
Ralph Asbury at 1/3/01 12:30:42 PM
The problem that I am having is the Tier field (exported variable) displayed on the page does not automatically update after the first time it is displayed (HTML target frame for this page is _blank). The db.Reset function doesn't seem to be working. I've tried adding <% response.buffer=true %> so that the page doesn't display until after it is done running the program and also added the meta tag to prevent cacheing of the page but this doesn't help. After the page is done loading, I can click Refresh on the browser and the correct Tier will display. The ASP code is split because there is a need to display the session variable before the grid is displayed.
<% response.buffer=true %>
<HTML>
<HEAD>
<TITLE>Central Office Report</TITLE>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
</HEAD>
<BODY>
<%
Set N = Server.CreateObject("ASP.db")
N.dbMDB = Server.MapPath("SERF.mdb")
N.dbUnit = 14
W=Request("OE_NAME") ' Get what the user type in during the sql1 program
if (W <> "") then ' Is this the first time in? If so, set the session
Session("SesOE_NAME") = W ' variable so the user's entry will be remembered.
N.dbReset(14) ' new parameters just came in.
LOCALSQL = Session("SesOE_NAME")' + "%"
sq = "SELECT OE_NAME, CO_NAME AS [Central Office], Tier, Colocation AS [Colocation/MSA], [CoLo Construction Complete] AS [Construction Schedule] FROM [Central Offices] WHERE (((OE_NAME)='"
sq = sq & LOCALSQL
sq = sq & "'))"
sq = sq & " ORDER BY [CO_NAME]"
N.dbSQL = sq
end if
%>
<P align="center"><IMG border="0" src="../images/cntrl_offc.gif">
<BR>
<FONT face="Arial" size="4">for <B><%=Session("SesOE_NAME")%></B> (<%=Session("ASPdb_14_Tier")%>)</FONT>
<p>
<%
N.dbExportFlds = "0,2"
N.dbColor = "white, 000066, #FFCC00, black, #EEEEEE"
N.dbMode = "Grid"
N.dbNavigation = "None"
N.dbStatusBar = "False"
N.dbGridInc = "600"
N.dbGridColSort = False
N.dbGridHideFlds = "0,2"
N.dbGridTableTag = "CellPadding=2 width=650"
N.dbNameMap = "Construction Schedule,Construction Schedule<FONT color=red>*</FONT>"
N.dbMagicCell = "Colocation/MSA,align=center;Construction Schedule,align=center"
N.dbOptions = "CellFontTag=Face=Arial Size=2"
N.ASPdb
%>
<p>
<FONT color="#FF0000" face="Arial" size="2">*</FONT>
<FONT face="Arial" size="1"> Colocation construction ONLY - "Complete" does not mean service readiness. Conduct a location search for product availability information.</FONT>
</BODY>
</HTML>
