Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 10.01.2010, 13:49   #1
ImmortalAlexSan
Участник клуба
 
Аватар для ImmortalAlexSan
 
Регистрация: 13.01.2009
Сообщений: 1,353
Восклицание Работа с DNS

Всем привет. После завтра экзамен, надо прогу дописать успеть. Вот что надо сделать: на флешке должны быть записаны файлы (laba1.MDF и laba1.LDF - это база данных, которую так сохраняет SQL server 2000) и написаный мной клиент. На компе, куда вставляется флешка, установлен SQL server но нету моей БД. мне надо, что бы при запуске клиента, в мой клиент загружались таблицы из моей бд, файлы которой есть только на флешке. Как мне это сделать? Прошу подробно описать процесс. Читал литературу, искал в интернете, но ничего не понял там, находил какой-то корявый код, который не работает. Что нужно написать в коде клиента, чтобы всё заработало так как надо?! Пока я только написал функцию определения имени компа, но это наверное не то, что надо. С SQLConfigDataSource не могу разобраться! Не такой я продвинутый пока.
Код:
function GetComputerNetName: string;
var
  buffer: array[0..255] of char;
  size: dword;
begin
  size := 256;
  if GetComputerName(buffer, size) then
    Result := buffer
  else
    Result := ''
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Text:='';
Edit2.Text:='';
Edit3.Text:='';
ComboBox1.Text:='...';
ComboBox2.Text:='...';
ComboBox3.Text:='...';
ZConnection.HostName:=GetComputerNetName;
ZConnection1.HostName:=GetComputerNetName;
ZConnection2.HostName:=GetComputerNetName;
end;
"Тебе то может на меня и насрать, но твои глаза меня обожают!"

Последний раз редактировалось ImmortalAlexSan; 10.01.2010 в 13:54.
ImmortalAlexSan вне форума
Старый 10.01.2010, 13:53   #2
ImmortalAlexSan
Участник клуба
 
Аватар для ImmortalAlexSan
 
Регистрация: 13.01.2009
Сообщений: 1,353
По умолчанию

Буковкииии
"Тебе то может на меня и насрать, но твои глаза меня обожают!"

Последний раз редактировалось ImmortalAlexSan; 10.01.2010 в 13:55. Причина: Случайно добавил новое сообщение в виде кода, а не обновил старое
ImmortalAlexSan вне форума
Старый 10.01.2010, 14:10   #3
Alar
Александр
Администратор
 
Аватар для Alar
 
Регистрация: 28.10.2006
Сообщений: 17,522
По умолчанию

и причем тут DNS ?
Alar вне форума
Старый 10.01.2010, 14:23   #4
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

товарищ видимо с DSN не захотел разбираться в >>> этой <<< теме.
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума
Старый 10.01.2010, 14:30   #5
Alar
Александр
Администратор
 
Аватар для Alar
 
Регистрация: 28.10.2006
Сообщений: 17,522
По умолчанию

DSN...
Закрываю эту тему
Alar вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление DNS wizard68 Помощь студентам 6 11.12.2009 14:29
DNS Client ikakey Софт 0 27.03.2009 11:15
IP Адресс, DNS, WINS NovaC Работа с сетью в Delphi 3 22.01.2007 09:05
DNS - поиск адреса Anatolij Работа с сетью в Delphi 0 19.01.2007 15:54