Current File : C:/Inetpub/vhosts/derecha3kmotor.com/httpdocs/2024/control/nuevoadjuntoc.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")
fichero=request.querystring("fichero")

deno=request.form("deno")

conexion="PROVIDER=SQLOLEDB;DATA SOURCE=147.135.183.197;UID=blogs;PWD=Cocococo1;DATABASE=blogs"

tabla="adjuntos"


' GRABO EN BD

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open conexion

sSQL="Insert Into adjuntos (entrada,fichero,denominacion) values ('" & idpet & "','" & fichero & "','" & deno & "')"

set RS = oConn.Execute(sSQL)

oConn.Close

%>

<head>
<meta http-equiv="Content-Language" content="es">

<title></title>
</head>

<body bgcolor="#FFFFFF">
<p align="center">&nbsp;</p>
<p align="center"><img border="0" src="ok.png"></p>
<div align="center">
  <center>
  <table border="0" cellpadding="3" cellspacing="5" style="border-collapse: collapse" bordercolor="#111111">
    <tr>
      <td width="33%" align="center" bgcolor="#3366CC">
      <font face="Trebuchet MS" size="2" color="#FFFFFF">Denominaci?</font></td>
      <td width="33%" align="center" bgcolor="#3366CC">
      <font face="Trebuchet MS" size="2" color="#FFFFFF">Fichero</font></td>
      <td width="34%" align="center" bgcolor="#3366CC">
      <font face="Trebuchet MS" size="2" color="#FFFFFF">Probar</font></td>
    </tr>
    <tr>
      <td width="33%" align="center"><font face="Trebuchet MS" size="2" color="#3366CC"><%=deno%></font></td>
      <td width="33%" align="center"><font face="Trebuchet MS" size="2" color="#3366CC"><%=fichero%></font></td>
      <td width="34%" align="center">
      <a target="_blank" href="http://www.subidaubrique.com/documentos/<%=fichero%>">
      <img border="0" src="buscar.png"></a></td>
    </tr>
  </table>
  </center>
</div>
<p align="center">&nbsp;</p>
<p align="center"><i><font face="Trebuchet MS"><span lang="es">
<a href="gestionadjuntosb.asp?id=<%=idpet%>"><font color="#000000">regresar</font></a></span></font></i></p>
</body>