Jump to content
Fivewin Brasil

APAGAR CDX


VASCON

Recommended Posts

  • Replies 60
  • Created
  • Last Reply

Top Posters In This Topic

Olá Vilian antes de apagar o índice cdx, por segurança, eu uso o seguinte comando:

if select("Dbf") > 0

close Dbf

endif

Mesmo depois de ter feito isso ele não entra no if e mesmo assim não consigo.

Obrigado.

citação:

Pessoal,

O padrão CDX abre os indicies automaticamente quando abrimos o DBF, assim se você quer apagar os .CDX deve fazê-lo antes de abrir os arquivos .DBF.

Vilian F. Arraes

vilian@vfatec.com.br

Belém - Pa

FWH 7.12/xHabour/ADS Server


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Link to comment
Share on other sites

Não utilizo ADS.

citação:

Por acaso vc esta usando ADS ?

Leonardo Machado

Porto Alegre-RS

Hwgui + Mysql / xHarbour 0.99.70 / BCC55 / Vrmm / xDev /Migrando aos Pouco para Fivewin 2.7 + PostgreSql


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Link to comment
Share on other sites

Experimente fechar o arquivo de indice( cdx) antes de apaga-lo, pois os arquivos de indices sao abertos junto com seu respectivo .dbf ( já tive problema assim ).

Espero ter ajudado.

Abraços,

Nelson Nunes de Araujo

Santo André - SP

nelson.n.araujo@gmail.com

Clipper 5.3E, Blinker 7.0, FW 2.4, Workshop

Link to comment
Share on other sites

Vc. já Tentou apagar através de um "DelCDx.BAT" ???

Outra Coisa..

citação:

IF NETUSE("CALEN","LENCA",.T.,10)

ERASE("LENCA.CDX")

PACK

ELSE

MsgAlert("Arquivo não Disponivel!", "Aguarde!")

ENDIF

RETURN .T.


id=quote>id=quote>id=code>id=code>

Porque do PACKid=size3> ??

Luiz Arruda - Corumbá/MS

FWH 2.4 - WS - xHB 09950 - xDev

sai.gifico.corumba@gmail.com

Editado por - ico on 10/03/2008 16:49:18

Link to comment
Share on other sites


STATIC FUNCTION APAGA01()

IF NETUSE("CALEN","LENCA",.T.,10)

ERASE("LENCA.CDX")

PACK

ELSE

MsgAlert("Arquivo não Disponivel!", "Aguarde!")

ENDIF

RETURN .T.

id=code>id=code>

VOCE ESTà ABRINDO O ARQUIVO EM MODO COMPARTILHADO RAPAZ, ISTO, NÃO PÓÓDY.... TEM QUE SER EM MODO EXCLUSIVO.

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Link to comment
Share on other sites

Olá Luiz, antes de atualizar um indice, para quebrar o galho

do cliente eu chamo um bat para eliminar os índices. Assim eu consigo eliminar os indices, pelo Bat.

Obrigado.

citação:

Vc. já Tentou apagar através de um "DelCDx.BAT" ???

Outra Coisa..

citação:

IF NETUSE("CALEN","LENCA",.T.,10)

ERASE("LENCA.CDX")

PACK

ELSE

MsgAlert("Arquivo não Disponivel!", "Aguarde!")

ENDIF

RETURN .T.


id=quote>id=quote>id=code>id=code>

Porque do PACKid=size3> ??

Luiz Arruda - Corumbá/MS

FWH 2.4 - WS - xHB 09950 - xDev

sai.gifico.corumba@gmail.com

Editado por - ico on 10/03/2008 16:49:18


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Link to comment
Share on other sites

Para entender, para que serve esses comandos??

citação:

Antes de abrir os arquivos chame a função:

#define HB_SET_AUTOPEN 45

SET(HB_SET_AUTOPEN,.F.)

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 10/03/2008 17:29:43


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Link to comment
Share on other sites

