質問編集履歴
1
コードの追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -17,4 +17,24 @@
|
|
|
17
17
|
```
|
|
18
18
|
|
|
19
19
|
こうすればログイン画面で入力したIDは表示されることは理解できるのですが、ログイン画面でユーザーの名前を入力させていないので表示の仕方がわからない状態です。
|
|
20
|
-
ログイン画面で入力されたIDとパスワードに紐付かれた人の名前を表示したいです。
|
|
20
|
+
ログイン画面で入力されたIDとパスワードに紐付かれた人の名前を表示したいです。
|
|
21
|
+
|
|
22
|
+
```
|
|
23
|
+
'SQL文
|
|
24
|
+
Dim strsql = "SELECT * FROM M_LOGIN WHERE USER_ID = '" & UseridTextBox.Text & "' AND PASSWORD = '" & PasswordTextBox.Text & "'"
|
|
25
|
+
'データ取得のためのアダプタ設定
|
|
26
|
+
Dim adapter = New MySqlDataAdapter(strsql, Cn)
|
|
27
|
+
'データセット
|
|
28
|
+
adapter.Fill(table)
|
|
29
|
+
'データがあるか
|
|
30
|
+
If table.Rows.Count > 0 Then
|
|
31
|
+
|
|
32
|
+
val = UseridTextBox.Text
|
|
33
|
+
'商品登録画面へ
|
|
34
|
+
Form2_3.Show()
|
|
35
|
+
Me.Hide()
|
|
36
|
+
Else
|
|
37
|
+
MsgBox("IDまたはパスワードが間違っています。" & Environment.NewLine & "もう一度入力してください。")
|
|
38
|
+
|
|
39
|
+
End If
|
|
40
|
+
```
|