[aspdebeginners] Kann mir jemand helfen?

Kai Beppler Wed, 06 Nov 2002 23:24:18 -0800

Hoffe, es kann mr jemand hier helfen.
passiert jedes mal beim Einloggen, das der Fehler hier passiert:


Fehlertyp:
Laufzeitfehler in Microsoft VBScript (0x800A000D)
Typen unvertr�glich: 'Session'
/guestbook/admin/logon.asp, line 20

Hier das Script:

<% @ Language=VBScript %>
<!--#include file="includes.asp"-->
<%
 cstrPagetitle = "Logon for " & strSite & " Guestbook"
%>
<%
bValidationFailed = False
If Request.ServerVariables("CONTENT_LENGTH") > 0 Then
  strUsername = Trim(Request.Form("UName"))
  strPassword = Trim(Request.Form("UPwd"))
  strUsername = Replace(strUsername, "'", "''")
  strPassword = Replace(strPassword, "'", "''")

  Set conn = CreateObject("ADODB.Connection")
  Set rs = CreateObject("ADODB.Recordset")
  conn.Open strConnection,"",""
  rs.Open "select * from AdminLogins where Username='" & strUsername & "'
AND Password='" & strPassword & "'", conn

  If not rs.EOF and not rs.BOF then
   Session("Username") = rs("Username")
   Session("Fullname") = rs("Fullname")
   strACL = rs("Privileges")
   Session("ACL") = strACL
   rs.Close
   conn.Close

   ' split the ACL if necessary
   If "Admin" <> strACL Then
   Session("Contests") = Right(strACL,Len(strACL)-6)
      Session("ACL") = "Watcher"
   End If

   if "" <> Session("DesiredDestination") then
     Response.Redirect Session("DesiredDestination")
   else
     Response.Redirect strBaseUrl & "default.asp"
   end if
  End if
  Response.AppendToLog " logon failed: " & strUsername & " " & strPassword
  bValidationFailed = True
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
 <title><%=cstrPagetitle%></title>
 <link rel="stylesheet" href="main.css" type="text/css">
 <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso8859-1">
</head>
<body bgcolor="#ffffff">

<table width="100%">
<tr><td align="center">
<table border=1>
<tr><td bgcolor="#33ccff" valign="center" align="center" width="350">
<H1>Logon</H1>
<i><%=strSite%> Guestbook</i>
<p>
In order to administer the guestbook you have to log on.
</p>

<% if bValidationFailed Then %>
<p><strong>You couldn't be logged on. Please re-type your username and
password.</strong></p>
<% End If %>
<p>
<form method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>">
<table>
<tr><td>Username:</td><td><input type=text name="uname" size="20"></td></tr>
<tr><td>Password:</td><td><input type=password name="upwd" size
="20"></td></tr>
<tr><td colspan=2>&nbsp;<br><center><input type="submit" value="Enter
secured area"></center></td></tr>
</table>
</form>
</p>

</td></tr></table>
</td></tr></table>

</BODY>
</HTML>

Wer weiss rat?



Danke im voraus

Kai


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als archive@jab.org 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

[aspdebeginners] Kann mir jemand helfen?

Antwort per Email an