Colega,
Obrigado pela observação mas o problema não é este, nameserver é uma
variável que contém o servidor de destino, eu editei a linha para
facilitar a compreensão de todos.
Quanto ao agendador de tarefas do windows sugerido por outro colega
também não vai dar certo primeiro porque os parametros são variáveis
e segundo porque deve ser um serviço do windows, ou seja, deverá
entrar em funcionamento antes mesmo do logon de qualquer usuário.
Neste momento estou tentanto a sugestão dada pelo colega que sugeriu
o uso do IdFTP da paleta Indy, acho que está será a solução.
Obrigado a todos.
--- Em delphi-br@yahoogrupos.com.br, Edu Nicácio
<[EMAIL PROTECTED]> escreveu
>
> Camarada, esse nameserver não deveria estar sendo concatenado com a
string de comando não?
>
> ShellExecute(Handle, 'open', pchar('command.com /c ftp -i -
s:c:\scriptfile.txt ' + nameserver), nil, nil, SW_HIDE);
>
> Abraços
>
> Eduardo C. Nicácio
> ----- Original Message -----
> From: SERGIO RICARDO ANDRADE DE CARVALHO
> To: delphi-br@yahoogrupos.com.br
> Sent: Tuesday, September 12, 2006 11:51 AM
> Subject: [delphi-br] Serviço Windows FTP
>
>
> Colegas estou fazendo um programa que deve rodar como um serviço
windows, a finalidade é fazer cópia de arquivos TXT de um servidor
windows para um servidor UNIX AIX via FTP, todos os dias em um certo
horário previamente agendado.
> Eu fiz o programa, ele roda perfeitamente como um serviço do
windows, mas a linha que deve fazer o ftp é que não está funcionando,
quando rodo a instrução via command funciona, criei um outro projeto
form-> new->application e testei as instruções abaixo e funcionou,
mas quando rodo estas instruções como um serviço do windows não
funciona.
> Segue alguns exemplos utilizados:
> WinExec(PChar('command.com /c ftp -i -
s:c:\scriptfile.txt nameserver),SW_HIDE);
> ShellExecute(Handle, 'open', pchar('command.com /c
ftp -i -s:c:\scriptfile.txt nameserver'), nil, nil, SW_HIDE);
> CreateProcess( Nil, PChar('command.com /c ftp -i -
s:c:\scriptfile.txt nameserver), Nil, Nil, False, CREATE_NEW_CONSOLE
Or NORMAL_PRIORITY_CLASS, Nil, PChar('C:\'), SUInfo, ProcInfo );
>
> Se alguém tiver alguma dica de como posso fazer o ftp no meu
projeto que é um serviço windows eu agradeço, um abraço a todos.
>
>
> Atenciosamente,
>
> Sérgio Ricardo Andrade de Carvalho
> Diretor da Divisão de Sistemas Administrativos
> Tribunal Regional Federal da 3ª Região
> [EMAIL PROTECTED] - (11) 3012-1024
> http://www.trf3.gov.br
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
