Como hacer un Include de un archivo...

[Fabu_dina]

lo que necesito hacer es un include de un archivo contenido su nombre en un campo de la DB es decir:

campo... nomArchivo

nomArchivo="socio.asp?ide=222"

como se podria hacer un

<!--#include file="../../includes/&nomArchivo&&" -->

[Shiryu_Libra]

cada usuario tiene un include??? el nombre esta guardado en una base de datos?

si esta guardado el nombre en la base de datos

nomArchivo=RS("campo") '<--- Escribe el nombre del campo que contiene el dato o ruta
%><!--#include file="../../includes/<%=nomArchivo%>" --><%

deberia funcionar, el error que podria salir es de que no existe, pero debes fijarte bien, que la ruta de acceso sea correcta

intentalo y comenta

[u_goldman]

No, eso no funciona -el tag de include intenta ejecutarse antes de que pueda leer lo demas- necesitas valerte de otros medios, tal vez:

Código:

Server.Execute("ruta/"&variable&".asp")

Saludos

[PosProdukcion]

Un truquillo:

http://www.tutores.org/?codigo=1217

este creo que es el mismo pero más explicado: http://www.aspfacil.com/articulos/includes.asp

[Chory]

X cosas como esas me pase al PHP

[Fabu_dina]

Muchas gracias posprodukcion

Esto fue lo que me funciono:



Function IncluirHTML(archivo)
Dim objFSO
Dim objText
Dim strPage


'Instanciamos el objeto FSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")


'Abrimos el archivo pasado como argumento
'Utilizamos "MapPath" para hallar la ruta física al archivo.

Set objText = objFSO.OpenTextFile(Server.MapPath(archivo))


'Leemos el contenido y lo devolvemos como una cadena de texto
IncluirHTML = objText.ReadAll

objText.Close
Set objText = Nothing
Set objFSO = Nothing
End Function

La forma de utilizar esta función sería:


Dim aspecto

aspecto = Response.Cookies("aspecto")

'Imprimimos el HTML que el usuario decidió
Response.Write(IncluirHTML(aspecto))