Oke eerst mijn code (niet op de orde lette :d):
<%@ Page Language="VB" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OLEDB" %>
<%@ import Namespace="microsoft.visualbasic" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Session("Username") = "aspfreakout" '-> om te teste zonder login
If Session("Username") = "" Then
Response.Redirect("default.aspx")
Writeline(Session("Username"))
Exit If
Exit Sub
End If
dim usern as string
usern = Session("Username")
Dim sConnstr As String
Dim strTijdelijk as string
dim emid as string
' er zit een record in de database met Username 'aspfreakout' dus het zou moeten werken
Dim myOLEDBConnection As new OLEDBConnection
Dim myOLEDBCommand As OLEDBCommand
Dim myDataReader As OLEDBDataReader
Dim strConn as String ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("\bin\games.mdb") & ";"
Dim strSQL as String ="SELECT * FROM Moderators WHERE Username='" & usern & "'"
Dim myConnection= New OLEDBConnection(strConn)
myConnection.Open()
Dim myCommand = New OLEDBCommand(strSQL, myConnection)
myDataReader = myCommand.ExecuteReader()
While myDataReader.Read
emid = "t besta dus ge moogt binne :)"
End While
myDataReader.Close()
myConnection.Close()
If emid <> "" Then
Session("mod") = "yes"
Response.Redirect("modoptions.aspx")
End If
End Sub
</script>
<html>
<head>
</head>
<body bgcolor="black">
<form runat="server">
<p>
<asp:Label id="Label1" runat="server" Font-Size="Large" Font-Names="Arial" ForeColor="#8080FF" Width="343px">.::Gamez::Moderators login::.</asp:Label>
</p>
<p>
<asp:Label id="Label2" runat="server" Font-Names="Arial" ForeColor="#8080FF" Width="436px" Height="59px">Het inloggen van moderators is een geautomatiseerd proces, als u deze pagina te zien krijgt betekent dat dat er iets is foutgelopen. Hieronder staan de mogelijke problemen:</asp:Label>
</p>
<p>
<asp:Panel id="Panel1" runat="server" Font-Names="Arial" ForeColor="#8080FF" Width="421px" Height="150px">
<p>
- U bent geen moderator: wordt moderator door te mailen naar <a href="mailto:forpex_@hotmail.com">forpex_@hotmail.com<a></a> </a>
</p>
<p>
- Uw sessie is verlopen: herlaadt de volledige pagina
</p>
<p>
- U bent niet ingelogd: log in en herlaadt de volledige pagina
</p>
<p>
- Er was een ander probleem: contacteer ons via het forum/mail (<a href="mailto:forpex_@hotmail.com">forpex_@hotmail.com</a>)
</p>
<p></p>
</asp:Panel>
</p>
<p>
</p>
</form>
</body>
</html>
Er zitten geen errors in maar zelfs al is de Session("Username") = "aspfreakout" dan nog geeft ze gewoon mijn pagian weer met de errortekst, ipv door te verwijzen naar modoptions.aspx
Kan er dus niet aan uit
<%@ Page Language="VB" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OLEDB" %>
<%@ import Namespace="microsoft.visualbasic" %>
<script runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Session("Username") = "aspfreakout" '-> om te teste zonder login
If Session("Username") = "" Then
Response.Redirect("default.aspx")
Writeline(Session("Username"))
Exit If
Exit Sub
End If
dim usern as string
usern = Session("Username")
Dim sConnstr As String
Dim strTijdelijk as string
dim emid as string
' er zit een record in de database met Username 'aspfreakout' dus het zou moeten werken
Dim myOLEDBConnection As new OLEDBConnection
Dim myOLEDBCommand As OLEDBCommand
Dim myDataReader As OLEDBDataReader
Dim strConn as String ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("\bin\games.mdb") & ";"
Dim strSQL as String ="SELECT * FROM Moderators WHERE Username='" & usern & "'"
Dim myConnection= New OLEDBConnection(strConn)
myConnection.Open()
Dim myCommand = New OLEDBCommand(strSQL, myConnection)
myDataReader = myCommand.ExecuteReader()
While myDataReader.Read
emid = "t besta dus ge moogt binne :)"
End While
myDataReader.Close()
myConnection.Close()
If emid <> "" Then
Session("mod") = "yes"
Response.Redirect("modoptions.aspx")
End If
End Sub
</script>
<html>
<head>
</head>
<body bgcolor="black">
<form runat="server">
<p>
<asp:Label id="Label1" runat="server" Font-Size="Large" Font-Names="Arial" ForeColor="#8080FF" Width="343px">.::Gamez::Moderators login::.</asp:Label>
</p>
<p>
<asp:Label id="Label2" runat="server" Font-Names="Arial" ForeColor="#8080FF" Width="436px" Height="59px">Het inloggen van moderators is een geautomatiseerd proces, als u deze pagina te zien krijgt betekent dat dat er iets is foutgelopen. Hieronder staan de mogelijke problemen:</asp:Label>
</p>
<p>
<asp:Panel id="Panel1" runat="server" Font-Names="Arial" ForeColor="#8080FF" Width="421px" Height="150px">
<p>
- U bent geen moderator: wordt moderator door te mailen naar <a href="mailto:forpex_@hotmail.com">forpex_@hotmail.com<a></a> </a>
</p>
<p>
- Uw sessie is verlopen: herlaadt de volledige pagina
</p>
<p>
- U bent niet ingelogd: log in en herlaadt de volledige pagina
</p>
<p>
- Er was een ander probleem: contacteer ons via het forum/mail (<a href="mailto:forpex_@hotmail.com">forpex_@hotmail.com</a>)
</p>
<p></p>
</asp:Panel>
</p>
<p>
</p>
</form>
</body>
</html>
Er zitten geen errors in maar zelfs al is de Session("Username") = "aspfreakout" dan nog geeft ze gewoon mijn pagian weer met de errortekst, ipv door te verwijzen naar modoptions.aspx
Kan er dus niet aan uit