Geachte,
Ik ben beginnende in het bouwen van weppagina's met asp. Ik heb een inlogpagina gemaakt die werkt op mijn localhost. Maar als ik hem upload naar mijn server dan werkt het inloggen niet meer. U kan de pagina bekijken op http://sander.ws-creations.be/inloggen/login.aspx .
de pagina heeft deze code:
a<%@ Page Language="VB" %>
<script runat="server">
Public bestaat As Boolean
Public strConn As String
Public strSQL As String
Public ANaam As String
Public APass As String
Dim strtext As String
Sub knop(ByVal sender As System.Object, ByVal e As System.EventArgs)
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=Database.mdb;"
strSQL = "Select * From Agent Where ANaam = '" & gebruikersnaam.Text & "' And APaswoord = '" & code.Text & "'"
Dim conn As Data.OleDb.OleDbConnection = New Data.OleDb.OleDbConnection(strConn)
Dim daptr As Data.OleDb.OleDbDataAdapter = New Data.OleDb.OleDbDataAdapter(strSQL, conn)
conn.Open()
Dim ds As New Data.DataSet
daptr.Fill(ds, "Agent")
If ds.Tables("Agent").Rows.Count = 0 Then
MsgBox("foute gegevens ")
Else
MsgBox(("welkom, ") & gebruikersnaam.Text)
HyperLink.NavigateUrl = "nieuw in database.aspx"
HyperLink.Visible = True
gebruikersnaam.Text = ""
code.Text = ""
End If
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body bgcolor="#FF8000">
<asp:HyperLink ID="HyperLink" runat="server" Visible=false>HyperLink</asp:HyperLink>
<table border="0" cellpadding="0" cellspacing="0" width="693" height="526">
<!-- MSTableType="layout" -->
<tr>
<td valign="top" colspan="3" height="72">
<!-- MSCellType="ContentHead" -->
</td>
</tr>
<tr>
<td align="center"> </td>
<td valign="top" align="center">
<!-- MSCellType="ContentBody" -->
<form id="Form1" runat="server" >
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" startspan --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--webbot bot="SaveResults" i-checksum="43374" endspan -->
<p>Gebruikersnaam:<asp:TextBox ID="gebruikersnaam" runat="server"></asp:TextBox>
</p>
<p>Toegangscode:<asp:TextBox ID="code" runat="server" textmode="password"></asp:TextBox></p>
<p>
<asp:Button ID="knoppje" OnClick="knop" runat="server" Text="inloggen" /></p>
</form>
Ftp login:<p> <center>
<script>
function ftp(){
naam=document.ftplogin.login.value;
wachtwoord=document.ftplogin.pass.value;
ftp=document.ftplogin.ftp.value;
var url="ftp://"+naam+":"+wachtwoord+"@ftp."+ftp+"";
window.open(url,"ftpbrowser","height=500, width=700");
}
</script>
<fieldset style='width:300'>
<legend><font size="2" face="Verdana">FTP-Login</font></legend>
<center>
<table id="logintabel">
<form action="javascript:ftp()" name=ftplogin>
<TR><TD><font size=2 face=verdana>Domein<td>
<input type="text" name="ftp" size="20"></td></tr>
<TR><TD><font size=2 face=verdana>Login:<td><input type="text" name="login"></td></tr>
<TR><TD><font size=2 face=verdana>Wachtwoord:<td><input type="password" name="pass"></td></tr>
<TR><TD COLSPAN=2><input type=submit value='Login'></TD></TR>
</form>
</TABLE>
</center>
</fieldset>
</center></td>
<td height="407"> </td>
</tr>
<tr>
<td width="47"> </td>
<td width="598"> </td>
<td height="47" width="48"> </td>
</tr>
</table>
</body>
</html>
heeft u enig idee wat ik fout doe? Ik moet er wel bij zeggen dat ik nog niet veel weet van asp.
M.v.g.
Sander
Ik ben beginnende in het bouwen van weppagina's met asp. Ik heb een inlogpagina gemaakt die werkt op mijn localhost. Maar als ik hem upload naar mijn server dan werkt het inloggen niet meer. U kan de pagina bekijken op http://sander.ws-creations.be/inloggen/login.aspx .
de pagina heeft deze code:
a<%@ Page Language="VB" %>
<script runat="server">
Public bestaat As Boolean
Public strConn As String
Public strSQL As String
Public ANaam As String
Public APass As String
Dim strtext As String
Sub knop(ByVal sender As System.Object, ByVal e As System.EventArgs)
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=Database.mdb;"
strSQL = "Select * From Agent Where ANaam = '" & gebruikersnaam.Text & "' And APaswoord = '" & code.Text & "'"
Dim conn As Data.OleDb.OleDbConnection = New Data.OleDb.OleDbConnection(strConn)
Dim daptr As Data.OleDb.OleDbDataAdapter = New Data.OleDb.OleDbDataAdapter(strSQL, conn)
conn.Open()
Dim ds As New Data.DataSet
daptr.Fill(ds, "Agent")
If ds.Tables("Agent").Rows.Count = 0 Then
MsgBox("foute gegevens ")
Else
MsgBox(("welkom, ") & gebruikersnaam.Text)
HyperLink.NavigateUrl = "nieuw in database.aspx"
HyperLink.Visible = True
gebruikersnaam.Text = ""
code.Text = ""
End If
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body bgcolor="#FF8000">
<asp:HyperLink ID="HyperLink" runat="server" Visible=false>HyperLink</asp:HyperLink>
<table border="0" cellpadding="0" cellspacing="0" width="693" height="526">
<!-- MSTableType="layout" -->
<tr>
<td valign="top" colspan="3" height="72">
<!-- MSCellType="ContentHead" -->
</td>
</tr>
<tr>
<td align="center"> </td>
<td valign="top" align="center">
<!-- MSCellType="ContentBody" -->
<form id="Form1" runat="server" >
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" startspan --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--webbot bot="SaveResults" i-checksum="43374" endspan -->
<p>Gebruikersnaam:<asp:TextBox ID="gebruikersnaam" runat="server"></asp:TextBox>
</p>
<p>Toegangscode:<asp:TextBox ID="code" runat="server" textmode="password"></asp:TextBox></p>
<p>
<asp:Button ID="knoppje" OnClick="knop" runat="server" Text="inloggen" /></p>
</form>
Ftp login:<p> <center>
<script>
function ftp(){
naam=document.ftplogin.login.value;
wachtwoord=document.ftplogin.pass.value;
ftp=document.ftplogin.ftp.value;
var url="ftp://"+naam+":"+wachtwoord+"@ftp."+ftp+"";
window.open(url,"ftpbrowser","height=500, width=700");
}
</script>
<fieldset style='width:300'>
<legend><font size="2" face="Verdana">FTP-Login</font></legend>
<center>
<table id="logintabel">
<form action="javascript:ftp()" name=ftplogin>
<TR><TD><font size=2 face=verdana>Domein<td>
<input type="text" name="ftp" size="20"></td></tr>
<TR><TD><font size=2 face=verdana>Login:<td><input type="text" name="login"></td></tr>
<TR><TD><font size=2 face=verdana>Wachtwoord:<td><input type="password" name="pass"></td></tr>
<TR><TD COLSPAN=2><input type=submit value='Login'></TD></TR>
</form>
</TABLE>
</center>
</fieldset>
</center></td>
<td height="407"> </td>
</tr>
<tr>
<td width="47"> </td>
<td width="598"> </td>
<td height="47" width="48"> </td>
</tr>
</table>
</body>
</html>
heeft u enig idee wat ik fout doe? Ik moet er wel bij zeggen dat ik nog niet veel weet van asp.
M.v.g.
Sander
