Как программно сделать отбор записей по текстовому полю с БД - VB

  1. в таблице бд 3 поля. users, password и FIO на форме 3 текстовых поля, в которые: в text1.text - вводиться users в text2.text - вводиться password. а при нажатии на кнопку в text3.text должно вывести FIO, по text1.text(users). н.р. в базе: в поле users записан - user1 в поле password записан password1 в поле FIO записан FIO1. на форме в text1.text вводиться пользователем user1 в text2.text вводить пользователем password1 и при нажатии на кнопку в text3.text должно вывестись FIO1. как это сделать? кинте плиз код! а то я в запаре...


textual

Код к задаче: «Как программно сделать отбор записей по текстовому полю с БД - VB»

  Dim OldDb As DAO.Database
  Dim OldTbl As DAO.Recordset
  Set OldDb = Workspaces(0).OpenDatabase("Путь к файлу")
  Set OldTbl = OldDb.OpenRecordset("SELECT * FROM Таблица1 WHERE LCase(User) = '" & LCase(Text1.Text) & "' And Passworld = '" & Text2.Text & "'")
  If Not OldTbl.EOF Then
    Text3.Text = OldTbl("FIO").Value
  End If
  OldTbl.Close
  OldDb.Close

СДЕЛАЙТЕ РЕПОСТ

12   голосов, оценка 4.250 из 5



Похожие ответы
  1. visual basic 6.0, подскажите как сделать в правке "Выделить все"

  1. Помогите!!! Вот задача: Компьютер загадывает число от 0 до 100 Пользователь начинает отгадывать число. Если разница между загаданным числом и предложенным пользователем больше 30 выводится сообщение – Холодно Если разница от 20 до 30 – Выводится «тепло» От 10 до 20 – «Горячо» От 5 до 10 – «Почти угадал» От 1 до 5 – «Еще чуть-чуть!!!» Сделайте подсчет количества попыток за которые отгадано число

  1. Два цикла работаю хорошо но когда добавляю третий выходит ошибка Invalid control next reference

  1. Подскажите, пожалуйста как мне сделать, вывод, каждой буквы слова в новой строке.? То есть: К а к т о

  1. Можно-ли сделать само обновляемую программу в vb6 . И как

  1. Здравствуйте, столкнулся с такой проблемой: создал программу из нескольких форм. Если нажать на "крестик" на первой форме, то программа завершается, но если нажать на "крестик" в других формах, то последняя форма закрывается, но программа не завершается, приходиться его убирать из процессов, как сделать так, чтобы он в любой форме завершал приложение? переход по формам произвожу при помощи show и hide P.S не ругайте сильно, если задаю глупые вопросы. Только начал изучать...

  1. Условие: найти минимальное значение массива B, содержащего значение функции G=g^2-G^4 на промежутке 0<=g<=10 с шагом дельта g=0,2. В том, что это одномерный массив разобрался и как найти максимум тоже, а вот как записать начало не знаю. Я сделал начало как формируется массив, но он почему-то не работает( Это первый путь, через оператор do :

  1. Проблема следующая --> Я долго думал как лучше придумать вам задачку которая мне даст ответ на мой вопрос. Вообщем,нужен код для программы у которой есть 3 чек бокса и 1 текст.Мне нужно чтобы При выборе чек боксов менялся текст. Например: если был вбыран 1 текст бокс,то в тексте появилась надпись текст бокс 1- выбран, также с другими. Как это сделать? Прошу объяснить свой код, а не просто его скинуть.Заранее огромное спасибо!

  1. как сделать что бы диапозон рандома был от 0 до 100

  1. С наступающим, товарищи! Раскажите, покажите, как сделать простенький плеер с плейлистом. Спасибо!