citação:

Para entender, para que serve esses comandos??

citação:

Antes de abrir os arquivos chame a função:

#define HB_SET_AUTOPEN 45

SET(HB_SET_AUTOPEN,.F.)

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 10/03/2008 17:29:43


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65


id=quote>id=quote>

Para que os arquivos de indices não sejam abertos junto com os dbfs automaticamente

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 11/03/2008 10:09:58

Link to comment
Share on other sites

citação:

citação:

Para entender, para que serve esses comandos??

citação:

Antes de abrir os arquivos chame a função:

#define HB_SET_AUTOPEN 45

SET(HB_SET_AUTOPEN,.F.)

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 10/03/2008 17:29:43


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65


id=quote>id=quote>

Para que os arquivos de indices não sejam abertos junto com os dbfs automaticamente

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 11/03/2008 10:09:58


id=quote>id=quote>

Giovany, quem seria IDIOTA o suficiente, para abrir arquivos de INDICES junto com o DBF, na hora de INDEXAR?

Oia... esta reposta é cruel! kkkkkkkkkkkkkkk. Cada doido que aparece de vez em quando...

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe

Link to comment
Share on other sites

citação:

citação:

citação:

Para entender, para que serve esses comandos??

citação:

Antes de abrir os arquivos chame a função:

#define HB_SET_AUTOPEN 45

SET(HB_SET_AUTOPEN,.F.)

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 10/03/2008 17:29:43


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65


id=quote>id=quote>

Para que os arquivos de indices não sejam abertos junto com os dbfs automaticamente

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 11/03/2008 10:09:58


id=quote>id=quote>

Giovany, quem seria IDIOTA o suficiente, para abrir arquivos de INDICES junto com o DBF, na hora de INDEXAR?

Oia... esta reposta é cruel! kkkkkkkkkkkkkkk. Cada doido que aparece de vez em quando...

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe


id=quote>id=quote>

Pode ser que apareca um

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Link to comment
Share on other sites

rs rs rs.... Giovanni e Kapiaba, eu não abro o índice junto com o dbf. Eu simplesmente efetuo um close all(por seguraça, verifico se foi realmente fechado por causa desse problema) e depois tento queimar os índices e não consigo.

Segue a rotina que utilizo

cInd := pDir + (cInd) + ".CDX"

deletefile(cInd) //api do windows

do while file(cInd)

msg("Arquivo " + cInd + " em uso. Libere-o")

deletefile(cInd)

enddo

citação:

citação:

citação:

citação:

Para entender, para que serve esses comandos??

citação:

Antes de abrir os arquivos chame a função:

#define HB_SET_AUTOPEN 45

SET(HB_SET_AUTOPEN,.F.)

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 10/03/2008 17:29:43


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65


id=quote>id=quote>

Para que os arquivos de indices não sejam abertos junto com os dbfs automaticamente

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC

Editado por - giovanyvecchi on 11/03/2008 10:09:58


id=quote>id=quote>

Giovany, quem seria IDIOTA o suficiente, para abrir arquivos de INDICES junto com o DBF, na hora de INDEXAR?

Oia... esta reposta é cruel! kkkkkkkkkkkkkkk. Cada doido que aparece de vez em quando...

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

Fone: (11) 3106-2832

FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe


id=quote>id=quote>

Pode ser que apareca um

Giovany Vecchi - Jales - SP

FWH 2.8 /Clipper 5.3b /Blinker 5.0 / Harbour 0.99 / xHarbour 99.71/ Bcc 5.6 / Ads 7.1 /PellesC


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Editado por - aormond on 11/03/2008 11:21:57

Link to comment
Share on other sites

Por acaso é Win 2000? Tenho uma estação que nunca está pronta para retirar o pendrive, pois sempre está com arquivos em uso (é claro que mesmo quando tudo fechado). No entanto, pelo DOS consigo apagar até executável em uso.

