Luiz Arruda (ICO) Posted July 16, 2009 Report Share Posted July 16, 2009 Alguem saberia dizer pq. o Ferase como abaixo não está apagando o arquivo ?? DbCloseArea() Close Data Ferase("Fetagri.250") Assim tb. não apaga Private oXCampo:="\pessoal8\empresas\&Prop\&wAno" Ferase("\oXcampo\Fetagri.250")id=code>id=code>Tomei o maio susto qdo. fiz uma alteração no DBF e ao abrir ver que não tinha dados nem um alterados, explicando melhor, o salario p/ trab. rurais teve um almento em 01/07 e estou atualizando as bases e já tinha alterado esta empresa que acabei de ver com tudo como estava em 30/06. Supunhe... que era do Fetagr1.250 que havia gravado anteriormente, fui conferir e era mesmo. Obrigado Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 16, 2009 Author Report Share Posted July 16, 2009 Alguem saberia dizer pq. o Ferase como abaixo não está apagando o arquivo ?? DbCloseArea() Close Data Ferase("Fetagri.250") Assim tb. não apaga Private oXCampo:="\pessoal8\empresas\&Prop\&wAno" Ferase("\oXcampo\Fetagri.250")id=code>id=code>Tomei o maio susto qdo. fiz uma alteração no DBF e ao abrir ver que não tinha dados nem um alterados, explicando melhor, o salario p/ trab. rurais teve um almento em 01/07 e estou atualizando as bases e já tinha alterado esta empresa que acabei de ver com tudo como estava em 30/06. Supunhe... que era do Fetagr1.250 que havia gravado anteriormente, fui conferir e era mesmo. Obrigado Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
mjmb Posted July 16, 2009 Report Share Posted July 16, 2009 Colega, Faça assim: If Ferase(cArquivo) < 0 MsgStop("Ocorreu um erro ao tentar excluir o arquivo "+cArquivo+";Erro: "+Chr(Ferror())+".","Atenção") Endif Depois verifique na tabela de erros o ocorrido. Se for acesso negado verifique se está executando o sistema como administrador. Abraços, Márcio. FWH 9.05 + xharbour v1.2.1_Rev.6406 + Pelles C 6.0 + MySQL 5 + Verce 4.3(veÃnho, simples e funcional). Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 16, 2009 Author Report Share Posted July 16, 2009 Só vou poder testar amanha no escritorio,mas vou adiantar, uso XP, e não tenho problema nem um em excluir ou criar algo no HD.. Obrigado.. Abraço.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
aferra Posted July 17, 2009 Report Share Posted July 17, 2009 Ola Luiz, blz? Eu parei de ter problemas com ferase, copy, rename, etc depois que comecei a indicar a unidade tb, veja: Ferase(CURDIR()+":\oXcampo\Fetagri.250") Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX "O fracasso jamais me surpreenderá, se minha vontade de vencer for suficientemente forte..."id=red> Quote Link to comment Share on other sites More sharing options...
vailtom Posted July 17, 2009 Report Share Posted July 17, 2009 Um detalhe... no trecho: Private oXCampo:="\pessoal8\empresas\&Prop\&wAno" Ferase("\oXcampo\Fetagri.250")id=code>id=code>O correto não seria: Private oXCampo:="\pessoal8\empresas\&Prop\&wAno" Ferase(oXcampo + "\Fetagri.250")id=code>id=code>Ou ainda (para quem nao gosta de macros: Private oXCampo:="\pessoal8\empresas\" + Prop + "\" + wAno Ferase(oXcampo + "\Fetagri.250")id=code>id=code> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted July 17, 2009 Author Report Share Posted July 17, 2009 Bem vamos por partes.. /* Não funcionou, creio que devido no inicio do programa tem um Set Pat direcionando p/ as empresas e não sei como o curdir() trata issoid=red> id=code> id=code>/* Funcionouid=red> id=code> id=code>/* Tb. Funcionouid=red> Ferase(oXcampo + "\Fetagri.250")id=code>id=code> /* e por fim /* Não mostra erro nem um apenas o msgStop nem grava error.logid=red> MsgStop("Ocorreu um erro ao tentar excluir o arquivo ",; "Erro: "+Chr(Ferror())+".","Atenção") Endifid=code>id=code> Resumido.. Resolvido com a dica do Vailton.. Obrigado... Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- Não existe nada de completamente errado no mundo mesmo um relógio parado consegue estar certo duas vezes por dia. - Não Abandone Seu Tópicoid=red> Quote Link to comment Share on other sites More sharing options...
crisvam Posted July 17, 2009 Report Share Posted July 17, 2009 Luiz, As funções de baixo nÃvel não considera o comand Set Default Assim: para utilizá-las tem que informar o caminho completo do arquivo. Falou... Crisvam - xHarbour_FWH_9.02 - Whorkshop Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.