quote:

---

Originally posted by www.superdeejay.net

okay I repeat. These two files must be to only editing from the admin, can editing all thanks!

---

<!--#INCLUDE FILE="config.asp" -->

<% If Session(strCookieURL & "Approval") = "15916941253" Then %> 

<!--#INCLUDE FILE="config.asp" -->
<% If Session(strCookieURL & "Approval") = "15916941253" Then %> 
<!--#INCLUDE FILE="inc_functions.asp" -->
<!--#INCLUDE FILE="inc_top.asp" -->


<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
strSql = "INSERT INTO FORUM_FILES("
strSql = strSql & "Name,"
strSql = strSql & "Author,"
strSql = strSql & "Description,"
strSql = strSql & "FileSize,"
strSql = strSql & "Version,"
strSql = strSql & "Compatible,"
strSql = strSql & "URL)"

strSql = strSql & "Values("
strSql = strSql & "'" & Replace(Request.Form("Name"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("Author"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("Description"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("FileSize"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("Version"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("Compatible"),"'","''") & "', "
strSql = strSql & "'" & Replace(Request.Form("URL"),"'","''") & "')"

my_conn.Execute (strSql)
my_conn.Close
Set my_conn = Nothing
Response.Write("<Center>File aggiunto con Successo!")
Response.Write("<a href=""admin_library.asp"">Torna Indietro!</a>")
Response.Write("</Center>")
Else %>


<table border="0" width="100%">
<tr>
<td width="33%" align="left" nowrap><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">
<img src="images/icon_folder_open.gif" height=15 width=15 border="0"> <a href="default.asp">Tutti i Forum</a><br>
<img src="images/icon_bar.gif" height=15 width=15 border="0"><img src="images/icon_folder_open.gif" height=15 width=15 border="0"> <a href="admin_home.asp">Sezione Amministratore</a><br>
<img src="images/icon_blank.gif" height=15 width=15 border="0"><img src="images/icon_bar.gif" height=15 width=15 border="0"><img src="images/icon_folder_open_topic.gif" height=15 width=15 border="0">Download File<br></font></td>
</tr>
</table>
<Center>
<a href="Admin_library.asp">Aggiungi File</a>|<a href="Admin_library_del.asp">Elimina File</a>
</Center>
<table border="0" cellspacing="0" cellpadding="0" align=center>
<Form Method="Post" Action="Admin_library.asp">

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Nome</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="Name"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Autore</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="Author"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Descrizione</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="Description"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Grandezza del File</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="FileSize"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Versione</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="Version"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">Compatibile</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><select size="1" name="Compatible">
    <option value="3.3.0.5">3.3.0.5</option>
    <option>3.3.03</option>
    <option>3.1.sr4</option>
    <option>Tutte le versioni</option></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<font face="<% =strDefaultFontFace %>" size="<% =strHeaderFontSize %>">URL</Font></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="text" name="URL"></TD>
</TR>

<TR>
<td bgColor="<% =strPopUpTableColor %>">
<INPUT Type="submit" Value="Invia" name="Submit"></TD>
<td bgColor="<% =strPopUpTableColor %>"><INPUT Type="reset" Value="Cancella" name="B2"></TD>
</TR>

</FORM>
</TABLE>
<%End If%>
<%	WriteFooter
Else
	scriptname = split(request.servervariables("SCRIPT_NAME"),"/")
	Response.Redirect "admin_login.asp?target=" & scriptname(ubound(scriptname))
End IF
%>

quote:

---

Originally posted by HuwR

What file library Mod is this ?

---