Создание команды для поиска в базе данных Excel для существующего пользователя (с использованием OleDb в Visual Basi c с формой Windows) - PullRequest
Новая
       40

Создание команды для поиска в базе данных Excel для существующего пользователя (с использованием OleDb в Visual Basi c с формой Windows)

0 голосов
/ 04 марта 2020

все! :)

В настоящее время я разрабатываю программу входа для своей наставнической организации. Я медленно учил себя программированию с помощью Visual Basi c, и до сих пор добился определенного прогресса с входом в систему пользователей. Я пытаюсь определить, как ввести команду для поиска файла Excel, с которым я связан, для идентификатора пользователя (OneCard ID), чтобы узнать, существует ли пользователь и не нужно ли регистрироваться в системе. Пока это мой код: 

Imports System.Data.OleDb
Public Class Register

    Dim cn As New OleDbConnection
    Dim cm As New OleDbCommand

    Private Sub BtnSave_Click(sender As Object, e As EventArgs) Handles BtnSave.Click

        cn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source =C:\Users\mn582\source\repos\VBTest.xls;extended properties=excel 8.0;"
        cn.Open()

        With cm
            .Connection = cn
            .CommandText = "insert into [Register Data$]values('" & OneCard.Text & "','" & FirstName.Text & "','" & LastName.Text & "')"
            .ExecuteNonQuery()

        End With
        cn.Close()
        MessageBox.Show("Welcome, " & FirstName.Text & "!")

        OneCard.Text = String.Empty
        FirstName.Text = String.Empty
        LastName.Text = String.Empty
    End Sub

    Private Sub BtnClose_Click(sender As Object, e As EventArgs) Handles BtnClose.Click
        Close()
        LiabilityForm.Show()

    End Sub
End Class

Буду очень признателен за любые советы о том, как создать команду для поиска существующих идентификаторов пользователя. Я искал здесь и на других сайтах, и не уверен, что делать.

Спасибо всем. :)

...