Click here to Skip to main content
Rate this: bad
good
Please Sign up or sign in to vote.
See more: VB8.0
"USERREAD" is not declared
 
code is:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If My.Computer.FileSystem.DirectoryExists(" C:\ACCOUNTS" + TextBox1.Text + "\") Then Dim USERREAD As System.IO.StreamReader = New System.IO.StreamReader("C:\ACCOUNTS" + TextBox1.Text + "\" + "USERNAME.TXT")
Dim userline As String
Dim PASSREAD As System.IO.StreamReader = New System.IO.StreamReader("C:\ACCOUNTS" + TextBox1.Text + "\" + "PASSWORD.TXT")
Dim PASSLINE As String
Do
 
PASSLINE = TextBox2.Text
userline = USERREAD.ReadLine
Console.WriteLine(PASSLINE)
Console.WriteLine(userline)
Loop Until (userline Is Nothing) 'Imput Form You want to show when login is right here as 'FormNameHere.ShowDialog' If TextBox2.Text = "" Then MsgBox("Please imput both a username and a password to login.", MsgBoxStyle.Critical) Else If PASSLINE = PASSREAD.ReadLine() = True Then End If End If Else MsgBox("The Username or Password was incorrect. Please try again.", MsgBoxStyle.Critical) End If
End Sub
End Class
Posted 15-Mar-12 3:11am

1 solution

Rate this: bad
good
Please Sign up or sign in to vote.

Solution 1

Just define USERREAD at the class level. Then in your IF statement, set the value.
  Permalink  

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



Advertise | Privacy | Mobile
Web03 | 2.8.1411022.1 | Last Updated 15 Mar 2012
Copyright © CodeProject, 1999-2014
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100