<% 'Start Code
'
Response.Expires = 1
Response.ExpiresAbsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
response.addheader "Cache-Control", "no-store"
response.addheader "Cache-Control", "no-cache"
response.addheader "Cache-Control", "max-age=0, must-revalidate"
response.addheader "Expires", Now
Response.CacheControl = "no-cache"

if Request.form("p_logon")= "boobies" and Request.form("p_password")= "stopwatch" then
	response.cookies("isloggedon")	=	"1"
	response.cookies("isloggedon").expires	=	Now + .25
	p_isloggedon = 1
end if
if request.cookies("isloggedon")	=	"1" then
	p_isloggedon = 1
end if

'
p_thispage	=	Request.ServerVariables("SCRIPT_NAME")			'Name of page
p_desc		=	"True Combat: "						'Used for title
p_page		=	request.querystring ("page")				'used for pagename?=
p_image		=	"<img src=""img/links/sites_w.jpg"" width=""127"">"
p_image2	=	"<img src=""img/links/sites_a.jpg"" width=""127"">"
' Set up the generic meta tags if none specified
p_robots	=	"index,follow"
p_metak		=	"True Combat,Truecombat,tc,q3tc,team terminator,video game,plans,news,combat,articles,interviews,quake,quake3,quake3 arena,server,weapons,ctf,deathmatch,last man standing,team deathmatch,bot,war,internet,play,multiplayer,strategy,strategic,tactical,tactics,action,strategy,code,development,bind,fps,rate,shooter,intense,support,maps,pak,pk3,levels,design,information,q3map2"
p_descr		=	"The latest staffing news and plans for the Quake III game, True Combat."
p_abstr		=	"Latest releases of what is in for the future of the game True Combat, also known as TC for Quake 3"
	if 	p_page	=	"news"		then	
		response.redirect "http://dynamic2.gamespy.com/~q3t/q3tnews.php"
	ElseIf 	p_page	=	"forum"		then	
		response.redirect "http://dynamic2.gamespy.com/~q3t/forum"
	ElseIf p_page	=	"team" 		then
		p_title =	"TeamTerminator - Makers of TrueCombat"
	ElseIf p_page	=	"servers" 	then
		p_title =	"How to find your server"
	ElseIf p_page 	=	"weapons"	then
		p_title =	"Weapons"
	ElseIf p_page 	= 	"downloads"	then
		p_title = 	"File Downloads"
		p_image	=	p_image2	
	ElseIf p_page 	=	"maps"		then
		p_title = 	"Official Maps"
	ElseIf p_page 	=	"mirrormirror"	then
		p_title = 	"Administrative logon"
	ElseIf p_page	=	"features"	then
		p_title =	"Features"
		p_image	=	p_image2
	ElseIf p_page	=	"manual"	then
		p_title =	"Player Manual"
	ElseIf p_page	=	"faq"		then
		p_title =	"Frequently Asked questions"
' Nothing else exists, so give them the generic news page and content
	Else	p_title =	"Current News"
		p_metak	=	"True Combat,Truecombat,tc,q3tc,team terminator,video game,plans,news,combat,articles,interviews,quake,quake3,quake3 arena,server,weapons,ctf,deathmatch,last man standing,team deathmatch,bot,war,internet,play,multiplayer,strategy,strategic,tactical,tactics,action,strategy,code,development,bind,fps,rate,shooter,intense,support,maps,pak,pk3,levels,design,information,q3map2"
		p_descr	=	"The latest staffing news and plans for the Quake III game, True Combat."
		p_abstr	=	"Latest releases of what is in for the future of the game True Combat, also known as TC for Quake 3"
	end if
'
if p_isloggedon = 1 then
	if 	Request.form("admin_action")= "edit" then
			p_page	=	"listmirrors"
			p_title =	"List of current mirrors"
			p_robots=	"noindex,nofollow"
			p_lable	=	"Edit"
			p_action=	"change"
	ElseIf	Request.form("admin_action")= "delete" then
			p_action=	"delete"
			p_page	=	"listmirrors"
			p_lable	=	"Delete"
	ElseIf	Request.form("admin_action")= "logoff" then
			response.cookies("isloggedon")	=	"0"
			response.cookies("isloggedon").expires	=	Now + .25
			p_title =	"Current News"
			p_metak	=	"True Combat,Truecombat,tc,q3tc,team terminator,video game,plans,news,combat,articles,interviews,quake,quake3,quake3 arena,server,weapons,ctf,deathmatch,last man standing,team deathmatch,bot,war,internet,play,multiplayer,strategy,strategic,tactical,tactics,action,strategy,code,development,bind,fps,rate,shooter,intense,support,maps,pak,pk3,levels,design,information,q3map2"
			p_descr	=	"The latest staffing news and plans for the Quake III game, True Combat."
			p_abstr	=	"Latest releases of what is in for the future of the game True Combat, also known as TC for Quake 3"
	ElseIf	Request.form("admin_action")= "update" then
			'dim ip,day 
			'dim cnn,rst
			p_id	=	Request.form("edit_id")
			p_title =	"Edit Mirror" & Request.form("p_description")
			p_robots=	"noindex,nofollow"
			p_page	=	"editmirrorinfo"
			p_action=	"update"
	ElseIf	Request.form("admin_action")= "change" then
			'dim ip,day 
			'dim cnn,rst
			p_id	=	Request.form("edit_id")
			p_title =	"Edit Mirror" & Request.form("p_description")
			p_robots=	"noindex,nofollow"
			p_page	=	"editmirrorinfo"
			p_action=	"change"
	ElseIf	Request.form("admin_action")= "add" then
			'dim ip,day 
			'dim cnn,rst
			p_id	=	Request.form("edit_id")
			p_title =	"Add Mirror"
			p_robots=	"noindex,nofollow"
			p_page	=	"editmirrorinfo"
			p_action=	"add"
	else
		p_page	=	"admin"
		p_title =	"Administrator Logon"
	end if
	If	Request.form("confirm")= "yes" then
			p_id	=	Request.form("edit_id")
			p_action=	"commitdelete"
			p_page	=	"listmirrors"
			p_lable	=	"Delete"
	elseif	Request.form("addmirror") = "yes" then
			p_id	=	Request.form("edit_id")
			p_action=	"commitnew"
			p_page	=	"listmirrors"
			p_lable	=	"Edit"
	end if
