Конвертация Binary в String

← →
RustiK (2004-10-05 16:34) [0]

Привет всем!
есть таблица с полем MDN формата binary. Так вот открыл я сервер и зделал экспорт данных в экселевский файл и все что у меня в бинари превратилось в нормальные понятные цифры. Теперь мне понадлобилось написать прогу которая сама бы экспортировало все это в эксель.
Проблема заключается в том что когда я записываю в ячейку значения поля MDN оно у меня только одну цифру показывает или какойнить значок. Как мне это исправить.
Вот код который я использую:
procedure TForm1.Button3Click(Sender: TObject); var xlap,xl:variant; r,c:integer; begin if SaveDialog1.Execute then begin r:=1; c:=1; ADODataSet1.First; XLap:= CreateOLEObject("Excel.Application"); xlap.workbooks.add; XLap.visible := false; xl:=xlap.Workbooks[1].Sheets[1]; while ADODataSet1.Eof=false do begin xl.Cells[c,r].Value:=ADODataSet1.Fields[0].AsInteger; xl.Cells[c,r+1].Value:=ADODataSet1.Fields[1].AsString; xl.Cells[c,r+2].Value:=ADODataSet1.Fields[2].AsString ; xl.Cells[c,r+3].Value:=ADODataSet1.Fields[3].AsString; xl.Cells[c,r+4].Value:=ADODataSet1.Fields[4].Asstring; c:=c+1; ADODataSet1.Next; end; xlap.ActiveWorkbook.SaveAs(SaveDialog1.FileName); xlap.quit; end; end;

← →
Nikolay M. © (2004-10-05 16:43) [1]

Data Transformation Service-ом гоняй.

← →
RustiK (2004-10-06 09:39) [2]

А если у меня нет SQL сервера установленного на данной машине?

← →
RustiK (2004-10-06 09:45) [3]

Вообще не существует такой функции которая бы преобразовывала byte или binary в формат string?

← →
Nikolay M. © (2004-10-06 09:50) [4]

> А если у меня нет SQL сервера установленного на данной машине?

А ты делай это на сервере.

← →
RustiK (2004-10-06 10:01) [5]

> > А если у меня нет SQL сервера установленного на данной
> машине?
>
> А ты делай это на сервере.

Ну нашел я как это сделать на сервере, только как вот это все запустить из моей проги?

А искать я должен?
http://www.relib.com/forums/topic.asp?id=754418

← →
RustiK (2004-10-06 10:14) [7]

Сорри!

Конвертация Binary в String Найти похожие ветки