Суббота, 05.10.2024, 10:00 Приветствую вас Гость | Группа "Гости" 
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: xXxSh@dowxXx, Anton93, Волк-1024  
Имя компьютера+ftp
raviti2Дата: Воскресенье, 10.07.2011, 20:02 | Сообщение # 1
Был не раз
Зарегистрирован: 14.01.2011
Группа: Пользователи
Сообщений: 15
Статус: Offline
Так теперь мне надо что бы прога находила имя компьютера создавала папку на ftp и кидала туда файл с паролями
 
gravitasДата: Воскресенье, 10.07.2011, 20:47 | Сообщение # 2
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
Code
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;

Code
idftp1.MakeDir(GetComputerNetName);
idftp1.ChangeDir(GetComputerNetName);


TheDeduction

Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
 
raviti2Дата: Воскресенье, 10.07.2011, 21:48 | Сообщение # 3
Был не раз
Зарегистрирован: 14.01.2011
Группа: Пользователи
Сообщений: 15
Статус: Offline
Спасибо это нужно 2 кода писать или только один?
 
gravitasДата: Воскресенье, 10.07.2011, 22:03 | Сообщение # 4
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
Quote (raviti2)
Спасибо это нужно 2 кода писать или только один?

1 - функция. 2 - использование функции (создание папки на фтп и переход в нее)


TheDeduction

Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
 
  • Страница 1 из 1
  • 1
Поиск:

delphicode.ru © 2008 - 2024 Хостинг от uCoz