Hallo Liste,

ich habe folgendes Problem. Ich habe ein Login erstellt. Nach dem sich der
Besucher eingeloggt hat, wird er automatisch in ein bestimmtes verzeichnis
weitergeleitet.

Bsp; http://www.meinedomain.de/login/kunde1/default.asp

Hierbei wird f�r k1 an die default.asp folgendes angehangen:
..default.asp?value=k1

Da jeder Besucher bestimmte Optionen hat, habe ich nun versucht es so zu
gestalten, dass wenn er im Men� etwas anklickt mit folgenden Check

<body>
<head>
if Request.querystring("value")= "k1" then
Response.Write "<!--#INCLUDE FILE=""../k1/config.asp""-->"

elseif Request.querystring("value")= "k"2" then
Response.Write "<!--#INCLUDE FILE=""../k2/config.asp""-->"

else
response.write ("Die Authentifzierung mit dem Server inst fehlgeschlagen.
Falls dieses Problem nochmals auftritt, wenden Sie sich bitte an den
Webmaster")
end if
usw.
%>
gepr�ft wird, welcher Besucher es ist und dann die entsprechende config.asp
Datei mit den bestimmten Optionen in die asp seite eingef�gt werden kann.

leider ist die default.asp seite eine Frameseite, die aus einem Inhalts und
Men�frame besteht. Daher habe ich das Problem, dass der check immer
fehlschl�gt. ein weiteres Problem zeigt sich in der folgenden Fehlermeldung:

ADODB.Recordset Fehler '800a0bb9'
Die Argumente sind vom falschen Typ, liegen au�erhalb des
G�ltigkeitsbereiches oder sind miteinander unvereinbar.
/kundenportal2/emailoptionen/emailliste.asp, line 30
Quellcode der emailliste.asp
<html>
<head>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<!--#Include File="../k1/config.asp"-->
<link href="css/top.css" type="text/css" rel="StyleSheet">
<style type="text/css">
SELECT.hpfrm {
 FONT-SIZE: x-small; FONT-FAMILY: verdana, arial, helvetica
}
</style>
<meta http-equiv="Content-Language" content="de">
</head>
<body background="../images/bg_index.gif">
<p>Dies sind die am <% = DATE %>, um <% = TIME %> aktiven Emailadressen:</p>
<p>&nbsp;</p>
<%

Set conn = Server.CreateObject("ADODB.Connection")
conn = databasepfad
Set rs = Server.CreateObject("ADODB.Recordset")
  SQL = SQL_Emailliste
  rs.Open sql, conn, 3, 3
%>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse:
collapse" bordercolor="#111111" width="728" id="AutoNumber1">
  <tr>
    <td width="343"><b>Emailadresse</b></td>
    <td width="134"><b>eingerichtet</b></td>
    <td width="247"><b>Bemerkungen</b></td>
  </tr>
<%
rs.MoveFirst
do while Not rs.eof
%>

  <tr>
    <td width="343"><a href="mailto: <% = rs.Fields("Emailadresse")
%>">&nbsp;<% = rs.Fields("Emailadresse") %></td>
    <td width="134"><% = rs.Fields("eingerichtet") %>&nbsp;</td>
    <td width="247"><% = rs.Fields("Bemerkungen") %>&nbsp;</td>
   <%
rs.MoveNext
loop
%>
  </tr>
</table>
<%
rs.Close
set rs = nothing
set conn = nothing
%>
<p>&nbsp;</p>

</body>


Wer kann mir helfen ?

Viele Gr��e

Christian







| 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