Помогите! Я создаю прототип командного процессора в Builder 6. С помощью компонента ADOConnection связываю свою форму с базой данных Access 2003, в которой хранятся пароли для входа в систему. Запускаю программу, появляется окошко для ввода пароля. Ввожу и получаю сообщение об ошибке: Ядро базы данных Microsoft Jet не может найти входную таблицу или запрос. Вроде бы всё правильно сделала, все компоненты друг с другом связала. Не знаю, в чём проблема.
Если кто-то с таким сталкивался, помогите.   

Ну значит, нет такой таблицы в той БД, куда подключаешься...

ну хоть код покажи

Добавлено через 14 секунд
и сам запрос

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
#include "Unit4.h"
#include "Unit5.h"
#include "Unit6.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
AnsiString  login, password, INFO;
int sec, per=0, per1=0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{   Timer1->Enabled=false;
Timer1->Interval=10;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(Edit1->Text == ""){
ShowMessage("ЛОГИН НЕ ВВЕДЕН");
return;
                     }
else {
    ADOQuery1->SQL->Clear();
    ADOQuery1->SQL->Add("select *");
    ADOQuery1->SQL->Add("from bd1");
    ADOQuery1->SQL->Add("where login = '"+Edit1->Text+"'");
    ADOQuery1->Active = True;

         if(ADOQuery1->RecordCount == 0){
    ShowMessage("НЕ ВЕРНО ВВЕДЕНЫ ДАННЫЕ!");

    Edit1->Text="";
    Edit2->Text="";
    if (! Timer1->Enabled) {
           Timer1->Enabled=true;
           Button1->Enabled=false;
           Edit1->Enabled=false;
           Edit2->Enabled=false;
    }
    return;
                                   }
    else{
    login = ADOQuery1->Fields->Fields[0]->AsString;
    password = ADOQuery1->Fields->Fields[1]->AsString;
    INFO = ADOQuery1->Fields->Fields[2]->AsString;
       }
    }


if (Edit2->Text != password) {

    ShowMessage("НЕ ВЕРНО ВВЕДЕНЫ ДАННЫЕ!");
    Edit1->Text="";
    Edit2->Text="";
  if (! Timer1->Enabled) {
           Timer1->Enabled=true;
           Button1->Enabled=false;
           Edit1->Enabled=false;
           Edit2->Enabled=false;
    }
}
 else {
 if (INFO=="ADMIN") {

 Form2->Show();
 Form1->Hide();


 per1=800;
 per = per1;
 }
 else{

 per1=800;
 per = per1;
  ShowMessage(" USER ВЫ В СИСТЕМЕ");
  Form3->Show();
 Form1->Hide();

  }
 }


}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
   Form1->Close();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
//for(sec=0;sec<=per1;sec=sec+5;){
 sec=sec+5;
per = sec--;
if ( per == 0) {
ShowMessage("Введите логин и пароль");


Timer1->Enabled=false;
Button1->Enabled=true;
Edit1->Enabled=true;
Edit2->Enabled=true;
Edit3->Text=StrToInt(per);

}
}
//---------------------------------------------------------------------------


void __fastcall TForm1::FormShow(TObject *Sender)
{
 Edit1->Text="";
 Edit2->Text="";
 }

//---------------------------------------------------------------------------

В данном коде не нашёл AdoConnection. Может, он вообще не подключён к БД, если даже и есть?  

какая чудная программа 

У меня на форме есть ADOConnection. A ADOQuery c ним связывается.

reggga, на какой строке вылезает ошибка?

 if(ADOQuery1->RecordCount == 0){

Ну, попробуй просто выполнить простейший выбор - select * from bd1 - будет работать?

В смысле просто написать   ADOQuery1->SQL->Add("select *from bd1 ");  и всё что ли?
Я так попробовала - никакого результата! Похоже, дело - труба!


Это сообщение отредактировал(а) reggga - 25.10.2010, 21:52

Проблема решена! Ошибка была глупейшая! Я просто в коде вместо названия таблицы указала название базы данных. Из-за такой ерунды столько переживаний!   

Правильно, я так сразу и сказал, что не существует такой таблицы, к которой обращается запрос.