Duda con include

[pitxulin]

Buenas:

Tengo una página asp que tiene englobado un include, es decir, dentro del código asp está la siguiente línea de código:

<!--#include file="../pie.inc"-->

pie.inc es una página asp también. Lo que quiero hacer es que desde pie.inc pueda saber la fecha de modificación del asp que lo contiene, en este caso es home.asp

Es decir, si home.asp ha sido modificado por última vez el 13 de abril, que desde pie.inc pueda saber esta fecha. Sé que con la opción LastModified se obtiene este dato, pero con así obtengo la fecha de modificación del pie.inc, y yo lo que quiero es la fecha de home.asp

No sé si me he explicado

¿Se puede hacer? Para más INRI tengo englobado home.asp dentro de un frame, llamado central.

[AlZuwaga]

Con FSO podrías lograrlo.
En tu archivo include (que, por cierto, cambiale la extención INC por ASP.. es más seguro), colocá esto:


<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set archivo = FSO.GetFile("home.asp")
fecha_de_modificacion = archivo.DateLastModified
set FSO = Nothing
%>


y luego, en home.asp:

<% = fecha_de_modificacion %>

[pitxulin]

Gracias por tu rápida respuesta, pero ahora me surge una duda.

Resulta que ese pie.inc lo uso en muchas páginas asp, por lo que ¿cómo puedo saber el fichero asp desde el que le estoy llamando?

Es decir, esto:
<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set archivo = FSO.GetFile("home.asp")
fecha_de_modificacion = archivo.DateLastModified
set FSO = Nothing
%>

tendría que ser así:

<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set archivo = FSO.GetFile(****RUTA DEL FICHERO, QUE NO SABEMOS CUAL ES, HAY QUE SABER CUAL ES****)
fecha_de_modificacion = archivo.DateLastModified
set FSO = Nothing
%>

[AlZuwaga]

buena esa. dejame pensarlo

[AlZuwaga]

ok, con la servervariable SCRIPT_NAME:

<%
Archivo = Server.MapPath(Request.ServerVariables("SCRIPT_NAM E"))
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set archivo = FSO.GetFile(Archivo)
fecha_de_modificacion = archivo.DateLastModified
set FSO = Nothing
%>


Ahora si