indyB

I'm trying to implement a Remember Me checkbox on my login form that when checked, remembers the users login and password so next time they visit the site they don't have to log in. It doesn't work. Whether I visit another site then come back or close the browser and open a new one to go back to the site, the login page always comes up. Can anyone see where I've gone wrong here? ----------- Here's the VB code ------------- <%@ Page Language="VB" %> <%@ import Namespace="System.Web.Security" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <script runat="server"> Sub Login_Click(Src as Object, E as EventArgs) 'store NRDS # in Session variable Session.Contents("MAJOR_KEY") = MAJOR_KEY.Text 'establish ADO.Net connection Dim strConn As String = ConfigurationSettings.AppSettings("ConnectionString") 'sql to get user info Dim strSql as String = "SELECT USERNAME, PASSWORD FROM WHERE (USERNAME = '" + USERNAME.Text + "') AND (PASSWORD = '" + PASSWORD.Text + "')" Dim objConn as New SqlConnection(strConn) Dim objCommand as New SqlCommand(strSql, objConn) Dim objDataReader as SqlDataReader objConn.Open() 'open the connection 'open the DataReader to access data objDataReader = objCommand.ExecuteReader(CommandBehavior.CloseConnection) If PASSWORD.Text="1234" then response.write ("<font color=#FFFFFF>You must register and change your password to access the members area.</font>") Else If objDataReader.Read() = True Then 'USERNAME/PASSWORD match, verify again If objDataReader("USERNAME") = USERNAME.Text And objDataReader("PASSWORD") = PASSWORD.Text Then FormsAuthentication.RedirectFromLoginPage(USERNAME.Text, RememberMe.Checked) 'authenticate login, redirect to default page Session.Contents("loginFail") = "N" 'this won't be used if successful login Response.Redirect("members/default.aspx") 'send user to main page with their customized selections Else Session.Contents("loginCount") += 1 'login failed increment counter objDataReader.Close() 'clean up close datareader objConn.Close() 'clean up close ado.net connection Session.Contents("loginFail") = "Y" 'set variable for lockout page Response.Redirect("index.aspx") 'redirect to login again End If Else Session.Contents("loginFail") = "Y" 'set variable for lockout page Response.Write("<font face=arial color=#FFFFFF>Invalid NRDS # or Password. Please Try again.</font>") End If End If objDataReader.Close() 'clean up objConn.Close() End Sub </script> ----------- Here's the form: ------------ <form id="frmLogin" name="frmLogin" runat="server"> <img height="100" src="images/header_sm.gif" width="300" /> <table width="295"> <tbody> <tr> <td class="title" colspan="2"> Member Login</td> </tr> <tr> <td class="body" width="120"> <div align="left">NRDS #: </div></td> <td class="body" width="163"> <asp:textbox id="MAJOR_KEY" runat="server" TextMode="SingleLine"></asp:textbox> </td> </tr> <tr> <td> <div class="body" align="left">Password: </div></td> <td class="body"> <asp:textbox id="PASSWORD" runat="server" TextMode="Password"></asp:textbox> </td> </tr> <tr> <td colspan="2"> <font size="1">Remember passwords are CASE sensitive</font> </td> </tr> <tr> <td> <div class="body" align="left">Remember Login: </div></td> <td class="body"> <asp:checkbox id="RememberMe" runat="server"></asp:checkbox> </td> </tr> <tr> <td> <div align="right"> <asp:button id="Login" onclick="Login_Click" runat="server" Text="Login"></asp:button> </div></td> <td> <input style="DISPLAY: none" type="text" /> <input id="Reset1" type="reset" value="Reset" name="Reset1" runat="server" /></td> </tr> <tr> <td colspan="2"> <p> You must <a class="navLink" href="register/reg.aspx">register</a> in order to gain access to the members section. </p> <p> <a class="nav" href="register/reg.aspx">Register Now</a> </p></td> </tr> </tbody> </table> <p><span class="legal"> This site requires</span> <asp:HyperLink id="flash" runat="server" Target="_blank" NavigateUrl="http://www.macromedia.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash"></asp:HyperLink> <span class="legal"><img src="images/get_flashplayer.gif" width="88" height="31" border="0" align="texttop"></span> </p> </form> --------- And here are the key parts of my web.config file ----------- <authentication mode="Forms"> <forms name=".theDefault" loginUrl="members/login.aspx" path="/" protection="All" timeout="15" > </forms> </authentication> <location path="members"> <system.web> <authorization> <deny users="?" /> </authorization> </system.web> </location>

