| Current File : C:/Inetpub/vhosts/derecha3kmotor.com/httpdocs/2024/control/nuevoadjunto.asp |
<%
if Session("autadmin")=true or Session("autprensa")=true then
else
Response.Redirect("index.asp")
Response.End
end if
bloger=session("bloger")
usuario=session("usuario")
idpet=request.querystring("id")
%>
<HTML>
<head>
<%
Set UploadProgress = Server.CreateObject("Persits.UploadProgress")
PID = "PID=" & UploadProgress.CreateProgressID()
barref = "framebar.asp?to=10&" & PID
%>
<SCRIPT LANGUAGE="JavaScript">
function ShowProgress()
{
strAppVersion = navigator.appVersion;
if (document.subirfotos.FILE1.value != "" || document.subirfotos.FILE2.value != "")
{
if (strAppVersion.indexOf('MSIE') != -1 && strAppVersion.substr(strAppVersion.indexOf('MSIE')+5,1) > 4)
{
winstyle = "dialogWidth=385px; dialogHeight:140px; center:yes";
window.showModelessDialog('<% = barref %>&b=IE',null,winstyle);
}
else
{
window.open('<% = barref %>&b=NN','','width=370,height=115', true);
}
}
return true;
}
</SCRIPT>
</head>
<BODY BGCOLOR="#FFFFFF">
<H1 align="center"><i><font face="Trebuchet MS" size="3" color="#003399">Nuevo
adjunto:</font></i></H1>
<p align="center"><b><i><u><font face="Trebuchet MS" size="4" color="#003399"><%=titular%></font></u></i></b></p>
<FORM name="subirfotos" METHOD="POST" ENCTYPE="multipart/form-data" ACTION="nuevoadjuntob.asp?<% = PID %>&id=<%=idpet%>" OnSubmit="return ShowProgress();">
<p align="center">
<font face="Trebuchet MS" size="2" color="#003399">Seleccione el fichero:</font><br>
<INPUT TYPE="FILE" NAME="FILE1" SIZE="50" style="font-family: Trebuchet MS; font-size: 10pt; color: #003399; background-color: #FFFFFF" tabindex="1"></p>
<p align="center">
</p>
<p align="center">
</p>
<p align="center">
<BR>
<br>
<INPUT TYPE="submit" VALUE="Subir Adjunto" tabindex="3" style="font-family: Trebuchet MS; font-size: 10pt; color: #FFFFFF; font-style: italic; font-weight: bold; border: 1px solid #FFFFFF; background-color: #003399">
</p>
</FORM>
</BODY>
</HTML>