Load script før alt andet!

Nogen der ved hvordan man loader et script INDEN brugeren kommer ind på en side?? - Det er til et subdomain script... Den skal loade scriptet FØR den gør noget anden !

Jeg har dette script:
<%
Dim strWhere
strWhere = left(request.servervariables("SERVER_NAME"), InStr(1, request.servervariables("SERVER_NAME"), "."))

Set Con = Server.CreateObject("ADODB.Connection")
Con.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\web\clansite.dk_x6z7um\wwwroot\db\sub.mdb;"

        Sql = "SELECT * FROM Subs"
set rs = createobject("ADODB.Recordset")
                    rs.open sql, con
%>
<% If Not rs.EOF Then %>
<% if left(request.servervariables("SERVER_NAME"), InStr(1, request.servervariables("SERVER_NAME"), ".")) = Rs("URL") then %>

<FRAMESET FRAMEBORDER="0" FRAMESPACING="5" BORDER="5" ROWS="100%,*" COLS="100%">
<FRAME SRC="<%=Rs("URL")%>" NAME="Midle" SCROLLING="auto">
</FRAMESET>
<% end if %>
<% else %>
<% Response.Write("Der er intet subdomain med det du skrev!") %>
<%
end if
rs.close
Set rs = Nothing
Con.close
Set Con = Nothing
%>

Det skal loades før alle andre filer!!
Lige meget hvad du skriver foran clansite.dk skal den loade scriptet....

Men hvordan ?