I've got my calendar control displaying events from a SQL db...which is great! But I need to make these events link to a detail page, base on the id field in the events table. Normally I would do dynamic links, not in calendars, like this: <asp:HyperLink NavigateUrl='<%# "eventDetail.aspx?id=" & DataBinder.Eval(Container.DataItem, "id") %>' runat="server" ID="eventLink" NAME="eventLink" Text='<%# DataBinder.Eval(Container.DataItem, "Event") %>' /> How can I encorporate that link in my calendar control's code. Here's the code for the calendar page: <%@ Page Language="C#" Debug="true" %> <%@ Import Namespace="System.Xml" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <script runat="server"> DataSet ds = new DataSet(); protected void Page_Load(Object Src, EventArgs E) { string connectionstring = "server='10.1.0.9'; user id='iaradmin'; password='21jeremiah6'; Database='IAR'"; string sql = "select * from events"; SqlDataAdapter da = new SqlDataAdapter(sql, connectionstring); da.Fill(ds, "events"); } protected void eventscalendar_DayRender(Object Src, DayRenderEventArgs E) { StringBuilder strEvents = new StringBuilder(); strEvents.Append("<span style=\"font-size:80%\">"); foreach (DataRow row in ds.Tables["events"].Rows) { DateTime eventdate = (DateTime)row["Start_date"]; if (eventdate.Equals(E.Day.Date)) strEvents.Append("<br />" + row["Event"]); } strEvents.Append("</span>"); E.Cell.Controls.Add(new LiteralControl(strEvents.ToString())); } </script> <form runat="server"> <asp:calendar daystyle-ForeColor="#333333" DayHeaderStyle-BackColor="#006699" DayHeaderStyle-ForeColor="#FFFFFF" TitleStyle font-bold="True" PrevMonthText="< Prev" NextMonthText="Next >" OtherMonthDayStyle-BackColor="#CCCCCC" OtherMonthDayStyle-ForeColor="#999999" WeekendDayStyle-BackColor="#F4F4F4" TodayDayStyle-BackColor="#6699cc" SelectedDayStyle-BackColor="#3399CC" id="eventcalendar" runat="server" OnDayRender="eventscalendar_DayRender" ShowGridLines="true" DayStyle-HorizontalAlign="right"></asp:calendar> </form>

Nothing? Anyone?

Does anyone know where I can find information on implementing a search engine for my site? It's asp.net VB with a SQL 2000 db. The sql db is all that would really need to be searched, no static pages worth searching. Tutorials, articles, downloads...anything??? I can't find any good info on this! Thanks in advance...

hrabia, I'm sure you're not blind...I just don't know what I'm doing. So how do I set up the "databinding" between the datareader and hyperlinks? I know how to do that normally, but I was under the impression that when using the nextResult method, a different approach was necessary. Any ideas?

I'm trying to display three groups of headlines. Each group comes from a different table in the DB. I thought using the nextResult() method might be a good approach, but I can't get it to work. The page loads without any errors, but none of the data is being displayed. Can anyone see what I'm doing wrong here, or recommend a better way to do this? Here's the code: <%@ Page Language="VB" %> <%@ Register TagPrefix="IAR" TagName="Header" Src="_Headerhome.ascx" %> <%@ Register TagPrefix="IAR" TagName="Footer" Src="_footer.ascx" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <%@ import Namespace="System.Web.UI.WebControls" %> <%@ import Namespace="System.Configuration" %> <script runat="server"> Public Class ManyResults : Inherits System.Web.UI.Page Protected rptrWhatsNew As HyperLink Protected rptrLegal As HyperLink Protected rptrEvents As HyperLink Private Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load Dim objConn As SqlConnection Dim objCmd As SqlCommand Dim dataReader As SqlDataReader Dim strSql As String objConn = New SqlConnection(ConfigurationSettings.AppSettings.Get("ConnectionString")) strSql = _ "SELECT TOP 3 Left(Title, 27) AS Title, url, id FROM whatsNew ORDER BY id DESC;" _ & "SELECT TOP 3 Left(Title, 27) AS Title, id, CatID FROM legalAffairs WHERE CatID = 1 ORDER BY id DESC;" _ & "SELECT TOP 3 Left(Event, 27) AS Event, id FROM events ORDER BY id DESC;" objCmd = New SqlCommand(strSql, objConn) Try objConn.Open() dataReader = objCmd.ExecuteReader() 'What's New With rptrWhatsNew .NavigateUrl = "url" .text = "Title" End With 'Legal Headlines dataReader.NextResult() With rptrLegal .text = "Title" End With 'Upcoming Events dataReader.NextResult() With rptrEvents .text = "Event" End With Catch exc As Exception Response.Write(exc) Finally If Not dataReader Is Nothing Then dataReader.Close() End If objCmd = Nothing If objConn.State = ConnectionState.Open Then objConn.Close() End If objConn.Dispose() End Try End Sub End Class </script> <html> <head> <title>Indiana Association of REALTORS - Members Area</title> </head> <body bgcolor="#ffffff" leftmargin="0" topmargin="0"> <form id="Form1" method="post" runat="server"> <table> <tr> <td bgcolor="#EEEEEE" align="right">What's New:</td> <td><asp:HyperLink runat="server" ID="rptrWhatsNew" NAME="rptrWhatsNew" /></td> </tr> <tr> <td bgcolor="#EEEEEE" align="right">Legal Headlines:</td> <td><asp:HyperLink NavigateUrl='legal/legalDetail.aspx?id=1' runat="server" ID="rptrLegal" NAME="rptrLegal" /></td> </tr> <tr> <td bgcolor="#EEEEEE" align="right">Upcoming Events:</td> <td><asp:HyperLink NavigateUrl='association/events/' runat="server" ID="rptrEvents" NAME="rptrEvents" /></td> </tr> </table> </form> </body> </html>

I've got a repeater table which outputs a list of titles and pdf file names from a table in our db. Currently the titles link to a detail page pertaining to specifics about that title, stored in the db, and the pdf file names link pdf documents for those titles that do have a pdf. Some titles have info in the db, others have info in a pdf, none have both. This works fine, exept that the titles which have pdf's still show up as links, but when clicked, no details show up on the detail page, as expected. So, I need to make the titles only link to the detail page if there is not a pdf for that title. The db stores the pdf file name for those which do have pdf's. I think this could easily be done w/ an if / then type of statement...I just don't know how to do that. Can anyone help me out here. I kind of need it spelled out as I'm new to this concept in .net. Thanks in advance for any assistance! Here's the code --- <%@ Page Language="vb" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <script runat="server"> Sub Page_Load(Sender As Object, E As EventArgs) Dim DS As DataSet Dim MyConnection As SqlConnection Dim MyCommand As SqlDataAdapter MyConnection = New SqlConnection("server='localhost'; user id='sa'; password=''; Database = 'IAR'") MyCommand = New SqlDataAdapter("SELECT docTitle, pdfFileName, id FROM leadership_general ORDER BY docTitle ASC", MyConnection) DS = New DataSet() MyCommand.Fill(DS, "leadership_general") MyRepeater.DataSource = DS.Tables("leadership_general").DefaultView MyRepeater.DataBind() End Sub Sub MyRepeater_ItemCommand(source As Object, e As RepeaterCommandEventArgs) End Sub </script> <html> <head> </head> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <p> <a href="../">Leadership Home</a> </p> <p> General Information <br /> <br /> <ASP:Repeater id="MyRepeater" runat="server" OnItemCommand="MyRepeater_ItemCommand"> <HeaderTemplate> <table width="100%"> <tr style="background-color:006699; font: 8pt arial; color: white"> <th> Title </th> <th> PDF File Name </th> </tr> </HeaderTemplate> <ItemTemplate> <tr style="background-color:efefef"> <td> <asp:HyperLink NavigateUrl='<%# "genInfoDocs.aspx?id=" & DataBinder.Eval(Container.DataItem, "id") %>' runat="server" ID="titleLink" NAME="titleLink" Text='<%# DataBinder.Eval(Container.DataItem, "docTitle") %>' /> </td> <td> <asp:HyperLink NavigateUrl='<%# "docs/" & DataBinder.Eval(Container.DataItem, "pdfFileName") %>' runat="server" ID="pdfLink" NAME="pdfLink" Text='<%# DataBinder.Eval(Container.DataItem, "pdfFileName") %>' /> </td> </tr> </ItemTemplate> <FooterTemplate> </table> </FooterTemplate> </ASP:Repeater> </p> </body> </html>

I've got a repeater table which outputs a list of titles and pdf file names from a table in our db. Currently the titles link to a detail page pertaining to specifics about that title, stored in the db, and the pdf file names link pdf documents for those titles that do have a pdf. Some titles have info in the db, others have info in a pdf, none have both. This works fine, exept that the titles which have pdf's still show up as links, but when clicked, no details show up on the detail page, as expected. So, I need to make the titles only link to the detail page if there is not a pdf for that title. The db stores the pdf file name for those which do have pdf's. I think this could easily be done w/ an if / then type of statement...I just don't know how to do that. Can anyone help me out here. I kind of need it spelled out as I'm new to this concept in .net. Thanks in advance for any assistance! Here's the code --- <%@ Page Language="vb" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <script runat="server"> Sub Page_Load(Sender As Object, E As EventArgs) Dim DS As DataSet Dim MyConnection As SqlConnection Dim MyCommand As SqlDataAdapter MyConnection = New SqlConnection("server='localhost'; user id='sa'; password=''; Database = 'IAR'") MyCommand = New SqlDataAdapter("SELECT docTitle, pdfFileName, id FROM leadership_general ORDER BY docTitle ASC", MyConnection) DS = New DataSet() MyCommand.Fill(DS, "leadership_general") MyRepeater.DataSource = DS.Tables("leadership_general").DefaultView MyRepeater.DataBind() End Sub Sub MyRepeater_ItemCommand(source As Object, e As RepeaterCommandEventArgs) End Sub </script> <html> <head> </head> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <p> <a href="../">Leadership Home</a> </p> <p> General Information <br /> <br /> <ASP:Repeater id="MyRepeater" runat="server" OnItemCommand="MyRepeater_ItemCommand"> <HeaderTemplate> <table width="100%"> <tr style="background-color:006699; font: 8pt arial; color: white"> <th> Title </th> <th> PDF File Name </th> </tr> </HeaderTemplate> <ItemTemplate> <tr style="background-color:efefef"> <td> <asp:HyperLink NavigateUrl='<%# "genInfoDocs.aspx?id=" & DataBinder.Eval(Container.DataItem, "id") %>' runat="server" ID="titleLink" NAME="titleLink" Text='<%# DataBinder.Eval(Container.DataItem, "docTitle") %>' /> </td> <td> <asp:HyperLink NavigateUrl='<%# "docs/" & DataBinder.Eval(Container.DataItem, "pdfFileName") %>' runat="server" ID="pdfLink" NAME="pdfLink" Text='<%# DataBinder.Eval(Container.DataItem, "pdfFileName") %>' /> </td> </tr> </ItemTemplate> <FooterTemplate> </table> </FooterTemplate> </ASP:Repeater> </p> </body> </html>

Thanks!

Thanks. Any Idea how to do that in VB?

I've got a page on which I want to display titles and then the first 50 characters of a description field called docText. The 50 character docText field will be used to link to a page which shows the entire description. Here's the line if code where I currently display the description, but it displays the entire thing. This is where I need to somehow limit the output to the 50 characters. Any ideas out there? Thanks! <wmx:HyperLinkField DataTextField="docText" SortExpression="docText" HeaderText="Description" DataNavigateurlField="id" DataNavigateUrlFormatString="comFaxDocs.aspx?id={0}"></wmx:HyperLinkField>

Thanks That did it. Thanks a bunch!

I've got a page that outputs a list of categories, each of which links to a detail page which is to show the detail of the respective category. That is I'm passing a url variable. I'm using the category id to link to the detail page rather then the category name to keep the url from being sloppy. My problem is that I'm getting this error when my detail page tries to read my url variable. Is there a way I can control the data type to ensure that this variable is properly passed and read? Thanks! Here's the error message I get: Error converting the varchar value 'id' to a column of data type int. Here's the code for the category page: <wmx:SqlDataSourceControl id="SqlDataSourceControl1" runat="server" DeleteCommand="" ConnectionString="server='localhost'; user id='sa'; password=''; Database='IAR'" AutoGenerateUpdateCommand="False" SelectCommand="SELECT DISTINCT Category, CatID FROM [CommandFax]" UpdateCommand=""></wmx:SqlDataSourceControl> <wmx:MxDataGrid id="MxDataGrid1" runat="server" BorderStyle="None" BorderWidth="1px" CellPadding="3" BackColor="White" AllowPaging="False" DataMember="CommandFax" AutoGenerateFields="False" AllowSorting="True" BorderColor="#CCCCCC" DataSourceControlID="SqlDataSourceControl1"> <PagerStyle horizontalalign="Center" forecolor="#000066" backcolor="White" mode="NumericPages"></PagerStyle> <FooterStyle forecolor="#000066" backcolor="White"></FooterStyle> <SelectedItemStyle font-bold="True" forecolor="White" backcolor="#669999"></SelectedItemStyle> <ItemStyle forecolor="#000066"></ItemStyle> <Fields> <wmx:HyperLinkField DataTextField="Category" SortExpression="Category" HeaderText="Category" DataNavigateurlField="catID" DataNavigateUrlFormatString="comFaxDetail.aspx?id={0}"></wmx:HyperLinkField> </Fields> <HeaderStyle font-bold="True" forecolor="White" backcolor="#006699"></HeaderStyle> </wmx:MxDataGrid> And Here's the code for the detail page: <wmx:SqlDataSourceControl id="SqlDataSourceControl1" runat="server" DeleteCommand="" ConnectionString="server='localhost'; user id='sa'; password=''; Database='IAR'" AutoGenerateUpdateCommand="False" SelectCommand="SELECT * FROM [CommandFax] WHERE CatID = 'id' ORDER BY docNumber ASC" UpdateCommand=""></wmx:SqlDataSourceControl> <wmx:MxDataGrid id="MxDataGrid1" runat="server" BorderStyle="None" BorderWidth="1px" CellPadding="3" BackColor="White" AllowPaging="True" DataMember="CommandFax" AutoGenerateFields="False" AllowSorting="True" BorderColor="#CCCCCC" DataSourceControlID="SqlDataSourceControl1"> <PagerStyle horizontalalign="Center" forecolor="#000066" backcolor="White" mode="NumericPages"></PagerStyle> <FooterStyle forecolor="#000066" backcolor="White"></FooterStyle> <SelectedItemStyle font-bold="True" forecolor="White" backcolor="#669999"></SelectedItemStyle> <ItemStyle forecolor="#000066"></ItemStyle> <Fields> <wmx:BoundField DataField="Category" SortExpression="Category" HeaderText="Category"></wmx:BoundField> <wmx:BoundField DataField="CatID" SortExpression="CatID" HeaderText="CatID"></wmx:BoundField> <wmx:BoundField DataField="docTitle" SortExpression="docTitle" HeaderText="docTitle"></wmx:BoundField> <wmx:BoundField DataField="docNumber" SortExpression="docNumber" HeaderText="docNumber"></wmx:BoundField> <wmx:BoundField DataField="pdfFileName" SortExpression="pdfFileName" HeaderText="pdfFileName"></wmx:BoundField> <wmx:BoundField DataField="id" SortExpression="id" HeaderText="id"></wmx:BoundField> </Fields> <HeaderStyle font-bold="True" forecolor="White" backcolor="#006699"></HeaderStyle> </wmx:MxDataGrid>

Anyone?? Anyone have input on this??

I think my login is working properly, but the redirect isn't right. Upon successful login, user is to be redirected to the default.aspx page in the members directory. Login seems to be successful, but redirect results in the following url: http://127.0.0.1/association/members/login.aspx?ReturnUrl=%2fassociation%2fmembers%2fdefault.aspx Shouldn't it just be: http://127.0.0.1/association/members/default.aspx The association (root) directory is public, then the members directory requires login. The login.aspx page resides in the members directory. Any ideas why I'm not redirecting properly? Thanks! Here's the code for the login page: <%@ Page Language="VB" %> <%@ import Namespace="System.Web.Security" %> <%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.SqlClient" %> <script runat="server"> Sub Login_Click(Src as Object, E as EventArgs) 'store NRDS # in Session variable Session.Contents("MAJOR_KEY") = MAJOR_KEY.Text 'establish ADO.Net connection Dim strConn as String = "user id=sa;password=;" strConn += "database=IAR;server=localhost;" strConn += "Connect Timeout=30;" 'sql to get user info Dim strSql as String = "SELECT * FROM [webMembers] WHERE (MAJOR_KEY = '" + MAJOR_KEY.Text + "') AND (PASSWORD = '" + PASSWORD.Text + "')" Dim objConn as New SqlConnection(strConn) Dim objCommand as New SqlCommand(strSql, objConn) Dim objDataReader as SqlDataReader objConn.Open() 'open the connection 'open the DataReader to access data objDataReader = objCommand.ExecuteReader(CommandBehavior.CloseConnection) If objDataReader.Read() = True Then 'MAJOR_KEY/PASSWORD match, verify again If objDataReader("MAJOR_KEY") = MAJOR_KEY.Text And objDataReader("PASSWORD") = PASSWORD.Text Then FormsAuthentication.RedirectFromLoginPage(MAJOR_KEY.Value, RememberMe.Checked) 'authenticate login, redirect to default page Session.Contents("loginFail") = "N" 'this won't be used if successful login Response.Redirect("default.aspx") 'send user to main page with their customized selections Else Session.Contents("loginCount") += 1 'login failed increment counter objDataReader.Close() 'clean up close datareader objConn.Close() 'clean up close ado.net connection Session.Contents("loginFail") = "Y" 'set variable for lockout page Response.Redirect("login.aspx") 'redirect to login again End If Else Session.Contents("loginFail") = "Y" 'set variable for lockout page End If objDataReader.Close() 'clean up objConn.Close() End Sub Sub Page_Load 'first check to make sure user has entered nrds number If Session.Contents("loginFail") = "Y" Then 'increment login counter Session.Contents("loginCount") += 1 'NRDS # Response.Write("<font face=arial>NRDS #: " + Session.Contents("MAJOR_KEY") + "</font><br>") If Session.Contents("loginCount") < 4 Then 'verify count hasn't been exceeded If Session("loginCount") >= 2 Then 'this isn't first attempt Response.Write("<font face=arial>Invalid NRDS # or Password: Please Try again</font><br>") Response.Write("<font face=arial>Login Count = </font>") Response.Write(Session.Contents("loginCount")) End If Else Response.Redirect("../lockout.aspx") End If End If End Sub </script> <html> <head> <title>Indiana Association of Realtors - Member Login</title> </head> <body onload="frmLogin.UserName.focus()"> <font face="arial"> <form id="frmLogin" name="frmLogin" runat="server"> <table> <tbody> <tr> <td> NRDS #:</td> <td> <asp:TextBox id="MAJOR_KEY" TextMode="SingleLine" Runat="server"></asp:TextBox> </td> </tr> <tr> <td> Password:</td> <td> <asp:TextBox id="PASSWORD" TextMode="Password" Runat="server"></asp:TextBox> </td> </tr> <tr> <td> Remember Login:</td> <td> <asp:CheckBox id="RememberMe" runat="server"></asp:CheckBox> </td> </tr> <tr> <td> <asp:button id="Login" onclick="Login_Click" runat="server" text="Login"></asp:button> </td> <td> <input id="Reset1" type="reset" value="Reset" name="Reset1" runat="server" /></td> </tr> </tbody> </table> </form> </font> </body> </html>