Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.06.24;
Скачать: [xml.tar.bz2];

Вниз

EXE in DB   Найти похожие ветки 

 
yozhik   (2002-05-31 16:29) [0]

Подскажите плз, можно ли засунуть/вытянуть в/из базу/ы заданный ехе файл, если да то как это реализовать? Если можно с примерчиком.


 
kalinka   (2002-05-31 16:37) [1]

Используйте поле типа Blob (можно Image)
//СОХРАНЕНИЕ В БЛОБ ПОЛЕ
procedure TfmMainForm.SaveToBlobField(UserName: String);
Begin
With adoToBlob do
Begin
Close;
ConnectionString := ConnectStr;
SQL.Clear;
SQL.Add("SELECT * FROM *** Where ****");
Open;
End;

//Изменение уже существующей записи
If (adoToBlob.Active) AND (adoToBlob.RecordCount > 0) Then
Begin
With adoToBlob do
Begin
Edit;
TBLOBField(adoToBlob.FieldByName("MyExeFile")).LoadFromFile("c:\...\myfile.exe");
Post;
End;
End
Else
Begin
//Добавление новой записи
With adoToBlob do
Begin
Close;
ConnectionString := ConnectStr;
SQL.Clear;
SQL.Add("SELECT * FROM ***");
Open;
End;
With adoToBlob do
Begin
Append;
TBLOBField(adoToBlob.FieldByName("MyIniFile")).LoadFromFile("c:\...\myfile.exe");
Post;
End;
End;
end;


 
yozhik   (2002-05-31 16:49) [2]

спасибо



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

Форум: "Базы";
Текущий архив: 2002.06.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.008 c
14-77546
Alexander Bogdanov
2002-05-16 06:09
2002.06.24
где взять RoseDelphiLink3Setup.exe


14-77613
III@K@/\
2002-05-19 19:35
2002.06.24
Программирование


4-77680
Zeden
2002-04-25 23:51
2002.06.24
Подкиньте ПЛЗ примеры по TThreads.


3-77255
Kurmanbek
2002-05-30 07:28
2002.06.24
Переименование таблицы в IBase


1-77435
diww
2002-06-11 10:58
2002.06.24
Поиск в ListBox если MultiSelect = true





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский