Здравствуйте, Аноним, Вы писали:

Sql->>Close();
Sql->>SQL->Clear();
А> String str="SELECT *FROM Othet WHERE DATE='"+date.DateString()+"'";
Sql->>SQL->Add(str);
Sql->>Open();

А>При запуске данного кода выдается ошибка. Может подскажите что делать

во-первых: какая именно ошибка?
во-ппервых, с половиной: какая БД используеться?
во-вторых:
SELECT *FROM
^ кажеться надо вставить пробел
в-третьих: формат даты котот\рый ты передаешь в запросе может не совпадать с форматом который используеться
в базе

Лучше сделать так (сорри что на Delphi)
string str := 'Select * from Otchet where Date = :Date'
^ может быть @ если используеться MS SQL
Sql.sql.add(str);
Sql.ParamByName('Date').AsDateTime := date;

А вообще можно предложить еще штуки 4 способа в зависимости от используемоей БД и т.д.