include file

<%
fnavn=rs("side")
%>
<!--#include file="<%=fnavn%>"-->

vh hossein

Den har jeg prøvet og får følgende fejl:

Active Server Pages error 'ASP 0126'

Include file not found

/default2.asp, line 123

The include file '<%=fnavn%>' was not found.

Include henvisninger bliver indlæst før resten af ASP-koden bliver afviklet...

Det kan derfor desværre ikke lade sig gøre...

Læs evt. mere om SSI her:

http://www.html.dk/tutorials/ssi/

Hvis jeg gætter at du skal bruge det til at have en side som brugerne bruger, og så har flere sider som bruges alt efter hvilken mode som er i query string, så kan du vel bare lave følgende. Dog ikke lige så elegant, men brugbart:

<%Response.redirect rs('side') %>

Dette funker dog kun hvis du har en template til hver mode, og altså ikke hvis du vil inkludere mere end en template på din side.

http://www.eksperten.dk/spm/300028

Jeg løste problemet med en iframe.

<iframe name="I1" width="100%" height="100%" src="<%=rs("side")%>">
Your browser does not support inline frames or is currently configured not to display inline frames.</iframe>

Alternativt skal du se om der findes et objekt du kan downloade som kan downloade sider og returnere indholdet som html, og så kan du bare indsætte resultatet der hvor du ville have din kode, dvs. ala dette:

dim proxy
dim resultat
proxy =Server.CreateObject("MinLilleProxy")
resultat= proxy.GetContents(rs('side'))
response.write(resultat)

Det kræver jo desværre at der er nogen som har lavet et godt lille objekt du kan hente :)

Alternativt så kan du jo måske bruge iframes, ilayers der hvor du vil have dine templates.

takker for point...

And what am I, Chopped liver?

websmith>>
Nej jeg skal bruge til en forside hvor der er en ramme hvor indholdet skal skifte alt efter hvad der står i query string.
Jeg har brugt
  <% mode = request("mode") %>
  <% if mode = "" then %>
    <!--#include file="hside.asp"-->
        <% end if %>
<% if mode = "link" Then %>
    <!--#include file="link.asp"-->
          <% end if %>
osv. osv. osv.
men det bliver hurtigt for uoverskueligt :)

<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
if Request.Querystring("id")="" then ID="frontpage" else ID=Request.Querystring("id")
filespec = Server.Mappath(ID &".asp")
Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
Response.write f.ReadLine
Loop
f.Close
%>
<-- dette virke også..