% option Explicit 'include: Use the file keyword to indicate a relative path %>
<% If bNewAccount Then %>
<% ElseIf ThisRequest = "Teilnehmer" then
If bLogin then
%>
<%
Else
%><%
End If
Response.Write " " Response.Write GetUserAnmeldungen %> <% ElseIf ThisRequest = "Gewinner" then If bLogin then %> <% Else %><% End If Response.Write " " Response.Write GetGewinner %> <% ElseIf ThisRequest = "Pension" then If bLogin then %> <% Else %><% End If Response.Write " " %><% %> <% ElseIf ThisRequest = "Touren" then If bLogin then %> <% Else %><% End If Response.Write " " %> <% ElseIf ThisRequest = "Sponsoren" then If bLogin then %> <% Else %><% End If Response.Write " " %> <% ElseIf bSendPwd then %> <% Elseif ThisRequest = "infos" then %> <% ElseIf bLogin = False then %> <% Elseif ThisRequest = "NoTable" Then %> <% Elseif ThisRequest = "haftung" Then %> <% ElseIf ThisRequest = "Save" and bSave then%> <% Response.Write AnmeldungKostenString %> <% ElseIf ThisRequest = "Konto" then%> <% Response.Write AnmeldungKostenString %> <% Elseif ThisRequest = "tshirt" then %> <%else%> <%End If%> |
© nairolF |