end if
'
' end code %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<Title>
<%= p_desc & p_title%>
</Title>
<meta name="Keywords" content="<%= p_medak%>">
<meta name="Description" content="<%= p_descr %>">
<meta name="Abstract" content="<%= p_abstr %>">
<meta name="robots" content="<%=p_robots%>">
<meta name="Identifier-URL" content="http://www.planetquake.com<%=p_thispage%>">
<meta name="Author-Corporate" content="Team Terminator">
<meta http-equiv="expires" content="Wed, 26 Feb 2001 08:21:57 GMT">
<meta name="Publisher" content="Team Terminator">
<meta name="Publisher-Email" content="j.rug@gmx.net">
<meta name="resource-type" content="document">
<meta name="Content-Language" content="en-US">
<meta name="Language" content="english">
<meta name="Revisit-After" content="10 Days">
<meta name="Rating" content="Family">
<meta name="Date-Creation-MM/DD/YYYY" content="01/01/00">
<link rel="stylesheet" href="supersex.css" type="text/css">
<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
	<!-- Dender's Preload Script (nav_to_include) -->
		<SCRIPT type="text/javascript">
		<!--
		
		function newImage(arg) {
			if (document.images) {
				rslt = new Image();
				rslt.src = arg;
				return rslt;
			}
		}
		
		function changeImages() {
			if (document.images && (preloadFlag == true)) {
				for (var i=0; i<changeImages.arguments.length; i+=2) {
					document[changeImages.arguments[i]].src = changeImages.arguments[i+1];
				}
			}
		}
		
		var preloadFlag = false;
		function preloadImages() {
			if (document.images) {
				nav_news_over = newImage("img/nav_news-over.jpg");
				nav_features_over = newImage("img/nav_features-over.jpg");
				nav_maps_over = newImage("img/nav_maps-over.jpg");
				nav_weapons_over = newImage("img/nav_weapons-over.jpg");
				nav_downloads_over = newImage("img/nav_downloads-over.jpg");
				nav_forum_over = newImage("img/nav_forum-over.jpg");
				nav_team_over = newImage("img/nav_team-over.jpg");
				nav_faq_over = newImage("img/nav_faq-over.jpg");
				nav_manual_over = newImage("img/nav_manual-over.jpg");
				preloadFlag = true;
			}
		}
		
		// -->
		</SCRIPT>
	<!-- End Preload Script -->
</head>

<BODY bgcolor="#FFFFFF"  marginheight="0" marginwidth="0" leftmargin="0" rightmargin="0" topmargin="0" marginheight="0" background="img/bg.jpg" onload="preloadImages();" link="white" alink="white" vlink="white">
 <center>
  <div align="center">
  	<table width="728" cellspacing="0" cellpadding="0" border="0">
		<tr>
			<td colspan="7" width="728" height="183">
				<CENTER>
				<IFRAME SRC="http://ads.gamespy.com/hserver/SITE=PQ/GENRE=ACTION/AREA=HOSTED/AAMSZ=IAB_FULL_BANNER?unique" 
				NORESIZE SCROLLING=NO HSPACE=0 VSPACE=0 FRAMEBORDER=0 MARGINHEIGHT=0 MARGINWIDTH=0 WIDTH=468 HEIGHT=60> 
				<SCRIPT SRC="http://ads.gamespy.com/jserver/SITE=PQ/GENRE=ACTION/AREA=HOSTED/AAMSZ=IAB_FULL_BANNER?unique"></SCRIPT>
				<NOSCRIPT><A HREF="http://ads.gamespy.com/jserver/SITE=PQ/GENRE=ACTION/AREA=HOSTED/AAMSZ=IAB_FULL_BANNER?unique"> 
				<IMG SRC="http://ads.gamespy.com/jserver/SITE=PQ/GENRE=ACTION/AREA=HOSTED/AAMSZ=IAB_FULL_BANNER?unique" border="0"></A> 
				</NOSCRIPT></IFRAME>
				<a name="atop"></a>
				</CENTER>
				<img src="img/header.jpg" width="728" height="183" alt="" border="0"><br><br>
			</td>
		</tr>
		<tr>
		    <td colspan="3" width="135" height="16" valign="top"><img src="img/nav_left_top.jpg" width="135" height="16" alt="" border="0"><br></td>
		    <td width="458" valign="top" background="img/features/highsepup.gif">
<!-- To Top Link       -->
			<a name="top"></a>
			
