if request.querystring("link") = "" then
%>
<!--#inlcude file = "gewuenschtes.asp"-->
<%

else

was auch immer


----- Original Message -----
From: "Ingo Lechner" <[EMAIL PROTECTED]>
To: "ASP Diskussionsliste fuer Anfaenger" <[EMAIL PROTECTED]>
Sent: Monday, October 07, 2002 4:30 PM
Subject: [aspdebeginners] Select Case und Request.QueryString


Hallo und guten Tag,
ich benutze die Liste zum ersten Mal.

Folgende Frage:

Ich habe ein Template gebaut und includiere verschiedene ASP-Seiten, je
nachdem, welcher Link gew�hlt wurde.

Es gibt nur ein Problem:

Wenn ich das Web zum ersten Mal aufrufe, wird �berhaupt kein Include
angezeigt, ist eigentlich auch logisch, es wurde ja auch noch kein link
gew�hlt. Erst mit Request.QueryString("link") wird das jeweilige Include
aufgerufen.

Ich m�chte erreichen, dass der content f�r home sofort beim Aufruf der
Webseite erscheint.

Ich stehe auf dem Schlauch.

Die L�sung ist bestimmt einfach...!

Vielen Dank im Vorraus.

Ingo



<%@ Language=VBScript %>
<% OPTION EXPLICIT %>
<html>
<head>
<title>Das-Webkonzept</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="STYLESHEET" type="text/css" href="style/style.css"> </head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0"
marginwidth="0" class="body_image">
<!---- Anfang Center-Tabelle-- -->
<table width="80%" border="0" cellspacing="0" cellpadding="0"
name="center_table" height="600">  <tr>
  <td align="center" valign="top">
   <!--#include file="inc/content_table1.asp"-->
   <!--#include file="inc/content_table2.asp"-->
   <!---- Anfang Content Tabelle 3 Reihen 3 Spalten  -->
   <table width="780" border="0" cellspacing="0" cellpadding="0"
name="table_head_2">
    <tr>
     <!---- Anfang Marginalie links -->
     <td width="150" align="right" valign="top" class="nav_visit">
<% ' Visuelle Darstellung des aktivierten Link
SELECT CASE
Request.QueryString("link")
  case "home" Response.Write
("Home") %><br><img src="img/home.gif">
<% case "wowirsind" Response.Write
("Wo wir sind") %><br><img src="img/home.gif">
<% case "agb" Response.Write
("AGB") %><br><img src="img/home.gif">
<% case "impressum" Response.Write
("Impressum") %><br><img src="img/home.gif">
<% case "internet" Response.Write
("In das Internet") %><br><img src="img/home.gif">
<% case "warum" Response.Write
("Warum?") %><br><img src="img/home.gif">
<% case "wie" Response.Write
("Wie?") %><br><img src="img/home.gif">
<% case "suchmaschine"
Response.Write ("Suchmaschinen-Management") %><br><img
src="img/home.gif">
<% case "ecommerce" Response.Write
("E-Commerce / Marketing") %><br><img src="img/home.gif">

<% case "dynamik" Response.Write
("Dynamische L�sungen") %><br><img src="img/home.gif">
<% case "flash" Response.Write
("Flash") %><br><img src="img/home.gif">
<% case "screendesign"
Response.Write ("Gutes Screendesign") %><br><img src="img/home.gif">

<% case "corporate" Response.Write
("Corporate Identity") %><br><img src="img/home.gif">

<% case "redesign" Response.Write
("ReDesign") %><br><img src="img/home.gif">

<% case "werwirsind" Response.Write
("Wer wir sind") %><br><img src="img/home.gif">

<% case "kontakt" Response.Write
("Kontakt") %><br><img src="img/home.gif">

<% case "referenzen" Response.Write
("Referenzen") %><br><img src="img/home.gif">

<% case "partner" Response.Write
("Partner") %><br><img src="img/home.gif">

