Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft SQL Server Новый топик    Ответить
 Создание имени для excel файла в sql коде  [new]
Antony00
Member

Откуда:
Сообщений: 15
Создается excel файл с помощью ms sql кода

procedure Button1OnClick(Sender: TfrxComponent);
var
   XApp:Variant;
   sheet:Variant;
   r,c:Integer;
   row,col:Integer;
   filName:Integer;
   q:Integer;

   ds:TfrxDataSet;
   ss:TStringList;
begin
   ds := MasterData1.DataSet;
   ss:=TStringList.Create;
   ds.GetFieldList(ss);
   XApp:=CreateOleObject('Excel.Application');
   XApp.Visible:=true;
   XApp.WorkBooks.Add(-4167);                                                     
   XApp.WorkBooks[1].WorkSheets[1].Name:='Sheet1';
   sheet:=XApp.WorkBooks[1].WorkSheets['Sheet1'];
   for filName:=0 to ds.FieldsCount-1 do
   begin
        q:=filName+1;
        sheet.Cells[1,q]:=ss.Strings[filName];
   end;
   for r:=0 to ds.RecordCount-1 do
   begin
        for c:=0 to ds.FieldsCount-1 do
        begin
             row:=r+2;
             col:=c+1;
             sheet.Cells(row,col):=ds.Value(ss.Strings[c]);
        end;
        ds.Next;
   end;

   ss.free;
end;    


Код робочий, но нужно еще при каждом его выполнении задавать имя excel = getdate() (Дата и время создания отчета должно быть в названии).
Подскажите, пожалуйста, как это можно реализовать? По ощущениям дописать нужно одну строчку, но что-то у меня блокатор.
3 июл 14, 18:47    [16256718]     Ответить | Цитировать Сообщить модератору
 Re: Создание имени для excel файла в sql коде  [new]
Glory
Member

Откуда:
Сообщений: 104760
Antony00
Создается excel файл с помощью ms sql кода

Это НЕ "ms sql код"
3 июл 14, 18:50    [16256728]     Ответить | Цитировать Сообщить модератору
 Re: Создание имени для excel файла в sql коде  [new]
Antony00
Member

Откуда:
Сообщений: 15
Glory, это конечно печалька. Но можете ли вы посоветовать что-нибудь по существу? Данные выгружаются с базы sql из-за чего и произошла путаница sorry.
3 июл 14, 19:10    [16256802]     Ответить | Цитировать Сообщить модератору
 Re: Создание имени для excel файла в sql коде  [new]
Glory
Member

Откуда:
Сообщений: 104760
Antony00
Но можете ли вы посоветовать что-нибудь по существу?

Узнать, к какому языку программирования относится данный код.
Обратится в соответствующий форум
3 июл 14, 19:12    [16256808]     Ответить | Цитировать Сообщить модератору
 Re: Создание имени для excel файла в sql коде  [new]
Antony00
Member

Откуда:
Сообщений: 15
Glory, хорошо спасибо!
3 июл 14, 19:14    [16256820]     Ответить | Цитировать Сообщить модератору
 Re: Создание имени для excel файла в sql коде  [new]
a_voronin
Member

Откуда: Москва
Сообщений: 4807
Antony00
Glory, хорошо спасибо!


Похож на Pascal
3 июл 14, 19:16    [16256825]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft SQL Server Ответить