<!-- Main-Titel Anfang -->
			<center>
  			<div align="center">
			<table width="458" cellspacing="0" cellpadding="0" border="0" class="fatmgrey">
			 <tr>
			 	<td>
			<%	if p_page = "news" then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span><span class="fatwhite"> News </span>
			<%	elseif p_page = "team"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span><span class="fatwhite"> Teampage </span>
			<%	elseif p_page = "servers"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span><a href="index.asp?page=faq" class="linktwo"> FAQ </a> <span class="fatrouge"> </span><span class="fatwhite"> Servers </span>
			<%	elseif p_page = "weapons"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Weapons </span>
			<%	elseif p_page = "downloads"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>"class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Downloads </span>
			<%	elseif p_page = "maps"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Maps </span>
			<%	elseif p_page = "features"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Features </span>
			<%	elseif p_page = "manual"	then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Manual </span>
			<%	elseif p_page = "listmirrors"	or p_page = "editmirrorinfo" then	%>
					<span class="fatrouge"> </span> <a href="<%= p_thispage %>" class="linktwo"> Home </a> <span class="fatrouge"> </span> <span class="fatwhite"> Mirror Administration </span>
			<%	else	%>
					<span class="fatrouge"> </span><span class="fatwhite"> Home </span>
			<%	end if	%>
				</span>				
				</td>
			 </tr>
			</table>
			</div>
			</center>				
<!-- Main-Titel ENDE -->
			</td>
		    <td colspan="3" width="135" height="16" valign="top"><img src="img/nav_right_top.jpg" width="135" height="16" alt="" border="0"><br></td>
		</tr>
		<tr>
		    <td width="5" valign="top" height="100%" background="img/nav_left_border_left.gif"><img src="img/spacer.gif" width="5" height="1" alt="" border="0"><br></td>

<!-- rechte Navigation Anfang -->		    
			<td width="127" valign="top" background="img/nav_left_downstretcher.gif">
				<table width="127" cellspacing="0" cellpadding="0" border="0">
					<tr>
						<td valign="top">
						
						<TABLE width="127" border="0" cellpadding="0" cellspacing="0" valign="top">
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=news" target="_self"
										onmouseover="changeImages('nav_news', 'img/nav_news-over.jpg'); return true;"
										onmouseout="changeImages('nav_news', 'img/nav_news.jpg'); return true;">
										<IMG name="nav_news" src="img/nav_news.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="37">
									<A href="<%= p_thispage %>?page=features" target="_self"
										onmouseover="changeImages('nav_features', 'img/nav_features-over.jpg'); return true;"
										onmouseout="changeImages('nav_features', 'img/nav_features.jpg'); return true;">
										<IMG name="nav_features" src="img/nav_features.jpg" width="127" height="37" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=maps" target="_self"
										onmouseover="changeImages('nav_maps', 'img/nav_maps-over.jpg'); return true;"
										onmouseout="changeImages('nav_maps', 'img/nav_maps.jpg'); return true;">
										<IMG name="nav_maps" src="img/nav_maps.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=weapons" target="_self"
										onmouseover="changeImages('nav_weapons', 'img/nav_weapons-over.jpg'); return true;"
										onmouseout="changeImages('nav_weapons', 'img/nav_weapons.jpg'); return true;">
										<IMG name="nav_weapons" src="img/nav_weapons.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=downloads" target="_self"
										onmouseover="changeImages('nav_downloads', 'img/nav_downloads-over.jpg'); return true;"
										onmouseout="changeImages('nav_downloads', 'img/nav_downloads.jpg'); return true;">
										<IMG name="nav_downloads" src="img/nav_downloads.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=forum" target="_self"
										onmouseover="changeImages('nav_forum', 'img/nav_forum-over.jpg'); return true;"
										onmouseout="changeImages('nav_forum', 'img/nav_forum.jpg'); return true;">
										<IMG name="nav_forum" src="img/nav_forum.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=team" target="_self"
										onmouseover="changeImages('nav_team', 'img/nav_team-over.jpg'); return true;"
										onmouseout="changeImages('nav_team', 'img/nav_team.jpg'); return true;">
										<IMG name="nav_team" src="img/nav_team.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=faq" target="_self"
										onmouseover="changeImages('nav_faq', 'img/nav_faq-over.jpg'); return true;"
										onmouseout="changeImages('nav_faq', 'img/nav_faq.jpg'); return true;">
										<IMG name="nav_faq" src="img/nav_faq.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
							<TR>
								<TD width="127" height="36">
									<A href="<%= p_thispage %>?page=manual" target="_self"
										onmouseover="changeImages('nav_manual', 'img/nav_manual-over.jpg'); return true;"
										onmouseout="changeImages('nav_manual', 'img/nav_manual.jpg'); return true;">
										<IMG name="nav_manual" src="img/nav_manual.jpg" width="127" height="36" border="0" /></A></TD>
							</TR>
							<TR>
								<TD width="127" height="2">
									<IMG src="img/button_cutter.jpg" width="127" height="2" /></TD>
							</TR>
						</TABLE>
												
						</td>
					</tr>
					<tr>
						<td valign="middle"><img src="img/nav_left_ttangel.jpg" width="127" height="316" alt="TeamTerminator" border="0"></td>
					</tr>
				</table>			
			</td>
<!-- rechte Navigation Ende -->		
			
		    <td width="3" valign="top" height="100%" background="img/nav_left_border_r.gif"><img src="img/spacer.gif" width="3" height="1" alt="" border="0"><br></td>
			<td valign="top">
			
