<% response.redirect("http://fdp-energy.com" & Request.ServerVariables("SCRIPT_NAME") & "?" & Request.ServerVariables("QUERY_STRING")) %> <% '(C) Copyright 2005 by Flying Dutchman Projects ' ' Filename: Default.asp If Instr(1,lcase(request.ServerVariables("HTTP_HOST")),"hemsida.net")>0 then response.redirect("http://www.fdp.nu/index.htm") End if Session("Started_At_Home_Page")=TRUE %> Flying Dutchman Projects Portal - Home <% if request("iframe")<>"1" then %> <% end if %>
<%if Request("menu")<>"n" then%>
eBooks/Articles
<% SQL = "select eBook_Name, eBook_Url from [ebooks] " SQL = SQL & "Where eBook_Is_Approved = 1 and " SQL = SQL & "eBook_Type = 1 " SQL = SQL & "Order by eBook_Order" call openrs(rs,SQL) If rs.eof = true then %> <% else while not rs.EOF %> <%if rs("eBook_Name")<>"-" then%> <%else%> <%End if%> <% rs.movenext wend end if rs.close %>
No pages
" style="text-decoration: none" target="_parent"><%=rs("eBook_Name")%>  
<%End if%>