ユーザーが管理者であるかユーザーであるかを確認し、データセットを文字列に変更して、Label1で使用できるようにします。
「GetXML」を使用してみましたが、「Administrator」のような面白い形式で提供されています。これとは少し異なります。label1.textの値を、プログラムの他の機能に使用できるようにしたいと思います。
これが私のコードです:
Dim SQLConnection As MySqlConnection = New MySqlConnection
Dim ServerString As String = "server=localhost;user id=root;password=;database=business elements"
SQLConnection.ConnectionString = ServerString
SQLConnection.Open()
Dim ds As New DataSet()
Dim cmd As New MySqlCommand("SELECT Level FROM users WHERE username = '" & UsernameTextBox.Text & "'", SQLConnection)
Dim da As New MySqlDataAdapter(cmd)
da.Fill(ds)
Dim str As String = ds.GetXml
ds.GetXml()
Label1.Text = str