<!-- Main-Bereich Anfang -->
				
				
				
	  			
			<% 
				if p_page = 	"news"		then%>
				<!-- #include file="news.inc" -->
			<%	ElseIf p_page = "team" 	then%>
				<!-- #include file="team.inc" -->
			<%	ElseIf p_page = "servers"	then%>
				<!-- #include file="servers.inc" -->
			<%	ElseIf p_page = "weapons"	then%>
				<!-- #include file="weapons.inc" -->
			<%	ElseIf p_page = "downloads"	then%>
				<!-- #include file="downloads.asp" -->
			<%	ElseIf p_page = "maps"		then%>
				<!-- #include file="maps.inc" -->
			<%	ElseIf p_page = "features"	then%>
				<!-- #include file="features.inc" -->
			<%	ElseIf p_page = "manual"	then%>
				<!-- #include file="manual.inc" -->
			<%	ElseIf p_page = "faq"		then%>
				<!-- #include file="faq.inc" -->
			<%	ElseIf p_page = "admin"		then%>
				<!-- #include file="admin.asp" -->
			<%	ElseIf p_page = "mirrormirror"	then%>
				<!-- #include file="atat.asp" -->
			<%	ElseIf p_page = "listmirrors"	then%>
				<!-- #include file="listmirrors.asp" -->
			<%	ElseIf p_page = "editmirrorinfo"	then%>
				<!-- #include file="editmirrorinfo.asp" -->
			<%	Else %>
				<!-- #include file="home.inc" -->
			<%	end if	%>				
				
					
				
				

<!-- Main-Bereich Ende -->

			
			</td>
		    <td width="3" valign="top" height="100%" background="img/nav_right_border_left.gif">    <img src="img/spacer.gif" width="3" height="1" border="0"><br></td>
		    <td width="127" valign="top" height="100%" background="img/nav_right_downstretcher.jpg">
			<%= p_image %>			
			<br><bR>
			
			
			<a href="http://www.truecombat.de/" target="_blank"><img src="img/links/tcde.gif" border="1" width="125"></a><br><br>
			<a href="http://www.planetquake.com/" target="_blank"><img src="img/links/pq.gif" border="1" width="125"></a><br><br>
			<a href="http://www.extreme-players.de/" target="_blank"><img src="img/links/exp.gif" border="1" width="125"></a><br><br>
			<a href="http://www.combatnation.com/" target="_blank"><img src="img/links/cn.gif" border="1" width="125"></a><br><br>
			<a href="http://www.truecombat.prv.pl/" target="_blank"><img src="img/links/prvpl.jpg" border="1" width="125"></a><br><br>
			<a href="http://www.clanmonster.de/" target="_blank"><img src="img/links/clanmonster.jpg" border="1" width="125"></a><br><br>
			
			<!--
			<OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" WIDTH="127" HEIGHT="288" id="test1" ALIGN="">
 				<PARAM NAME=movie VALUE="test1.swf"> <PARAM NAME=quality VALUE=high> <PARAM NAME=bgcolor VALUE=#FFFFFF> <EMBED src="img/test1.swf" quality=high bgcolor=#FFFFFF  WIDTH="127" HEIGHT="288" NAME="test1" ALIGN=""
 				TYPE="application/x-shockwave-flash" PLUGINSPAGE="http://www.macromedia.com/go/getflashplayer"></EMBED>
			</OBJECT>
			-->
			<img src="img/nav_right_fixed_space.jpg" width="127" height="325" border="0"><br></td>
		    <td width="5" valign="top" height="100%" background="img/nav_right_border_right.gif">   <img src="img/spacer.gif" width="5" height="1" border="0"><br></td>
		</tr>
		<tr>
		    <td colspan="7"><a href="#atop"><img src="img/footer.jpg" width="728" height="18" alt="" border="0"></a><br></td>
		</tr>
	</table>
	<br>
  </div>
 </center>
 <img src="http://www.shadowspawn.net/stats/truecombat.asp?page=<%= p_page%>
</body>
</html>
**************************************************************
downloads.asp
<%
Response.Expires = 1
Response.ExpiresAbsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
%>
<table bordeR="0" cellpadding="0" cellspacing="0" width="458">
	<tr>
	<td align="center">
	<p>
	<TABLE width="458" border="0" cellpadding="0" cellspacing="0" align="center">
		<TR>
			<TD width="183" height="69">
			<IMG src="img/01_dl.jpg" width="183" height="69" /></TD>
			<TD width="76" height="69">
			<IMG src="img/02_dl.jpg" width="76" height="69" /></TD>
			<TD width="199" height="69">
			<IMG src="img/03_dl.jpg" width="199" height="69" /></TD>
			</TR>
		<TR>
			<TD width="183" height="25">
			<IMG src="img/04_dl.jpg" width="183" height="25" /></TD>
			<TD width="76" height="25">
			<IMG src="img/05_dl.jpg" width="76" height="25" /></TD>
			<TD width="199" height="25">
			<IMG src="img/06_dl.jpg" width="199" height="25" /></TD>
		</TR>
	</TABLE>
	</p>
<!-- DL Table -->
	<p>
	<TABLE width="418" border="0" cellpadding="0" cellspacing="0">
		<TR>
			<TD width="418" height="1" colspan="7" bgcolor="#FF7800">
			<IMG src="img/spacer.gif" /></TD>
		</TR>
		<TR>
			<TD width="1" height="272" rowspan="3" bgcolor="#FF7800">
				<IMG src="img/spacer.gif" /></TD>
			<TD width="138" height="73">
				<IMG src="img/dl_table_06.jpg" width="138" height="73" /></TD>
			<TD width="1" height="272" rowspan="3" bgcolor="#9B9B9B">
				<IMG src="img/spacer.gif" /></TD>
			<TD width="138" height="73">
				<IMG src="img/dl_table_08.jpg" width="138" height="73" /></TD>
			<TD width="1" height="272" rowspan="3" bgcolor="#9B9B9B">
				<IMG src="img/spacer.gif" /></TD>
			<TD width="138" height="73">
				<IMG src="img/dl_table_10.jpg" width="138" height="73" /></TD>
			<TD width="1" height="272" rowspan="3" bgcolor="#813D00">
				<IMG src="img/spacer.gif" /></TD>
		</TR>
		<TR>
			<TD width="138" height="15">
				<IMG src="img/dl_table_12.gif" width="138" height="15" /></TD>
			<TD width="138" height="15">
				<IMG src="img/dl_table_13.gif" width="138" height="15" /></TD>
			<TD width="138" height="15">
				<IMG src="img/dl_table_14.gif" width="138" height="15" /></TD>
		</TR>
		<TR>
			<TD width="138" height="184" bgcolor="#878787" valign="top">
				<p class="thiblack" align="justify" style="padding:7px;">
					<a href="#dl_windows"><img src="img/exeinstall.gif" border="0"> (.exe File)</a> <br><br>
				</p>
				<p class="thiblack" style="padding:7px;">
					Download TrueCombat Beta 1.0 for your Windows. Installation with comfortable Windowsinstaller.
				</p>
			</TD>
			
			<TD width="138" height="184" bgcolor="#878787" valign="top">
				<p class="thiblack" align="justify" style="padding:7px;">
					<a href="#dl_linux"><img src="img/zipinstall.gif" border="0"> (.zip File)</a> <br><br>
			 	</p>
				<p class="thiblack" style="padding:7px;">
					Download TrueCombat Beta 1.0 for your Linux distribution. If your Linux runs Q3 it also runs TrueCombat. Refer the Readme into the pack for install informations.
				</p>
			</TD>
			
			<TD width="138" height="184" bgcolor="#878787" valign="top">
				<p class="thiblack" align="justify" style="padding:7px;">
					<a href="#dl_mac"><img src="img/zipinstall.gif" border="0"> (.zip File)</a> <br><br>
				</p>
				<p class="thiblack" style="padding:7px;">
					As a Mac friendly community, we serve you a Mac friendly version of TrueCombat Beta 1.0 . Have a look at the Readme inside the pack for install informations.
				</p>	
			</TD>
		</TR>
		<TR>
			<TD width="418" height="1" colspan="7" bgcolor="#813D00">
				<IMG src="img/spacer.gif" /></TD>
		</TR>
	</TABLE>
<script language="JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</script>	
<%
p_height	= 8
p_widthfactor	=	7
dim ip,day 
dim cnn,rst 
p_ip		= Request.ServerVariables("REMOTE_ADDR")
p_ua		= Request.ServerVariables("HTTP_USER_AGENT")
day		= now
set cnn 	= Server.CreateObject("ADODB.Connection")
set rst 	= Server.CreateObject("ADODB.RecordSet")
cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
sqltext		= "SELECT * FROM downloads ORDER BY p_rating DESC"
rst.Open sqltext,cnn,3,3
%>
<a name="dl_windows">&nbsp;</a>
<span class="fatwhite"> Download Mirrors for Windows</span> <a href="#top"> <img src="img/up.gif" border="0"></a>
<table border="0" cellspacing="0" cellpadding="0" width="450">
	<tr>
	<td width="20%"><font size="1" color="FFFFFF">Location</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Host</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Type</font></td>
	<td width="20%" ><font size="1" color="FFFFFF">Size</font></td>
<!--	<td width="20%"><font size="1" color="FFFFFF">Count</font></td>-->
	<td width="20%"><font size="1" color="FFFFFF">Rating</font></td>
	</tr>
<%
rst.MoveFirst
while not rst.EOF
	if rst("p_platform")= "windows" then
	p_rating=	rst("p_rating")
	p_red	=	(10- p_rating)
	p_green	=	p_rating
	p_green	=	(p_green * p_widthfactor)
	p_red	=	(p_red * p_widthfactor)
%>
	<tr>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_location")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><a href="#" onClick="MM_openBrWindow('chooser.asp?file=<%=rst("p_id")%>&nocache=<%=Server.URLEncode(Now)%>','chooser','width=402,height=402')"><%= rst("p_description")%></a>&nbsp;&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filedescription")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filesize")%></td>
<!--	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_downloads")%></td> -->
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1"><img src="img/green.gif" width="<%= p_green%>" height="<%=p_height%>"><img src="img/white.gif" width="2" height="<%=p_height%>"><img src="img/red.gif" width="<%=p_red%>" height="<%=p_height%>"></td>
	</tr>
<%
	end if
rst.MoveNext 
wend
%>
</table>
<p>&nbsp;<p>
  <img src="img/features/highsep.gif" width="458" height="10">
<a name="dl_linux">&nbsp;</a>
<span class="fatwhite"> Download Mirrors for Linux</span> <a href="#top"> <img src="img/up.gif" border="0"></a>
<table border="0" cellspacing="0" cellpadding="0" width="450">
	<tr>
	<td width="20%"><font size="1" color="FFFFFF">Location</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Host</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Type</font></td>
	<td width="20%" ><font size="1" color="FFFFFF">Size</font></td>
<!--	<td width="20%"><font size="1" color="FFFFFF">Count</font></td>-->
	<td width="20%"><font size="1" color="FFFFFF">Rating</font></td>
	</tr>
<%
rst.MoveFirst
while not rst.EOF
	if rst("p_platform")= "linux" then
	p_rating=	rst("p_rating")
	p_red	=	(10- p_rating)
	p_green	=	p_rating
	p_green	=	(p_green * p_widthfactor)
	p_red	=	(p_red * p_widthfactor)
%>
	<tr>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_location")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><a href="#" onClick="MM_openBrWindow('chooser.asp?file=<%=rst("p_id")%>&nocache=<%=Server.URLEncode(Now)%>','chooser','width=402,height=402')"><%= rst("p_description")%></a>&nbsp;&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filedescription")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filesize")%></td>
<!--	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_downloads")%></td> -->
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1"><img src="img/green.gif" width="<%= p_green%>" height="<%=p_height%>"><img src="img/white.gif" width="2" height="<%=p_height%>"><img src="img/red.gif" width="<%=p_red%>" height="<%=p_height%>"></td>
	</tr>
<%
	end if
rst.MoveNext 
wend
%>
</table>
<p>&nbsp;<p>
  <img src="img/features/highsep.gif" width="458" height="10">
<a name="dl_mac">&nbsp;</a>
<span class="fatwhite"> Download Mirrors for Macintosh</span> <a href="#top"> <img src="img/up.gif" border="0"></a>
<table border="0" cellspacing="0" cellpadding="0" width="450">
	<tr>
	<td width="20%"><font size="1" color="FFFFFF">Location</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Host</font></td>
	<td width="20%"><font size="1" color="FFFFFF">Type</font></td>
	<td width="20%" ><font size="1" color="FFFFFF">Size</font></td>
<!--	<td width="20%"><font size="1" color="FFFFFF">Count</font></td>-->
	<td width="20%"><font size="1" color="FFFFFF">Rating</font></td>
	</tr>
<%
rst.MoveFirst
while not rst.EOF
	if rst("p_platform")= "mac" then
	p_rating=	rst("p_rating")
	p_red	=	(10- p_rating)
	p_green	=	p_rating
	p_green	=	(p_green * p_widthfactor)
	p_red	=	(p_red * p_widthfactor)
%>
	<tr>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_location")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><a href="#" onClick="MM_openBrWindow('chooser.asp?file=<%=rst("p_id")%>&nocache=<%=Server.URLEncode(Now)%>','chooser','width=402,height=402')"><%= rst("p_description")%></a>&nbsp;&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filedescription")%>&nbsp;</td>
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_filesize")%></td>
<!--	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1" class="download1"><%= rst("p_downloads")%></td> -->
	<td bgcolor="#878787" nowrap width="16%" style="border-style: solid; border-width: 1"><img src="img/green.gif" width="<%= p_green%>" height="<%=p_height%>"><img src="img/white.gif" width="2" height="<%=p_height%>"><img src="img/red.gif" width="<%=p_red%>" height="<%=p_height%>"></td>
	</tr>
<%
	end if
rst.MoveNext 
wend
rst.close
set rst	=	nothing
cnn.close
set cnn =	nothing
%>
</table>
   <p></p>
   <img src="img/features/highsep.gif" width="458" height="10">
  </td>
 </tr>
</table>
**********************************************
chooser.asp
<%
Response.Expires = 1
Response.ExpiresAbsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
p_id	=	request.querystring("file")
	if p_id = "" then
		p_id	= 1
	end if
p_goto	=	request.querystring("p_goto")
p_file	=	request.querystring("p_id")
p_do	=	request.querystring("p_download")
	if p_do = "yes" then
		set cnn 	= Server.CreateObject("ADODB.Connection")
		set rst 	= Server.CreateObject("ADODB.RecordSet")
		cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
		sqltext		= "SELECT * FROM downloads where p_id =" & p_file
		rst.Open sqltext,cnn,3,3
		p_update= rst("p_downloads")
		p_update= p_update + 1
		rst("p_downloads") = p_update
		rst.Update
		rst.close
		set rst	=	nothing
		cnn.close
		set cnn =	nothing	
		response.redirect(p_goto)
	end if
p_height	= 8
dim ip,day 
dim cnn,rst 
p_ip		= Request.ServerVariables("REMOTE_ADDR")
p_ua		= Request.ServerVariables("HTTP_USER_AGENT")
day		= now
set cnn 	= Server.CreateObject("ADODB.Connection")
set rst 	= Server.CreateObject("ADODB.RecordSet")
cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
sqltext		= "SELECT * FROM downloads where p_id =" & p_id
p_didvote	= request.form("didvote")
if p_didvote = "yes" then
	p_voteId = request.form("voteId")
	sqltext	= "SELECT * FROM downloads where p_id =" & p_voteId
end if
rst.Open sqltext,cnn,3,3
	if rst("p_direct") = 0 then
		p_target	=	"_new"
		p_new		=	"no"
	end if
p_description	= rst("p_description")
p_url		= rst("p_url")
p_didvote	= request.form("didvote")
p_votecount	= rst("p_votecount")
p_torate	= rst("p_rating")
p_torate2	= rst("p_rating")
p_torate3	= rst("p_rating")
rst.close
set rst	=	nothing
cnn.close
set cnn =	nothing	
if p_didvote = "yes" then
	p_ip 				= Request.ServerVariables("REMOTE_ADDR")
	p_ip2				= Server.urlencode (p_ip)
	p_voteId		= request.form("voteId")
	set cnn 		= Server.CreateObject("ADODB.Connection")
	set rst 		= Server.CreateObject("ADODB.RecordSet")
	cnn.Open 		"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
	sqltext			= "downloads where p_id =" & request.form("voteId")
	rst.Open sqltext,cnn,3,3
	p_getrate 		= request.form("R1")
	p_getrate		= CInt(p_getrate)
	p_torate		= (p_torate * p_votecount)
	p_torate		= p_torate + p_getrate
	p_votecount		= (p_votecount + 1)
	p_torate		= (p_torate / p_votecount)
	rst("p_rating") 	= p_torate
	rst.Update
	rst("p_votecount")	= p_votecount
	rst.Update
	rst.close
	set rst			= nothing
	cnn.close
	set cnn 		= nothing
	p_did			= "did"
end if
%>
<HTML xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">

<head>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "DTD/xhtml1-transitional.dtd">
<title><%= p_description %>: True Combat Download</title>                                                                                                                          
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<link rel="stylesheet" type="text/css" href="http://www.planetquake.com/q3t/content/supersex.css">


</head>
<script>
function EvalSound(soundobj) {
  var thissound= eval("document."+soundobj);
  thissound.Play();
}
</script>
<embed src="http://www.planetquake.com/q3t/content/img/reload2.wav" autostart=false hidden=true name="sound1">
<body topmargin="0" leftmargin="0" marginheight="0" marginwidth="0" bgcolor="#423A3A" <% if p_didvote = "yes" then %> onLoad="setTimeout(window.close, 10)" <% else%> onLoad="EvalSound('sound1')"<% end if%>>
<div align="center">
 <center>
<table border = "1" cellspacing="0" cellpadding="0">
<table border="0" width="400" height="378" cellspacing="0" cellpadding="0">
 <tr>
  <td width="100%" height="5%" valign="middle" align="center" bgcolor="#5B5B5B">
  <p class="newstitel"><img border="0" src="http://www.planetquake.com/q3t/content/img/download_logo.jpg" width="400" height="67"></p>
  </td>
 </tr>
 <tr>
  <td width="100%" bgcolor="#313131" valign="top">
<% if p_didvote <> "yes" then %>
  <p class="newstitel" align="center">Downloading True Combat from<br>
<font color="#FF9900"><%= p_description%></font></p>
<p class="fatwhite" style="margin-left: 4">If you noticed where the ratings come from on each location, it's by people like you. Take a moment after the download starts and let us know how the speed is going by selecting it from the scale below.</p>
<% if p_new = "no" then %>
		<p class="fatwhite" style="margin-left: 4">Your download is available by <a href="chooser.asp?p_goto=<%= p_url%>&p_id=<%= p_id%>&p_download=yes" target="_new"><font color="#FF9933"><u> clicking here</u></font></a>. This site does not provide a direct link the the download, however a new window will open up where you may choose which mirror is best for you.</p>
	<%else%>
		<p class="fatwhite" style="margin-left: 4">Your download is available by <a href="chooser.asp?p_goto=<%= p_url%>&p_id=<%= p_id%>&p_download=yes" target="_new"><font color="#FF9933"><u> clicking here</u></font></a>.<br>&nbsp;<br>&nbsp;</p>
<%  end if %>
  <p class="fatwhite" style="margin-left: 4">Once your download has completed, follow the instructions carefully, and if you are a returning player please read over the changes and &quot;readme&quot; to see what has changed. If you have any questions, problems, or comments come on by #truecombat on irc.gamesnet.net or come over to our <a href="http://www.planetquake.com/q3t/content/index.asp?page=forum" target="_blank"><font color="#FF9933"><u>forums</u></font></a>.</p>
<p class="fatwhite" style="margin-left: 4">-Team Terminator<br>
&nbsp;
  </td>
 </tr>
 <tr>
  <td width="100%" height="5%" bgcolor="#313131" valign="top" align="center">

      <p class="fatdgrey">------------------------------------------------------------------------------<br>
      Good <img border="0" src="http://www.planetquake.com/q3t/content/img/rate.gif" width="340" height="9"> Bad
      <table border="0" width="350" cellspacing="0" cellpadding="0">    
      <form method="post" action="chooser.asp">
      <input type="hidden" value="yes" name="didvote">
      <input type="hidden" value=<%= p_id%> name="voteId">
       <tr>
        <td width="10%" valign="middle" align="center"><input type="radio" value="10" name="R1" checked></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="9" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="8" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="7" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="6" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="5" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="4" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="3" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="2" name="R1"></td>
        <td width="10%" valign="middle" align="center"><input type="radio" value="1" name="R1"></td>
       </tr>
       <tr>
        <td width="100%" valign="middle" align="center" colspan="10">
     <input type="submit" value="Vote and Close Window" name="B1" style="font-size: 8pt">
<% else %>
<center>
<br><br>
<p class="newstitel" align="center"><br><br>Thank you for voting.</p>
<br>
<a href="javascript:window.close();">Close This Window</a><br>
<% if p_debug = "1" then %>
<p>
<font size="-2" color="D0D0D0">
<b>Debug</b><br>
count:<%= p_votecount %><br>
torate:<%= p_torate %><br>
torate2:<%= p_torate2 %><br>
torate3:<%= p_torate3 %><br>
getrate:<%= p_getrate%><br>
didvote:<%= p_didvote%><br>
DidVote:<%= p_did%><br>
FileID is:<%= request.form("voteId")%><br>
</font>
<%end if%>

<%end if%>

        </td>
       </tr>    </form>
      </table>

  </td>
 </tr>
</table>
</table>
 </center>
</div>
</body>

</HTML>
***************************************************
listmirrors.asp
<%
Response.Expires = 1
Response.ExpiresAbsolute = Now() - 2
Response.CacheControl = "no-cache"
If p_action		= "commitdelete" then
	p_id		= Request.form("edit_id")
	set cnn 	= Server.CreateObject("ADODB.Connection")
	set rst 	= Server.CreateObject("ADODB.RecordSet")
	cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
	sqltext		= "SELECT * FROM downloads where p_id =" & p_id
	rst.Open sqltext,cnn,3,3
	rst.Delete
	rst.close
	set rst	=	nothing
	cnn.close
	set cnn =	nothing
	p_status2="Deletion Successful"
	p_action ="delete"
elseIf p_action		= "commitnew" then
	p_key		= request.form("p_new")
	if p_key	=	"" then
		p_key	=	1234
	end if
	set cnn 	= Server.CreateObject("ADODB.Connection")
	set rst 	= Server.CreateObject("ADODB.RecordSet")
	cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
	sqltext		= "downloads"
	rst.Open sqltext,cnn,3,3
	rst("p_id")			= p_key
	rst.AddNew
	rst.Update
	rst.close
	set rst	=	nothing
	cnn.close
	set cnn =	nothing
	set cnn 	= Server.CreateObject("ADODB.Connection")
	set rst 	= Server.CreateObject("ADODB.RecordSet")
	cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
	sqltext		= "downloads where p_id =" & p_key
	rst.Open sqltext,cnn,3,3
	rst("p_description")		= request.form("p_description")
	rst.Update
	rst("p_url")			= request.form("p_url")
	rst.Update
	p_direct2		= request.form("p_direct")
		if p_direct2 = "1" then
			p_direct = 1
		else
			p_direct = 0
		end if
	rst("p_direct")			= p_direct
	rst.Update
	rst("p_filedescription")	= request.form("p_filedescription")
	rst.Update
	rst("p_filesize")		= request.form("p_filesize")
	rst.Update
	rst("p_platform")		= request.form("p_platform")
	rst.Update
	rst("p_location")		= request.form("p_location")
	rst.Update
	rst("p_votecount")		= 1
	rst.Update
	rst("p_rating")			= 10
	rst.Update
	rst("p_comment")		= request.form("p_comment")
	rst.Update
	p_status			= "Update Successfull"
	p_action			= "update"
	rst.close
	set rst	=	nothing
	cnn.close
	set cnn =	nothing
	p_status2="Addition Successful"
	p_action ="change"
	p_lable	= "Edit"
end if
'
'dim ip,day 
'dim cnn,rst 
p_ip		= Request.ServerVariables("REMOTE_ADDR")
p_ua		= Request.ServerVariables("HTTP_USER_AGENT")
day		= now
set cnn 	= Server.CreateObject("ADODB.Connection")
set rst 	= Server.CreateObject("ADODB.RecordSet")
cnn.Open 	"driver={Microsoft Access Driver (*.mdb)};DBQ=\\netapp1\www\planetquake\q3t\database\truecombat.mdb;"
sqltext		= "SELECT * FROM downloads ORDER BY p_id ASC"
rst.Open sqltext,cnn,3,3
%>
<p align="center"><font face="Verdana" size="3"><b><font color="#800000"><%= p_status2 %></font></b></font></p>
<p align="center"><b><font face="Verdana" size="2" color="#FF9933">Current Mirror List</font></b>
                <form method="post" action="index.asp">
                <input type="hidden" value="<%= p_action %>" name="admin_action">
<div align="center">
 <center>
                  <table border="1" cellspacing="0" cellpadding="0">
<%
rst.MoveFirst
while not rst.EOF
	if rst("p_id") > 0 then
%>
                    <tr>
                      <td valign="top" align="left" nowrap bgcolor="#414141"><font size="1" face="Arial"><input type="radio" value="<%=rst("p_id")%>" name="edit_id"></font></td>
                      <td valign="top" align="left" nowrap bgcolor="#494949"><font size="1" face="Arial">ID:<%=rst("p_id")%></font></td>
                      <td valign="top" align="left" nowrap bgcolor="#575757"><font size="1" face="Arial">Url: <%=rst("p_url")%>&nbsp;</font></td>
                      <td valign="top" align="left" nowrap bgcolor="#6C4243"><font size="1" face="Arial">&nbsp; <%=rst("p_description")%>&nbsp;&nbsp;</font></td>
                    </tr>

<%
	end if				
rst.MoveNext 
wend
rst.close
set rst	=	nothing
cnn.close
set cnn =	nothing
%>
                    <tr>
                      <td valign="top" align="center" nowrap bgcolor="#E7E6DE" colspan="4">
                      <% if p_lable = "Delete" then%>
                      <input type="checkbox" name="confirm" value = "yes">
                      <% end if %>
                      <input type="submit" name="Edit" value="<%= p_lable%>"></td>
                    </tr>

                  </table>
 </center>
</div>

                </form>