0
저는 Windows 양식 응용 프로그램을 만들고 사용자 데이터가 레코드에 저장되도록 가입 프로세스를 만들었습니다. 나는 또한 로그인 할 때 내 기록을 검색하여 입력 된 전자 메일을 검색하고 암호가 일치하는지 확인합니다. 이제 다음 페이지의 '서명 된 페이지'에서 해당 레코드의 다른 정보를 페이지의 목록 상자에 표시하려고합니다. 어떤 아이디어?로그인 정보를 한 양식에서 다른 양식으로 어떻게 사용합니까?
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSignIn.Click
Dim RecordNumber As Integer
Dim Found As Boolean
Dim foundpword As Boolean
Dim UserEmail As String
Dim userPword As String
Dim OneAccount As fmSignUp.SignUpInfo
Dim stripeditem As String
Dim strippword As String
Dim CurrentUser As String
UserEmail = tbEmailSignIn.Text
userPword = tbPasswordSignIn.Text
Found = False
FileOpen(1, filename, OpenMode.Random, , , Len(OneAccount))
Do While (Not EOF(1)) And (Found = False)
RecordNumber = RecordNumber + 1
FileGet(1, OneAccount, RecordNumber)
stripeditem = OneAccount.ContactEmail.Replace(" ", "")
strippword = OneAccount.Password.Replace(" ", "")
If stripeditem = UserEmail Then
Found = True
End If
If strippword = userPword Then
foundpword = True
End If
Loop
FileClose(1)
여기서 내가 레코드를 선언합니다.
Dim OneAccount As fmSignUp.SignUpInfo
filename = "AccountDetails.dat"
FileOpen(1, filename, OpenMode.Random, , , Len(OneAccount))
NumberOfRecords = LOF(1)/Len(OneAccount)
FileClose(1)