<%
'***********************************************************************
'** Copyright (C) 2001 - 2004 Max Yuan All Rights Reserved
'**
'** By using this program, you are agreeing to the terms of the
'** GNU General Public License.
'**
'** This program is free software; you can redistribute it and/or
'** modify it under the terms of the GNU General Public License
'** as published by the Free Software Foundation; either version 2
'** of the License, or any later version.
'**
'** All copyright notices regarding MaxWebPortal must remain intact
'** in the scripts and in the outputted HTML.
'** The "powered by" text/logo with a link back to 
'** http://www.maxwebportal.com in the footer of the pages MUST
'** remain visible when the pages are viewed on the internet or intranet.
'**
'** Support can be obtained from support forums at:
'** http://www.maxwebportal.com
'**
'** Email: maxwebportal@hotmail.com
'** ICQ: 148111300
'***********************************************************************
%><!-- #INCLUDE FILE="config.asp" -->
<% If Session(strCookieURL & "Approval") = "256697926329" Then %> 
<!-- #INCLUDE FILE="inc_functions.asp" -->
<!-- #INCLUDE FILE="inc_top.asp" -->
<table border="0" width="100%">
  <tr>
    <td width="33%" align="left" nowrap><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">
    <img src="icon_folder_open.gif" height=15 width=15 border="0">&nbsp;<a href="default.asp">Home</a><br>
    <img src="icon_blank.gif" height=15 width=15 border="0"><img src="icon_folder_open_topic.gif" height=15 width=15 border="0">&nbsp;<a href="admin_home.asp">Admin Section</a><br>
	<img src="icon_blank.gif" height=15 width=15 border="0"><img src="icon_blank.gif" height=15 width=15 border="0"><img src="icon_folder_open_topic.gif" height=15 width=15 border="0">&nbsp;<a href="admin_dl_main.asp">Download Admin</a><br>
    </font></td>
  </tr>
</table>
<table width="100%" border="0">
	<tr>
		<td width="25%" valign=top>
<!--#include file="admin_dl_menu.asp" -->
		</td>
		<td width="75%" align="center">
<%

url = Request.QueryString("id")


Set RS = my_Conn.Execute("select * from DL where DL_ID =" & url)

%>
<FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="#008000">
<b>Editing URL:</b></font>
<form action="admin_dl_step1update.asp" method="post">
<table border="0">
  <tr>
    <td align="right">
      <input type="hidden" name="webid" value="<%=url%>">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>"> 
      <b>Website Name :</b></font></td><td><input type="text" value="<%=ChkString(RS("Name"), "edit")%>" name="name" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Download URL :</b></font></td><td><input type="text" value="<%=ChkString(RS("URL"), "edit")%>" name="URL" size="40" id=text1 name=text1></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Description :</b></font></td><td><textarea name="des" cols=30 rows=4><%= ChkString(rs("Description"), "display") %></textarea></td></tr>  
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Keyword :</b></font></td><td><textarea name="keyword" cols=30 rows=4><%=ChkString(RS("keyword"), "display")%></textarea></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Email :</b></font></td><td><input type="text" value="<%=ChkString(RS("email"), "edit")%>" name="email" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>File Size :</b></font></td><td><input type="text" value="<%=ChkString(RS("filesize"), "edit")%>" name="filesize" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>License :</b></font></td><td><input type="text" value="<%=ChkString(RS("license"), "edit")%>" name="license" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Language :</b></font></td><td><input type="text" value="<%=ChkString(RS("lang"), "edit")%>" name="lang" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Platform :</b></font></td><td><input type="text" value="<%=ChkString(RS("platform"), "edit")%>" name="platform" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Publisher :</b></font></td><td><input type="text" value="<%=ChkString(RS("publisher"), "edit")%>" name="publisher" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Publisher's Website :</b></font></td><td><input type="text" value="<%=ChkString(RS("publisher_url"), "edit")%>" name="publisher_url" size="40"></td></tr>
  <tr>
    <td align="right">
      <FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">
      <b>Uploader :</b></font></td><td><input type="text" value="<%=ChkString(RS("uploader"), "edit")%>" name="uploader" size="40"></td></tr>
  <tr>
    <td colspan=2 align="right">
      <input type="submit" value="Update first step"><input type="reset" value="Cancel">&nbsp;<FONT face=<%= strDefaultFontFace %> size="<%= strDefaultFontSize %>" color="<%= strDefaultFontColor %>">Update</font><input type="checkbox" name="newDate" value="1"></td></tr>
</table>
</form> 

<%



RS.Close 
set RS = nothing ' added
%>
		</td>
	</tr>
</table>
<br>
<!-- #INCLUDE FILE="inc_footer.asp" -->
<% Else %><% Response.Redirect "admin_login.asp" %><% End If %>