Count Lines in Pages
Contents of Page: sidebar_old.asp
Number of Lines: 80
Last Modified: 8/22/2018 1:33:17 PM
0001: <% @Language = "VBScript" %>
0002: 
0003: <!-- #include FILE="include/adovbs.inc" -->
0004: <!-- #include FILE="include/constants.inc" -->
0005: 
0006: <%
0007: 	eventid = Request.QueryString("eventid")
0008: 	user = Request.Cookies("user")
0009: 
0010: 	Set rs = Server.CreateObject("ADODB.Recordset")
0011: 	sqlString = "SELECT * FROM mmMenu "	& _
0012: 							"WHERE Link <> '' " & _
0013: 							"AND ParentID = 10 " & _
0014: 							"AND Type <> 'X' " &_
0015: 							"ORDER BY NodeID "
0016: 							
0017: 							
0018: '	rs.Open sqlString, conn, adOpenDynamic, adLockOptimistic, adCmdText
0019: 	rs.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0020: %>
0021: 
0022: <html>
0023: 
0024: <head>
0025: 	<title>FOLGA Sidebar Menu</title>
0026: 	<link href="mm.css" rel="stylesheet" type="text/css">
0027: <target = "main">
0028:     <base target="main">
0029: </head>
0030: <body bgcolor="#ffffff" topmargin="0" marginheight="0">
0031: 
0032: <div align="left">
0033: 
0034: <table cellspacing="1" border="0" cellpadding="0" width="98%" height="53">
0035:  
0036: 
0037: 
0038: 
0039: 		
0040: <%			Do Until rs.EOF	
0041: 
0042: 
0043:      Tipo = rs("Type").Value
0044: 	   If Tipo = "B" Then
0045: 	    Where = "_blank"
0046: 	   Else
0047: 	    Where = "main"
0048: 	   End If
0049: 	%>
0050: 		<tr >
0051: 	    <td class="normbold" align="left" height="22"><a href="<%= rs("Link").Value %>" target = "<%= Where %>"><%= rs("NodeName").Value %></a></td>
0052: 	</tr>
0053: <%	   
0054:       rs.MoveNext
0055: 		Loop
0056: 		
0057: 	  If user = "jt@folga.org" Then
0058: 	  %>
0059: <tr>
0060: 	    <td class="normbold" align="left" height="22"><a href="displaymenu.asp?parent=30&title=March Madness - Administration">Admin Menu</a></td>
0061: 	</tr>
0062: 
0063: <%
0064:         End If
0065: 		rs.Close
0066: 		Set rs = Nothing	%>
0067: </table>
0068: </div>
0069: 
0070: </html>
0071: 
0072: 
0073: 
0074: 
0075: 
0076: 
0077: 
0078: 
0079: 
0080: