I'm using an alert when the user enters the wrong information in a text box, but it's not working properly. When you enter the wrong information the first time the page appears to refresh itself, but the alert doesn't come up. Then, when you enter the wrong information the second time the alert pops up and takes the appropriate action. When I go back to enter the correct information, the alert comes up again, when it should not, and then it performs the correct action.

Any help would be a appreciated
Thanks,

Renee C. Walker

__________________
Renee C. Walker

It sounds like you are doing the check in the wrong place and getting the typical 1-hit delay that aspx beginners often see. Post the relevant parts of the code and we'll see what we can do.

Peter
------------------------------------------------------
Work smarter, not harder.

Private Sub btnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click

        Dim user As String

        Dim response As String

        Dim msg As String

        Dim myconnection As SqlClient.SqlConnection = New SqlClient.SqlConnection

        myconnection.ConnectionString = "Data Source=WJEVIS;database=WJEVISION;User ID=xx;Password=xxx"

        myconnection.Open()







        Dim comSQL As SqlClient.SqlCommand = New SqlClient.SqlCommand



        'Add code to set CommandText and Connection properties of the command

        'If (txtLogin.Text = "" Or txtLogin.Text = "Please enter something.") Then

        ' txtLogin.Text = "Please enter a valid Login."

        ' Return

        'End If



        comSQL.CommandText = "select username,password from seuser where username = '" & txtLogin.Text & "'"

        comSQL.CommandText = "select * from seuser where username = '" & txtLogin.Text & "'"

        comSQL.Connection = myconnection





        Dim readerSQL As SqlClient.SqlDataReader

        'Add code to execute the command

        readerSQL = comSQL.ExecuteReader()

        user = txtLogin.Text





        'Add code to loop through the records, add each to the listbox

        If readerSQL.HasRows Then

            Do While readerSQL.Read

                'Display in list box

                'lstUsers.Items.Add(readerSQL.Item("username").ToS tring) '& " " & readerSQL.Item("LastName").ToString)

                Dim file As New System.IO.StreamWriter("C:\test.txt", True)

                file.WriteLine("Here is the first line." & " " & user)

                file.Close()

                Server.Transfer("Webform1.aspx")

            Loop

        Else

            Page.RegisterStartupScript("MyScript", _

            "<script language=javascript>" & _

   "function AlertHello() { alert('Please enter the correct username'); }</script>")



            btnLogin.Attributes("onclick") = "AlertHello()"

            txtLogin.Text = ""

            Return



        End If





    End Sub


Renee C. Walker