Tworzenie nowego katalogu na serw. FTP
Napisane: czwartek, 28 sierpnia 2008, 11:45
Chciałbym się dowiedzieć czy przy pomocy TIdFTP da się na serwerze FTP stworzyć nowy katalog?
Pozdrawiam
Pozdrawiam
forum dyskusyjne o programowaniu
https://programuj.cal.pl/forum/
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//Polacz z serwerem
IdFTP1->Host="TwojaDomena.com";
IdFTP1->Port=21;
IdFTP1->User="login";
IdFTP1->Password="haslo";
IdFTP1->Connect();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::IdFTP1Status(TObject *axSender,
const TIdStatus axStatus, const AnsiString asStatusText)
{
// pobieramy status operacji
Memo1->Lines->Add(asStatusText);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
//listowanie katalogu w celu pobrania sciezki glownej
IdFTP1->List(Memo2->Lines);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
// utworzenie katalogu IdFTP w podanej sciezce glownej
const String PATH="domains/TwojaDomena.com/public_html/IdFTP";
IdFTP1->MakeDir(PATH);
}