Сравните данные из приложения и базы данных

Я не так хорош в sql, поэтому я хотел спросить, как я могу сравнить конкретные данные с «foo». enter image description here Сравните данные из приложения и базы данных

Пользователь вводит уникальный идентификатор
Выберите дату смертности
система проверит, если идентификатор существующего;
затем, если его существующая, она будет проверять, если свиньи от выбранного Batch От:ComboBox = CurrentLocation (имя_поля)
если CurrentLocation свиньи не то же самое, что и элемент в COMBOBOX = ошибка ввода

Так в основном, мне нужно проверить CurrentLocation - (поле базы данных) из пользовательского ввода элемента и сравнения, чтобы ComboBatchFrom.Text
Я проверил несколько methods, но его не работает, при этом также далеко от моей цели. Надеюсь, вы можете дать мне несколько идей о том, как получить доступ к данным. благодаря!

источник

2014-02-04 AdorableVB

http://stackoverflow.com/questions/21541738/check-if-column-is-empty - это, но кажется неправильным. это не работает. – AdorableVB

глядя на ваш другой вопрос, проверили ли вы счетчик строк 'tablePiglet', чтобы узнать, больше ли он нуля? то есть 'tablePiglet.Rows.Count' –

да, а число не больше 0. Фактически, как я уже сказал там, мне кажется, что таблица данных не существует, но ее там нет. Я все еще не решил эту проблему, но этот вопрос, но я думаю, что это совсем другое, * (поэтому я спросил) * это цель, которую мне нужно выполнить сегодня. – AdorableVB

Я проработал свой путь через это, спасибо за помощь.

Dim query As String = "SELECT * FROM tblPiglets WHERE [email protected] AND [email protected] AND [email protected]" 

    Using cmd As New OleDbCommand(query, con) 
     With cmd.Parameters 
      .AddWithValue("@week", txtWeek.Text) 
      .AddWithValue("@so", txtSo.Text) 
      .AddWithValue("@pig", txtPiglet.Text) 
     End With 
     Dim dr As OleDbDataReader = cmd.ExecuteReader() 
     While dr.Read 
      Dim loc As String 
      loc = dr("CurrentLocation").ToString() 
      If loc = ComboBox1.Text Then 
       confirmed() 
      Else 
       invalid() 
      End If 
     End While 
    End Using

Я искал .Readfunction.

источник

2014-02-04 08:42:39 AdorableVB

Сравните данные из приложения и базы данных

ответ

Смежные вопросы