PDA

Ver la Versión Completa : Crear Usuario FTP


JerS
07-05-2011, 20:47:21
Muy Buenas amigos me gustaría que me ayudaran un poco con lo siguiente, cree un cliente FTP, pero me gustaria porder crear Usuarios nuevos y directorios nuevos desde mi aplicacion

newtron
08-05-2011, 09:20:23
Pues como no des más pistas.....

URBANO
09-05-2011, 08:10:48
Si no recuerdo mal, yo utilizo la siguiente linea para crear un directorio:

sendcmd('MKD nombredirectorio')

Y para acceder a un directorio utilizo:

sendcmd('CWD nombredirectorio')

Saludos.

JerS
09-05-2011, 20:45:37
Pues como no des más pistas.....

hice una aplicacion que se conecta a un servidor FTP. pero quisiera que por la misma aplicacion pudiera crear Usuarios nuevos para que puedan accesar al FTP.

newtron
10-05-2011, 09:46:52
Hola de nuevo.

He estado ojeando un rato por internet pero si existe la posibilidad de crear un usuario desde los componentes indy yo no he encontrado como. Igual ni se puede, espera un poco a ver si alguien del foro lee el mensaje y nos ilumina a los dos.

Saludos

Casimiro Notevi
10-05-2011, 10:55:18
Un cliente ftp no debe poder crear usuarios. Para ello deberías tener acceso al servidor ftp.

marcoszorrilla
10-05-2011, 14:37:22
Yo me conecto así:

procedure TfrExpterminales.btConectarClick(Sender: TObject);
begin
btDesconectar.Enabled :=True;
btListar.Enabled :=True;

btConectar.Enabled :=False;

pnEstado.Caption:='Servidor Conectado';
pnEstado.Font.Color:=ClGreen;
pnEstado.BevelOuter:=bvRaised;

IdFTP.Host:=HostTxt.Text;
IdFTP.Port:=StrToInt(PortTxt.Text);
IdFTP.UserName:=UserTxt.Text;
IdFTP.PassWord:= PassTxt.Text;

try
IdFTP.Connect;
Ficheros.Open;
ficheros.EmptyTable;
except
raise Exception.Create( 'No se ha podido conectar con el servidor ' + IdFTP.Host );
end;
btListar.Click;
end;

El usuario, Servidor, clave etc. te lo dan para que puedas conectarte, otra cosa es que el servidor sea tuyo y puedas crear diferentes usuarios, claves...

Un Saludo.