Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.11.2009, 22:40   #1
ymka2
 
Регистрация: 27.11.2009
Сообщений: 9
По умолчанию Не создается таблица

Здравствуйте.
Написал функцию,которая создает временную таблицу на сервере и записывает в нее данные. По кнопке эта функция вызывается. Все компилируется,ошибок не выводится.Но таблица не создается.
Что я не так делаю??? Может параметры функции должны быть другими(пробовал с разными).

Вот код:
function openfile(var ????): ????;
var
ADOQuery1: TADOQuery;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
begin
ADOQuery1:=TADOQuery.Create(Form1);
ADOQuery1.ConnectionString:='Provid er=SQLOLEDB.1...';
ADOQuery1.SQL.Add('sp_help');
ADOQuery1.Active:=True;

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('create table #table3 ( h0_id int not null , h1 varchar(50) not null)');
showmessage(ADOQuery1.SQL.Text);
ADOQuery1.ExecSQL;

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add ('INSERT INTO dbo.#table3( h0_id ,h1 )VALUES (1,55)');
showmessage(ADOQuery1.SQL.Text);
ADOQuery1.ExecSQL;

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add ('select * from dbo.#table3');
showmessage(ADOQuery1.SQL.Text);
ADOQuery1.ExecSQL;
ADOQuery1.Open;

ADOQuery1.Free;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
openfile(???);
end;

Последний раз редактировалось ymka2; 27.11.2009 в 22:46.
ymka2 вне форума Ответить с цитированием
Старый 28.11.2009, 07:13   #2
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

А с чего ты взял, что не создается? По-моему все прекрасно работает. Никаких проблем не вижу...
Баламут вне форума Ответить с цитированием
Старый 28.11.2009, 20:15   #3
ymka2
 
Регистрация: 27.11.2009
Сообщений: 9
По умолчанию

ничего не выводится.проверяю на сервере,тоже пусто.
ymka2 вне форума Ответить с цитированием
Старый 29.11.2009, 02:53   #4
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Каким образом проверяешь? Ты же понимаешь, что таблица #table3 будет видна и доступна только в данной сессии? Чтобы временная таблица была доступна и в других сессиях нужно создавать ##table3. Прикрути #table3 к DBGrid например и проверь. У меня все работает, проверил на всякий случай
Баламут вне форума Ответить с цитированием
Старый 29.11.2009, 12:28   #5
ymka2
 
Регистрация: 27.11.2009
Сообщений: 9
По умолчанию

Да,конечно понимаю,смотрю не выходя из сессии.
Если тот же код писать в procedure TForm1.Button1Click(Sender: TObject); (ADOQuery и т.д. кунул на форму),то все работает.А если вызываешь function,работать не хочет. Выложи как ты пробовал.
ymka2 вне форума Ответить с цитированием
Старый 29.11.2009, 14:22   #6
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Цитата:
Сообщение от ymka2 Посмотреть сообщение
Выложи как ты пробовал.
Да просто прикрутил твой ADOQuery1 к DBGrid и посмотрел результат. Все прекрасно выводится.
Баламут вне форума Ответить с цитированием
Старый 29.11.2009, 15:25   #7
ymka2
 
Регистрация: 27.11.2009
Сообщений: 9
По умолчанию

РазобралсяВсе выводится.Баламут,спасибо
ymka2 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не создается диалог -CrAzYMaN- Общие вопросы C/C++ 4 23.11.2009 11:06
не создается socket() isPolin C/C++ Сетевое программирование 2 24.06.2009 14:41
Кнопка не создается Манжосов Денис :) Компоненты Delphi 10 28.04.2008 17:43
не создается таблица в Interbase, вот кодинг... Алёна БД в Delphi 3 19.02.2008 18:21
Не создается сводная диаграмма Eugenius Microsoft Office Excel 1 18.11.2007 13:48