| PeroManiak |
| Отправлено: 25.06.2004, 13:41 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 71
|
Задача такая:
Есть база, есть прога, есть левоюзеровский комп, где я ничего не писал в AliasManager'e. Как создать псевдоним программно?
Заранее всем жирное спасибо!
|
|
| Valdemar |
| Отправлено: 25.06.2004, 14:18 |
|
Мастер участка
Группа: Участник
Сообщений: 433
|
Вы бы уточнили какая у вас база.
Для базы Paradox работая с BDE я делал так:
| CODE | Session->Close();
Session->AddStandardAlias("aliasname",DirectoryListBox1->Directory,"PARADOX");
Session->Open();
Session->AddPassword("12345");
|
|
|
| PeroManiak |
| Отправлено: 28.06.2004, 08:27 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 71
|
Valdemar, спасибо, я уже разобрался:
| CODE |
int IndexAlias;
TStringList *AliasNameList = new TStringList();
if (AliasNameList)
{
Session->GetAliasNames(AliasNameList);
IndexAlias = AliasNameList->IndexOf("OrdersDB");
if(IndexAlias == -1)
{
Session->AddStandardAlias("OrdersDB", ExtractFilePath(ParamStr(0)), "PARADOX");
AliasNameList->Clear();
AliasNameList->Add("OrdersDB");
IndexAlias = 0;
}
|
|
|
| Dimon.Ru |
 Отправлено: 27.10.2004, 10:28 |
|
Станционный диспетчер
Группа: Участник
Сообщений: 92
|
у меня та же проблема, только + ко всему прога не создает алиас, если в системе ни одного алиаса не зарегистрировано |
|