Tem um aplicativo free da Microsoft, que permite acompanhar todos os recursos em uso, com filtros, chama-se Process Monitor e encontra-se no Baixaki.

------------------------

FiveWin 1.92 / Clipper 5.3b / Blinker 7.0 / Workshop

Link to comment
Share on other sites

Anthony,

Até agora você não mostrou nenhum código de como está tentando deletar o CDX.

close all ou if select("Dbf")>0 só tem utilidade se VOCÊ MESMO ABRIU algum DBF. Se ele está aberto por outro usuário, necas de pitibiriba.

Das duas uma: ou você tenta abrir o DBF de forma exclusiva (ANTES DE DELETAR) para ter certeza de que outros usuários não estão "on line" ou tem erro bravo de programação da sua parte.

Outra coisa, o fato de conseguir deletar pelo DOS não significa nada. Qualquer arquivo, mesmo abertoid=red>, pode ser DELETADO se for XP.

Fui

assinatpaulo.jpg

Editado por - pauloaraujo on 11/03/2008 21:10:51

Link to comment
Share on other sites

Olá,

Faça um teste, se estiver no servidor, ressete o servidor, raramente eu ví o servidor "segurar" os arquivos, ou seja uma estação abriu os arquivos, e mesmo ela saindo ele continuava aberto pela mesma estação

Vagner Wirts

VI Encontro está chegando icon_smile_big.gif, não perca icon_smile_big.gif

Link to comment
Share on other sites

Olá Paulo, Muito obrigado pela ajuda. Vamos lá... Como disse anteriormente já utilizei de todas as formas segue os procedimentos que já fiz.

- O problema só acontece com o servidor, mesmo estando todos os terminais desligados e reiniciado o servidor.

- Já utilizei o ferase, erase e até com o API(deletefile) do windows para deletar o índice. Exemplo um pouco mais acima deste tópico.

- antes de deletar o índice, não tenho nenhum dbf aberto.

- antes de deletar verifico se ele está aberto depois desses acontecimentos.

segue mais um exemplo igual ao meu prg e desde já obrigado a todos.

if select("EMPRESA") > 0

close EMPRESA

endif

ferase("EMPRESA.CDX")

do while file("EMPRESA.CDX")

msg("Tentando apagar arquivo EMPRESA.CDX") // não sai dessa mensagem

ferase("EMPRESA.CDX")

enddo

if !net_use("EMPRESA",,"E")

return

endif

pack

oText:SetText("Atualizando " + alias() + "...")

oMeter:nTotal := lastrec()

nCount++ ; oMeter:Set(nCount)

index on CODIGOEMP tag EMCODIGO to ("EMPRESA") ;

eval ( oMeter:Set( RecNo() ), SysRefresh() ) every 10

index on NOME tag EMNOME to ("EMPRESA") ;

eval ( oMeter:Set( RecNo() ), SysRefresh() ) every 10

citação:

Anthony,

Até agora você não mostrou nenhum código de como está tentando deletar o CDX.

close all ou if select("Dbf")>0 só tem utilidade se VOCÊ MESMO ABRIU algum DBF. Se ele está aberto por outro usuário, necas de pitibiriba.

Das duas uma: ou você tenta abrir o DBF de forma exclusiva (ANTES DE DELETAR) para ter certeza de que outros usuários não estão "on line" ou tem erro bravo de programação da sua parte.

Outra coisa, o fato de conseguir deletar pelo DOS não significa nada. Qualquer arquivo, mesmo aberto

id=red>, pode ser DELETADO se for XP.

Fui

assinatpaulo.jpg

Editado por - pauloaraujo on 11/03/2008 21:10:51


id=quote>id=quote>

Anthony Ormond

FWH(7.12)- xHabour 1.1.0 (simplex) - Pelles C 4.50 - xDev Studio v0.65

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...

×
×
  • Create New...