Clipper On Line • Ver Tópico - erro de SPACEDISK(0) no WIN 10 na execução de DBFs

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor bfinformatica » 02 Jan 2019 09:30

bom dia prezados
Feliz 2019 a todos!

estou com problemas na gravação de BDFs no WIN 10
da erro de spacedisk(0)

Uso harbour + minigui com mysql, mas tenho alguns arquivos temporários
que uso em DBF

alguém ja passou por isso e que possa me ajudar

gratidão
bfinformatica
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 9
Data de registro: 21 Mar 2017 20:57
Cidade/Estado: toledo pr
Curtiu: 0 vez
Mens.Curtidas: 0 vez

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor Kapiaba » 02 Jan 2019 13:02

Veja se ajuda:

FUNCTION VERIFICA_HD()

   LOCAL nSpaceDisk, lsucesso := .F.

   nSpaceDisk := DISKSPACE()

   // ? Tran( nSpaceDisk, "@E 999,999,999,999,999" )
   // @ 2,2 Say Tran( nSpaceDisk, "@E 999,999,999,999,999" )
   IF ( DISKSPACE() < 25000000.0 )

      MsgStop( OemToAnsi("ATEN€ÇO USUµRIO:     PERIGO EXTREMO   -   CUIDADO!!")+CRLF+;
               OemToAnsi("O ESPA€O DISPONÖVEL NO HD DO SERVIDOR ONDE         ")+CRLF+;
               OemToAnsi("ESTµ INSTALADO O PROGRAMA DO PLENO, ESTµ MUITO     ")+CRLF+;
               OemToAnsi("PEQUENO(Cheio).  POSSIVELMENTE PODERÇO OCORRER     ")+CRLF+;
               OemToAnsi("ERROS QUANDO TENTAR USAR O PLENO NO SERVIDOR.      ")+CRLF+;
               OemToAnsi("ACONSELHAMOS UMA SELE€ÇO  DOS  ARQUIVOS  QUE       ")+CRLF+;
               OemToAnsi("SE ENCONTRAM ATUALMENTE NO SEU SERVIDOR.           ")+CRLF+;
               OemToAnsi("OU TROQUE O HD(Hard Disk) DO COMPUTADOR...         ")+CRLF+;
               OemToAnsi("RECOMENDAMOS UM HD DE NO MINIMO: 500 Gigas.        ")+CRLF+;
               OemToAnsi("PE€A AO PESSOAL PARA SAIR DA REDE E NÇO USAR       ")+CRLF+;
               OemToAnsi("MAIS O PLENO, AT QUE SE RESOLVA O PROBLEMA.       ")+CRLF+;
               OemToAnsi("VERIFICAR ESPA€O(HD) DO SERVIDOR DE ARQUIVOS.      ")+CRLF+;
               OemToAnsi("ESPA€O DISPONIVEL NO HD DO SERVIDOR: "                    +;
               Tran( nSpaceDisk, "@E 999,999,999,999,999" + " Bytes Livres(Disponivel)  POUCO!!" ) )+CRLF+;
               OemToAnsi("COMUNIQUE ESTA MENSAGEM IMEDIANTAMENTE AO SEU      ")+CRLF+;
               OemToAnsi("TCNICO DE INFORMµTICA. CHAME UM TCNICO AGORA!!!  ")+CRLF+;
               OemToAnsi("URGENTE: CHAME O SEU TCNICO DE INFORMµTICA.       ")+CRLF+;
               OemToAnsi("NÇO TENTE GERAR NOTAS FISCAIS AT O SEU TCNICO    ")+CRLF+;
               OemToAnsi("LIBERAR ESPA€O NO HD DO SERVIDOR DE ARQUIVOS.      ")+CRLF+;
               OemToAnsi("FA€A UM <PRINT SCREEN> DESTA TELA E MOSTRE AO      ")+CRLF+;
               OemToAnsi("GERENTE, OU AO PROPRIETµRIO DA EMPRESA, URGENTE!!! ")+CRLF+;
               OemToAnsi("Pressione <ENTER> Para Continuar...                "),     ;
               OemToAnsi("Disco R¡gido(Servidor) Super Lotado(Cheio) Cuidado!") )

   ENDIF

RETURN NIL
Kapiaba
Colaborador

Colaborador
 
Mensagens: 1765
Data de registro: 07 Dez 2012 15:14
Cidade/Estado: São Paulo
Curtiu: 310 vezes
Mens.Curtidas: 119 vezes

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor JoséQuintas » 02 Jan 2019 21:45

bfinformatica escreveu:da erro de spacedisk(0)


Traduza isso.
O que significa dar erro de spacedisk?
Qual a mensagem de erro?
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18014
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor bfinformatica » 02 Jan 2019 22:35

tem muita área na máquina, ocorre que seu colocar os DBFs montados funciona, porem quando tem uma atualização
que preciso regravar ele da erro.

Nesse caso, quando foi gravar a nova versao 20.0 deu erro.

if c_versao != c_vermst

setproperty("form_main","lbl_titulo","value",'AGUARDE.....ESTOU ATUALIZANDO A VERSÃO!!!')

dbcloseall()

criar_tabelas() // cria /corige tabelas MySQL
criadbf() // cria/corrige tabelas DBF
CriaCepdbf() // cria/corrige tabelas DBF do CEP
CriaCdx()
AbreDbfCdx()

dbselectarea('master')
if LockReg()
master->versao := Substr(c_versao,4,2)+Substr(c_versao,7,1)
master->diascon := 90
master->data_vig := x_data_vig // ctod('20/09/14')
master->(dbcommit())
master->(dbgotop())
endif

endif
bfinformatica
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 9
Data de registro: 21 Mar 2017 20:57
Cidade/Estado: toledo pr
Curtiu: 0 vez
Mens.Curtidas: 0 vez

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor bfinformatica » 02 Jan 2019 22:50

Kapiaba

grato pela colaboração. :)) :))
bfinformatica
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 9
Data de registro: 21 Mar 2017 20:57
Cidade/Estado: toledo pr
Curtiu: 0 vez
Mens.Curtidas: 0 vez

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor bfinformatica » 03 Jan 2019 21:37

consegui fazer funcionar com o executavel local.
Descobri que não estava atualizando dbf pela rede, mas local está tudo normal.

por enquanto, muito obrigado.
bfinformatica
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 9
Data de registro: 21 Mar 2017 20:57
Cidade/Estado: toledo pr
Curtiu: 0 vez
Mens.Curtidas: 0 vez

erro de SPACEDISK(0) no WIN 10 na execução de DBFs

Mensagempor Fernando queiroz » 04 Jan 2019 22:46

já verificou se na estacao esta compartilhado para leitura e gravacao
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Fernando queiroz
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 737
Data de registro: 12 Nov 2014 23:41
Cidade/Estado: Porto Alegre/RS
Curtiu: 12 vezes
Mens.Curtidas: 58 vezes




Retornar para Harbour

Quem está online

Usuários vendo este fórum: Google [Bot] e 6 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro