S
Stefan B Rusynko
Server side coding does not require a dwt
- it is processed on the server before being rendering in the static part of the page
If you make it editable it will not propagate to all pages
- so it should probably be non editable if you want it to show on all new pages
--
_____________________________________________
SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
"Warning - Using the F1 Key will not break anything!" (-;
_____________________________________________
|I have gone back to what Ron suggested a while ago... putting an iframe in
| the dwt with the asp in the iframe.
|
| I've decided to display my asp info (ie name of user that is logged in) in
| the top header. So actually what I've done, is I've created a seperate page
| with the static header info and a little iframe calling the original asp
| footer info (user name), and saved it as an asp. In my top header section of
| the dwt I've included this new asp file, and it seems to be working! Wel I
| need to test it on someone else's pc (where their login name should display)
| to be sure. All I need to know now, is do I need to make this section of the
| dwt editable or not? Nobody needs to edit any info in it, it's only beacuse
| it's displaying the asp info (ie name of user that's logged in) that I'm
| asking....?
|
| I'm still getting the hang of editable vs non-editabl;e reagions.....
| --
| MkS
|
|
| "Marindi" wrote:
|
| > Thx Stefan - so does this mean I cannot insert the asp footer into my dwt? ie
| > it will not work? (I see in our current frames-based page it is right on top
| > as you say)
| > oh no... the boss says the info's gotta be displayed. any other ideas? i
| > don't want to revert back to frames, then my whole new layout won't work as I
| > need drop-downs on top header/frame to display over contents...
| >
| > can you put a frame below a table (containing a dwt)?
| > or.... can your main page be made up of one frame (containing page done by
| > dwt with different sections) and another frame below containing only the asp
| > footer?
| > --
| > MkS
| >
| >
| > "Stefan B Rusynko" wrote:
| >
| > > <% @LANGUAGE = VBScript %> <% Option Explicit %>
| > > must always be the 1st line on the page above <html>
| > >
| > > But DWT's will not propogate anything outside of the <head> tags or </body> tags
| > > - a knows bug of DWTs
| > > --
| > >
| > > _____________________________________________
| > > SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
| > > "Warning - Using the F1 Key will not break anything!" (-;
| > > _____________________________________________
| > >
| > >
| > > | Ron - it gives me the same error...
| > > | Here is all the code. The asp bit is in the last <tr> of the table:
| > > |
| > > | <html>
| > > |
| > > | <head>
| > > | <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/style.css">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/style2.css">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/CascadeMenu.css">
| > > | <script language="javascript"
| > > | src="file:///C:/Inetpub/wwwroot/inserts/CascadeMenu.js"></script>
| > > | <!-- #BeginEditable "doctitle" -->
| > > | <title>Logged in User</title>
| > > | <!-- #EndEditable -->
| > > | <% @LANGUAGE = VBScript %> <% Option Explicit %>
| > > | <!-- #include virtual="/Inserts/ADOVBS.INC" --><%
| > > | Dim objCmd, objRS, objParam, objConn
| > > |
| > > | Set objConn = Server.CreateObject("ADODB.Connection")
| > > | objConn.ConnectionString = session("strConnection")
| > > | objConn.CursorLocation = adUseClient
| > > | objConn.Open
| > > |
| > > | Set objCmd = Server.CreateObject("ADODB.Command")
| > > | Set objCmd.ActiveConnection = objConn
| > > | objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | objCmd.CommandType = adCmdStoredProc
| > > |
| > > | Set objRS = objCmd.Execute
| > > |
| > > | %>
| > > | </head>
| > > |
| > > | <body>
| > > |
| > > | <table border="0" cellpadding="0" cellspacing="0" width="100%">
| > > | <!-- MSTableType="layout" -->
| > > | <tr>
| > > | <td valign="top" colspan="2">
| > > | <!-- MSCellType="ContentHead" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/TopMenuNewTest5.htm"
| > > | TAG="BODY" --> </td>
| > > | </tr>
| > > | <tr>
| > > | <td msopnltype="NavBody" rowspan="2" width="200" valign="top">
| > > | <!-- MSCellType="NavBody" -->
| > > | <!-- #BeginEditable "LeftMenu" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/MainMenu.htm" TAG="BODY"
| > > | --> <!-- #EndEditable --></td>
| > > | <td valign="top">
| > > | <!-- MSCellType="ContentBody" -->
| > > | <!-- #BeginEditable "Contents" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/HomePage_new.htm" TAG="BODY"
| > > | --> <!-- #EndEditable --></td>
| > > | </tr>
| > > | <tr>
| > > | <td valign="top">
| > > | <!-- MSCellType="ContentFoot" -->
| > > | <table class="noprint" style="font-size: 8pt; border-collapse:collapse;
| > > | text-align:center" width="100%" border="0" bordercolor="#FFFFFF"
| > > | background="../images/Nedbank_Images/barFiller.jpg">
| > > | <%Do while not objRS.eof%>
| > > | <tr>
| > > | <td width="50%" style="font-family: Verdana; color: #627368"><font
| > > | size="1">Logged in User: <%=objRS("StaffName") & " " & "(" &
| > > | objRS("StaffNum") & ")"%></font></td>
| > > | <td width="10%" align="center">
| > > | </td>
| > > | <td width="10%" align="center">
| > > | <a title="Send e-mail to the webmaster" class="banneranchor"
| > > | href="mailto:[email protected]?subject=CardZone Website"><font size="1">
| > > | Web Administrator</font></a></td>
| > > | <td width="10%" align="center"><a class="banneranchor"
| > > | href="disclaimer.htm" target="main"><font size="1">Disclaimer</font></a></td>
| > > | </tr>
| > > | <%objRS.MoveNext
| > > | Loop%>
| > > | </table>
| > > | </td>
| > > | </tr>
| > > | </table>
| > > |
| > > | </body>
| > > |
| > > | </html>
| > > | --
| > > | MkS
| > > |
| > > |
| > > | "Ronx" wrote:
| > > |
| > > | > Q1 - Could you post the first dozen lines from your page that gives
| > > | > the error? Change anything that may be a security breach.
| > > | > Try using <% Option Explicit %> instead of <%Option Explicit%>
| > > | >
| > > | > Q2 - The ADOVBS.INC file can be left where it is.
| > > | >
| > > | > Change <!-- #include file="ADOVBS.INC --> to
| > > | > <!-- #include virtual="/subfolder/ADOVBS>INC" --> where subfolder is
| > > | > the name of the subfolder. Notice the / before the subfolder name.
| > > | > This will work with all your pages, no matter which folder they are in,
| > > | > so you only have the single copy of ADOVBS.INC to edit.
| > > | >
| > > | >
| > > | >
| > > | > --
| > > | > Ron Symonds - Microsoft MVP (Expression)
| > > | > Reply only to group - emails will be deleted unread.
| > > | >
| > > | > http://www.rxs-enterprises.org/fp
| > > | >
| > > | >
| > > | >
| > > | >
| > > | > | > > | >
| > > | > > As you can probably tell, dwts wasn't really covered in the FP course I did
| > > | > >
. Thx for explaining how it all works!
| > > | > >
| > > | > > Q1: I did it step by step, and it gives me the 'Page cannot be displayed'
| > > | > > error:
| > > | > > Error Type:
| > > | > > Microsoft VBScript compilation (0x800A0400)
| > > | > > Expected statement
| > > | > > /Inserts/newdefault2xtest.asp, line 6
| > > | > > Option Explicit
| > > | > >
| > > | > > (to test it I've moved all the files into the same folder)
| > > | > >
| > > | > > Q2: I understand that the asp footer file ADOVBS.INC needs to be located in
| > > | > > the same folder as the dwt and all the pages, as it is an include file and
| > > | > > can only be called up from the same folder. Currently for our intranet, the
| > > | > > 'default homepage' (the old frames based one) lie in my wwwroot folder, and
| > > | > > the included pages (top header, menu etc) are in a subfolder of the root.
| > > | > > ADOVBS.INC is also in the subfolder, so to get the new site to work (with the
| > > | > > dwt pages instead of frames) I would have to move ADOVBS.INC to the root
| > > | > > folder? The other included files (header/menu) seem to work fine from the
| > > | > > subfolder?
| > > | > >
| > > | > > Our other pages for our intranet are located in about 15 different
| > > | > > subfolders - does that mean that if I wanted to always include the asp footer
| > > | > > in each page, I would have to have a ADOVBS.INC in each of the folders? and
| > > | > > then if something changes in the inc file it would have to be changed in each
| > > | > > one?
| > > | > >
| > > | > > I'm thinking that I should just do away with the asp footer and convince the
| > > | > > boss we won't need that info...
| > > | > > --
| > > | > > MkS
| > > | > >
| > > | > >
| > > | > > "Ronx" wrote:
| > > | > >
| > > | > > > Open the DWT and copy the code immediately after the <head> tag, so you
| > > | > > > get:
| > > | > > > <head>
| > > | > > > <% @Language = VBScript %>
| > > | > > > <%Option Explicit%>
| > > | > > > <!-- #include file="ADOVBS.INC" -->
| > > | > > > <%
| > > | > > > Dim objCmd, objRS, objParam, objConn
| > > | > > > Set objConn = Server.CreateObject("ADODB.Connection")
| > > | > > > objConn.ConnectionString = session("strConnection")
| > > | > > > objConn.CursorLocation = adUseClient objConn.Open
| > > | > > > Set objCmd = Server.CreateObject("ADODB.Command")
| > > | > > > Set objCmd.ActiveConnection = objConn
| > > | > > > objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | > > > objCmd.CommandType = adCmdStoredProc
| > > | > > > Set objRS = objCmd.Execute
| > > | > > > %>
| > > | > > >
| > > | > > >
| > > | > > > This requires that the file ADOVBS.INC is in the same folder as your
| > > | > > > pages, and all your pages are in that folder.
| > > | > > >
| > > | > > > Save the DWT as a .dwt file. The DWT will never run on the server - it
| > > | > > > forms a template for your real pages. These must be saved as .asp
| > > | > > > files.
| > > | > > >
| > > | > > > To test, create a new page based on the DWT:
| > > | > > >
| > > | > > > Click the new page icon and immediately save (but don't close) the blank
| > > | > > > page. Make sure the extension is .asp.
| > > | > > >
| > > | > > > Use Format->Dynamic Web Template->Attach Dynamic Web Template
| > > | > > > Browse to and select your DWT. Click Open
| > > | > > >
| > > | > > > After the page has been formatted notice that the asp code is in place.
| > > | > > > Publish to your server and test. Make sure ADOVBS.INC is also on the
| > > | > > > server in the same folder. I suggest adding the line
| > > | > > > <%= "<p>Hello World</p>" %>
| > > | > > > somewhere in the content editable region to prove the asp is being
| > > | > > > processed.
| > > | > > > --
| > > | > > > Ron Symonds - Microsoft MVP (Expression)
| > > | > > > Reply only to group - emails will be deleted unread.
| > > | > > >
| > > | > > > http://www.rxs-enterprises.org/fp
| > > | > > >
| > > | > > >
| > > | > > >
| > > | > > >
| > > | > > > | > > | > > >
| > > | > > > > Thx so much Ron! I've set up the whole page, and followed your directions on
| > > | > > > > sample.asp to include the asp footer. It's not working, so 2 Q's:
| > > | > > > >
| > > | > > > > 1. This is the code that appeared in the original asp, before <head> (above
| > > | > > > > <html>):
| > > | > > > > <% @LANGUAGE = VBScript %> <%Option Explicit%>
| > > | > > > > <!-- #include file="ADOVBS.INC" --><%
| > > | > > > > Dim objCmd, objRS, objParam, objConn
| > > | > > > > Set objConn = Server.CreateObject("ADODB.Connection")
| > > | > > > > objConn.ConnectionString = session("strConnection")
| > > | > > > > objConn.CursorLocation = adUseClient
| > > | > > > > objConn.Open
| > > | > > > > Set objCmd = Server.CreateObject("ADODB.Command")
| > > | > > > > Set objCmd.ActiveConnection = objConn
| > > | > > > > objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | > > > > objCmd.CommandType = adCmdStoredProc
| > > | > > > > Set objRS = objCmd.Execute
| > > | > > > > %>
| > > | > > > >
| > > | > > > > Do I copy this code into the <head> of the dwt or before the <html> as it
| > > | > > > > was in the original asp? I've basically tried both, but can't get it to
| > > | > > > > work.. not sure what I'm doing wrong...
| > > | > > > >
| > > | > > > > 2. and When the dwt is ready, do I save it as a htm or asp in order to get
| > > | > > > > the footer to display correctly when testing on the server?
| > > | > > > >
| > > | > > > > --
| > > | > > > > MkS
| > > | > > > >
| > > | > > > >
| > > | > > > > "Ronx" wrote:
| > > | > > > >
| > > | > > > > > Start a new page with the layout you need and save as a DWT.
| > > | > > > > >
| > > | > > > > > Make editable regions.
| > > | > > > > >
| > > | > > > > > Make pages for navigation, footer etc. and include them where required.
| > > | > > > > > These pages MUST be .htm or .html, or the FrontPage include will not
| > > | > > > > > work. If the navigation is not likely to change, then place the
| > > | > > > > > navigation directly into the DWT, if it is likely to change - use an
| > > | > > > > > Include file. You can include FP includes in a DWT in the same way as
| > > | > > > > > they are included in ordinary pages.
| > > | > > > > >
| > > | > > > > > Copy the footer from the asp page into the footer area of the DWT. This
| > > | > > > > > saves learning how to use SSI (also known as ASP includes).
| > > | > > > > >
| > > | > > > > > At http://www.rxs-enterprises.org/tests/pages/dwt-sample.zip there is a
| > > | > > > > > sample DWT, asp page and include file for you to look at. It should get
| > > | > > > > > you started.
| > > | > > > > > The asp page is also at
| > > | > > > > > http://www.rxs-enterprises.org/tests/pages/sample.asp for viewing from a
| > > | > > > > > server.
| > > | > > > > > --
| > > | > > > > > Ron Symonds - Microsoft MVP (Expression)
| > > | > > > > > Reply only to group - emails will be deleted unread.
| > > | > > > > >
| > > | > > > > > http://www.rxs-enterprises.org/fp
| > > | > > > > >
| > > | > > > > >
- it is processed on the server before being rendering in the static part of the page
If you make it editable it will not propagate to all pages
- so it should probably be non editable if you want it to show on all new pages
--
_____________________________________________
SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
"Warning - Using the F1 Key will not break anything!" (-;
_____________________________________________
|I have gone back to what Ron suggested a while ago... putting an iframe in
| the dwt with the asp in the iframe.
|
| I've decided to display my asp info (ie name of user that is logged in) in
| the top header. So actually what I've done, is I've created a seperate page
| with the static header info and a little iframe calling the original asp
| footer info (user name), and saved it as an asp. In my top header section of
| the dwt I've included this new asp file, and it seems to be working! Wel I
| need to test it on someone else's pc (where their login name should display)
| to be sure. All I need to know now, is do I need to make this section of the
| dwt editable or not? Nobody needs to edit any info in it, it's only beacuse
| it's displaying the asp info (ie name of user that's logged in) that I'm
| asking....?
|
| I'm still getting the hang of editable vs non-editabl;e reagions.....
| --
| MkS
|
|
| "Marindi" wrote:
|
| > Thx Stefan - so does this mean I cannot insert the asp footer into my dwt? ie
| > it will not work? (I see in our current frames-based page it is right on top
| > as you say)
| > oh no... the boss says the info's gotta be displayed. any other ideas? i
| > don't want to revert back to frames, then my whole new layout won't work as I
| > need drop-downs on top header/frame to display over contents...
| >
| > can you put a frame below a table (containing a dwt)?
| > or.... can your main page be made up of one frame (containing page done by
| > dwt with different sections) and another frame below containing only the asp
| > footer?
| > --
| > MkS
| >
| >
| > "Stefan B Rusynko" wrote:
| >
| > > <% @LANGUAGE = VBScript %> <% Option Explicit %>
| > > must always be the 1st line on the page above <html>
| > >
| > > But DWT's will not propogate anything outside of the <head> tags or </body> tags
| > > - a knows bug of DWTs
| > > --
| > >
| > > _____________________________________________
| > > SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
| > > "Warning - Using the F1 Key will not break anything!" (-;
| > > _____________________________________________
| > >
| > >
| > > | Ron - it gives me the same error...
| > > | Here is all the code. The asp bit is in the last <tr> of the table:
| > > |
| > > | <html>
| > > |
| > > | <head>
| > > | <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/style.css">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/style2.css">
| > > | <link rel="stylesheet" type="text/css"
| > > | href="file:///C:/Inetpub/wwwroot/inserts/CascadeMenu.css">
| > > | <script language="javascript"
| > > | src="file:///C:/Inetpub/wwwroot/inserts/CascadeMenu.js"></script>
| > > | <!-- #BeginEditable "doctitle" -->
| > > | <title>Logged in User</title>
| > > | <!-- #EndEditable -->
| > > | <% @LANGUAGE = VBScript %> <% Option Explicit %>
| > > | <!-- #include virtual="/Inserts/ADOVBS.INC" --><%
| > > | Dim objCmd, objRS, objParam, objConn
| > > |
| > > | Set objConn = Server.CreateObject("ADODB.Connection")
| > > | objConn.ConnectionString = session("strConnection")
| > > | objConn.CursorLocation = adUseClient
| > > | objConn.Open
| > > |
| > > | Set objCmd = Server.CreateObject("ADODB.Command")
| > > | Set objCmd.ActiveConnection = objConn
| > > | objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | objCmd.CommandType = adCmdStoredProc
| > > |
| > > | Set objRS = objCmd.Execute
| > > |
| > > | %>
| > > | </head>
| > > |
| > > | <body>
| > > |
| > > | <table border="0" cellpadding="0" cellspacing="0" width="100%">
| > > | <!-- MSTableType="layout" -->
| > > | <tr>
| > > | <td valign="top" colspan="2">
| > > | <!-- MSCellType="ContentHead" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/TopMenuNewTest5.htm"
| > > | TAG="BODY" --> </td>
| > > | </tr>
| > > | <tr>
| > > | <td msopnltype="NavBody" rowspan="2" width="200" valign="top">
| > > | <!-- MSCellType="NavBody" -->
| > > | <!-- #BeginEditable "LeftMenu" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/MainMenu.htm" TAG="BODY"
| > > | --> <!-- #EndEditable --></td>
| > > | <td valign="top">
| > > | <!-- MSCellType="ContentBody" -->
| > > | <!-- #BeginEditable "Contents" -->
| > > | <!--webbot bot="Include" U-Include="Inserts/HomePage_new.htm" TAG="BODY"
| > > | --> <!-- #EndEditable --></td>
| > > | </tr>
| > > | <tr>
| > > | <td valign="top">
| > > | <!-- MSCellType="ContentFoot" -->
| > > | <table class="noprint" style="font-size: 8pt; border-collapse:collapse;
| > > | text-align:center" width="100%" border="0" bordercolor="#FFFFFF"
| > > | background="../images/Nedbank_Images/barFiller.jpg">
| > > | <%Do while not objRS.eof%>
| > > | <tr>
| > > | <td width="50%" style="font-family: Verdana; color: #627368"><font
| > > | size="1">Logged in User: <%=objRS("StaffName") & " " & "(" &
| > > | objRS("StaffNum") & ")"%></font></td>
| > > | <td width="10%" align="center">
| > > | </td>
| > > | <td width="10%" align="center">
| > > | <a title="Send e-mail to the webmaster" class="banneranchor"
| > > | href="mailto:[email protected]?subject=CardZone Website"><font size="1">
| > > | Web Administrator</font></a></td>
| > > | <td width="10%" align="center"><a class="banneranchor"
| > > | href="disclaimer.htm" target="main"><font size="1">Disclaimer</font></a></td>
| > > | </tr>
| > > | <%objRS.MoveNext
| > > | Loop%>
| > > | </table>
| > > | </td>
| > > | </tr>
| > > | </table>
| > > |
| > > | </body>
| > > |
| > > | </html>
| > > | --
| > > | MkS
| > > |
| > > |
| > > | "Ronx" wrote:
| > > |
| > > | > Q1 - Could you post the first dozen lines from your page that gives
| > > | > the error? Change anything that may be a security breach.
| > > | > Try using <% Option Explicit %> instead of <%Option Explicit%>
| > > | >
| > > | > Q2 - The ADOVBS.INC file can be left where it is.
| > > | >
| > > | > Change <!-- #include file="ADOVBS.INC --> to
| > > | > <!-- #include virtual="/subfolder/ADOVBS>INC" --> where subfolder is
| > > | > the name of the subfolder. Notice the / before the subfolder name.
| > > | > This will work with all your pages, no matter which folder they are in,
| > > | > so you only have the single copy of ADOVBS.INC to edit.
| > > | >
| > > | >
| > > | >
| > > | > --
| > > | > Ron Symonds - Microsoft MVP (Expression)
| > > | > Reply only to group - emails will be deleted unread.
| > > | >
| > > | > http://www.rxs-enterprises.org/fp
| > > | >
| > > | >
| > > | >
| > > | >
| > > | > | > > | >
| > > | > > As you can probably tell, dwts wasn't really covered in the FP course I did
| > > | > >
. Thx for explaining how it all works!| > > | > >
| > > | > > Q1: I did it step by step, and it gives me the 'Page cannot be displayed'
| > > | > > error:
| > > | > > Error Type:
| > > | > > Microsoft VBScript compilation (0x800A0400)
| > > | > > Expected statement
| > > | > > /Inserts/newdefault2xtest.asp, line 6
| > > | > > Option Explicit
| > > | > >
| > > | > > (to test it I've moved all the files into the same folder)
| > > | > >
| > > | > > Q2: I understand that the asp footer file ADOVBS.INC needs to be located in
| > > | > > the same folder as the dwt and all the pages, as it is an include file and
| > > | > > can only be called up from the same folder. Currently for our intranet, the
| > > | > > 'default homepage' (the old frames based one) lie in my wwwroot folder, and
| > > | > > the included pages (top header, menu etc) are in a subfolder of the root.
| > > | > > ADOVBS.INC is also in the subfolder, so to get the new site to work (with the
| > > | > > dwt pages instead of frames) I would have to move ADOVBS.INC to the root
| > > | > > folder? The other included files (header/menu) seem to work fine from the
| > > | > > subfolder?
| > > | > >
| > > | > > Our other pages for our intranet are located in about 15 different
| > > | > > subfolders - does that mean that if I wanted to always include the asp footer
| > > | > > in each page, I would have to have a ADOVBS.INC in each of the folders? and
| > > | > > then if something changes in the inc file it would have to be changed in each
| > > | > > one?
| > > | > >
| > > | > > I'm thinking that I should just do away with the asp footer and convince the
| > > | > > boss we won't need that info...
| > > | > > --
| > > | > > MkS
| > > | > >
| > > | > >
| > > | > > "Ronx" wrote:
| > > | > >
| > > | > > > Open the DWT and copy the code immediately after the <head> tag, so you
| > > | > > > get:
| > > | > > > <head>
| > > | > > > <% @Language = VBScript %>
| > > | > > > <%Option Explicit%>
| > > | > > > <!-- #include file="ADOVBS.INC" -->
| > > | > > > <%
| > > | > > > Dim objCmd, objRS, objParam, objConn
| > > | > > > Set objConn = Server.CreateObject("ADODB.Connection")
| > > | > > > objConn.ConnectionString = session("strConnection")
| > > | > > > objConn.CursorLocation = adUseClient objConn.Open
| > > | > > > Set objCmd = Server.CreateObject("ADODB.Command")
| > > | > > > Set objCmd.ActiveConnection = objConn
| > > | > > > objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | > > > objCmd.CommandType = adCmdStoredProc
| > > | > > > Set objRS = objCmd.Execute
| > > | > > > %>
| > > | > > >
| > > | > > >
| > > | > > > This requires that the file ADOVBS.INC is in the same folder as your
| > > | > > > pages, and all your pages are in that folder.
| > > | > > >
| > > | > > > Save the DWT as a .dwt file. The DWT will never run on the server - it
| > > | > > > forms a template for your real pages. These must be saved as .asp
| > > | > > > files.
| > > | > > >
| > > | > > > To test, create a new page based on the DWT:
| > > | > > >
| > > | > > > Click the new page icon and immediately save (but don't close) the blank
| > > | > > > page. Make sure the extension is .asp.
| > > | > > >
| > > | > > > Use Format->Dynamic Web Template->Attach Dynamic Web Template
| > > | > > > Browse to and select your DWT. Click Open
| > > | > > >
| > > | > > > After the page has been formatted notice that the asp code is in place.
| > > | > > > Publish to your server and test. Make sure ADOVBS.INC is also on the
| > > | > > > server in the same folder. I suggest adding the line
| > > | > > > <%= "<p>Hello World</p>" %>
| > > | > > > somewhere in the content editable region to prove the asp is being
| > > | > > > processed.
| > > | > > > --
| > > | > > > Ron Symonds - Microsoft MVP (Expression)
| > > | > > > Reply only to group - emails will be deleted unread.
| > > | > > >
| > > | > > > http://www.rxs-enterprises.org/fp
| > > | > > >
| > > | > > >
| > > | > > >
| > > | > > >
| > > | > > > | > > | > > >
| > > | > > > > Thx so much Ron! I've set up the whole page, and followed your directions on
| > > | > > > > sample.asp to include the asp footer. It's not working, so 2 Q's:
| > > | > > > >
| > > | > > > > 1. This is the code that appeared in the original asp, before <head> (above
| > > | > > > > <html>):
| > > | > > > > <% @LANGUAGE = VBScript %> <%Option Explicit%>
| > > | > > > > <!-- #include file="ADOVBS.INC" --><%
| > > | > > > > Dim objCmd, objRS, objParam, objConn
| > > | > > > > Set objConn = Server.CreateObject("ADODB.Connection")
| > > | > > > > objConn.ConnectionString = session("strConnection")
| > > | > > > > objConn.CursorLocation = adUseClient
| > > | > > > > objConn.Open
| > > | > > > > Set objCmd = Server.CreateObject("ADODB.Command")
| > > | > > > > Set objCmd.ActiveConnection = objConn
| > > | > > > > objCmd.CommandText = "sp_Get_Logged_In_Employee"
| > > | > > > > objCmd.CommandType = adCmdStoredProc
| > > | > > > > Set objRS = objCmd.Execute
| > > | > > > > %>
| > > | > > > >
| > > | > > > > Do I copy this code into the <head> of the dwt or before the <html> as it
| > > | > > > > was in the original asp? I've basically tried both, but can't get it to
| > > | > > > > work.. not sure what I'm doing wrong...
| > > | > > > >
| > > | > > > > 2. and When the dwt is ready, do I save it as a htm or asp in order to get
| > > | > > > > the footer to display correctly when testing on the server?
| > > | > > > >
| > > | > > > > --
| > > | > > > > MkS
| > > | > > > >
| > > | > > > >
| > > | > > > > "Ronx" wrote:
| > > | > > > >
| > > | > > > > > Start a new page with the layout you need and save as a DWT.
| > > | > > > > >
| > > | > > > > > Make editable regions.
| > > | > > > > >
| > > | > > > > > Make pages for navigation, footer etc. and include them where required.
| > > | > > > > > These pages MUST be .htm or .html, or the FrontPage include will not
| > > | > > > > > work. If the navigation is not likely to change, then place the
| > > | > > > > > navigation directly into the DWT, if it is likely to change - use an
| > > | > > > > > Include file. You can include FP includes in a DWT in the same way as
| > > | > > > > > they are included in ordinary pages.
| > > | > > > > >
| > > | > > > > > Copy the footer from the asp page into the footer area of the DWT. This
| > > | > > > > > saves learning how to use SSI (also known as ASP includes).
| > > | > > > > >
| > > | > > > > > At http://www.rxs-enterprises.org/tests/pages/dwt-sample.zip there is a
| > > | > > > > > sample DWT, asp page and include file for you to look at. It should get
| > > | > > > > > you started.
| > > | > > > > > The asp page is also at
| > > | > > > > > http://www.rxs-enterprises.org/tests/pages/sample.asp for viewing from a
| > > | > > > > > server.
| > > | > > > > > --
| > > | > > > > > Ron Symonds - Microsoft MVP (Expression)
| > > | > > > > > Reply only to group - emails will be deleted unread.
| > > | > > > > >
| > > | > > > > > http://www.rxs-enterprises.org/fp
| > > | > > > > >
| > > | > > > > >