Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запрос имени сервера, получение списка баз данных на сервере [D7, MSSQL]


Ч_А_Й_Н_И_К ©   (2005-01-30 20:48:00) 

НЕобходимо , что бы при запуске программы запрашивалось имя Сервера.Получение спика баз данны на сервере и возможность выбрать одну из баз для дальнейшей работы.


ЮЮ   (2005-01-31 08:41:00) [1]

Нарисовать свою форму для логина.


sniknik   (2005-01-31 08:41:00) [2]

легальных средств формирования строки не хочеш использовать?
EditConnectionString (uses AdoConed)
PromptDataSource

тогда используй SQLDMO (убери лишнее)

function TDMod.GetSQLServers(ServersItems: TStrings): boolean;
var NameList, Application: OleVariant;
   i:Integer;
   sName: string;
begin
 result:= false;
 try
   try
     ServersItems.Clear;
     Application:= CreateOleObject('SQLDMO.Application');
     NameList:= Application.ListAvailableSQLServers;
     for i:= 1 to NameList.Count do begin
       sName:= NameList.Item(i);
       if sName = '(local)' then sName:= GetComputerName;
       ServersItems.Add(sName);
     end;
     result:= true;
   except
     on E: Exception do DoIfError(E.Message);
   end;
 finally
   Application:= Unassigned;
 end;
end;


Ч_А_Й_Н_И_К   (2005-01-31 08:25:00) [3]

Возмодность запрашивать у пользователя имя MSSQL. Это нужно при использовании на разных машинах с разными серверами.


Anatoly Podgoretsky   (2005-01-30 21:29:00) [4]

Странно как то, лишь бы сервер какой ни будь попался, а остальное побоку.


Nikolay M.   (2005-01-30 21:23:00) [5]

Что характерно - ни одного вопроса :) Ладно, расставим вопросительные знаки вместо точек сами. Вот только встречный вопрос: у кого (у чего?) должно это имя запрашиваться? У юзера? Или искать в сети любой SQL-сервер и запрашивать у первого попавшегося его "имя"? Кстати, что такое имя сервера - это тоже вопрос. Имя Instance-а?


> Получение спика баз данны на сервере

sp_database


> выбрать одну из баз для дальнейшей работы

USE Nortwind, например.


Наверх

Титульная страница Поиск, карта сайта Написать письмо