Скачать: CL | DM;

Передача ссылки на файл по почтовику   Найти похожие ветки 

← →
uno-84   (2008-06-20 11:36) [0]

Здравствуйте! Подскажите пожалуйста! У меня есть почтовик он работает через Базу данных(то есть сообщение вставляется в базу а потом идет получателю), в нем передаются файлы след. образом

if ListView1.Items[N].Caption = "Ôàéë" then
                           begin
                                SQL.Clear;
                                SQL.Add("insert into ATTACHFILES( ATTACHFILE_ID, ATTACH_ID, ATTACHFILE_NOTE, ATTACHFILE_DATA) values (GEN_ID(ATTACHFILE_GEN, 1), :ATTACH_ID, :ATTACHFILE_NOTE, :ATTACHFILE_DATA)");
ParamByName("ATTACH_ID").AsInteger := AT;
ParamByName("ATTACHFILE_NOTE").AsString := ListView1.Items[N].SubItems[1];
NFIL := ListView1.Items[N].SubItems[0];                               ParamByName("ATTACHFILE_DATA").LoadFromFile(NFIL, ftBlob);
Try
 ExecSQL;
Except
   Result := False;
end;

NFIL- полное имя файла
Мне теперь нодо передавать ссылки на файлы, подскажите как это можно сделать? файл выбирается при помощи компонента OpenDialog. может у кого есть премеры кода?
Зараннее спасибо

---

← →
Anatoly Podgoretsky ©   (2008-06-20 12:32) [1]

Не понятно в каком поле, ни одно внешне не похоже на нужное, но примерно так

ParamByName("FILENAME").AsString := OpenDialog.Filename;

---

← →
uno-84   (2008-06-20 13:17) [2]

Я так вставлял, при передачи файла и записи его в Блоб, но мне нужна ссылка, по которой полйчатель обращался бы и скачивал файл

---

← →
uno-84   (2008-06-20 13:18) [3]

Вернее передать ссылку

---

← →
Anatoly Podgoretsky ©   (2008-06-20 13:32) [4]

Ты читаешь или только пишешь?

---

← →
uno-84   (2008-06-20 16:04) [5]

Поле ATTACHEFILENote должно содержать ссылку, при получении оно записываеться в ListView пользователь, может скачать по ней файл либо

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c