<% case "wiewirarbeiten"
Response.Write ("Wie wir arbeiten") %><br><img src="img/home.gif">

<% case "beratung" Response.Write
("Unverbindliche Beratung") %><br><img src="img/home.gif">

<% case "projekt" Response.Write
("Projektablauf") %><br><img src="img/home.gif">

<% case "philosophie"
Response.Write ("Philosophie") %><br><img src="img/home.gif">

<% case "preise" Response.Write
("Preise") %><br><img src="img/home.gif">

      <% End Select %>
      <!--#include file="inc/content_table_singe_nav.asp"-->
</td>
      <!---- Ende Marginalie links -->
      <!---- Anfang Marginalie mitte -->
     <td width="450" valign="top" align="center">
     <!--#include file="inc/content_space_table.asp" -->
     <!---- Anfang Inhaltstabelle -->
   <%
      'Abfrage, welcher Link aktiviert worden ist
      SELECT CASE Request.QueryString("link")
      CASE "home" %>
      <!--#include file="inc/content_home.asp"-->
   <% CASE "wowirsind" %>
      <!--#include file="inc/content_wowirsind.asp"-->
   <% CASE "agb" %>
      <!--#include file="inc/content_agb.asp"-->
   <% CASE "impressum" %>
      <!--#include file="inc/content_impressum.asp"-->

   <% CASE "internet" %>
      <!--#include file="inc/content_internet.asp"-->
   <% CASE "warum" %>
      <!--#include file="inc/content_warum.asp"-->
   <% CASE "wie" %>
      <!--#include file="inc/content_wie.asp"-->
   <% CASE "suchmaschine" %>
      <!--#include file="inc/content_suchmaschine.asp"-->
   <% CASE "ecommerce" %>
      <!--#include file="inc/content_ecommerce.asp"-->
   <% CASE "dynamik" %>
      <!--#include file="inc/content_dynamik.asp"-->
   <% CASE "flash" %>
      <!--#include file="inc/content_flash.asp"-->
   <% CASE "screendesign" %>
      <!--#include file="inc/content_screendesign.asp"-->
   <% CASE "corporate" %>
      <!--#include file="inc/content_corporate.asp"-->
   <% CASE "redesign" %>
      <!--#include file="inc/content_redesign.asp"-->
   <% CASE "werwirsind" %>
      <!--#include file="inc/content_werwirsind.asp"-->
   <% CASE "kontakt" %>
      <!--#include file="inc/content_kontakt.asp"-->

   <% CASE "referenzen" %>
      <!--#include file="inc/content_referenzen.asp"-->
   <% CASE "partner" %>
      <!--#include file="inc/content_partner.asp"-->
   <% CASE "wiewirarbeiten" %>
      <!--#include file="inc/content_wiewirarbeiten.asp"-->
   <% CASE "beratung_ergebnis" %>
      <!--#include file="inc/content_beratung_ergebnis.asp"-->

   <% CASE "beratung" %>
      <!--#include file="inc/content_beratung.asp"-->

   <% CASE "projekt" %>
      <!--#include file="inc/content_projekt.asp"-->
   <% CASE "philosophie" %>
      <!--#include file="inc/content_philosophie.asp"-->
   <% CASE "preise" %>
      <!--#include file="inc/content_preise.asp"-->

   <%
      END SELECT
     %>
     <!---- Ende Inhaltstabelle -->
     </td>
     <!---- Ende Marginalie mitte -->
     <!---- Anfang Marginalie rechts -->
     <td width="180" valign="top">
     <!--#include file="inc/content_navtable.asp"--></td>

     <!---- Ende Marginalie rechts -->
    </tr>
   </table>
   <!---- Ende Content Tabelle 3 Reihen 3 Spalten  -->
  </td>
 </tr>
</table>
<!---- Ende Center-Tabelle-- -->
</body>
</html>


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an