Inkludere

Hvordan inkludere jeg menu.asp i denne kode?
(Menuen skal komme efter arrC(8)).

<% Response.Expires = 20 %>
<%
Dim arrC(10), nI, strOut
arrC(0) = "<table border=1 width=600 align=center>"
arrC(1) = "<tr>"
arrC(2) = "<td bgcolor=AF9983>"
arrC(3) = "<center>"
arrC(4) = Server.HTMLEncode("Velkommen")
arrC(5) = "</td>"
arrC(6) = "</tr>"
arrC(7) = "<td>"
arrC(8) = "<center>"
arrC(9) = "</td>"
arrC(10) = "</table>"

For nI = 0 to UBound(arrC)
    strOut = Replace(arrC(nI),"'","\'")
    Response.Write "document.writeln('" & strOut & "');"
Next
%>