william

citação:tem um problema no ponteiro de segundos xharbour 1.1.0 + gtwvw + fw 8.04+vsx e começando + xbrowse migrando p/ o 10.2 e nfe (classe do gilmer) e futuramente paf-ecf msn..: zazibr@hotmail.com skype: zazibr Daniel lopes Filho Campo Grande/MS id=quote>id=quote>Daniel, verifiquei o exemplo , esta faltando o gray2.bmp . Colocando este arquivo junto, resolve o problema dos segundos. Vc encontra o gray2.bmp na pasta fwh\bitmaps\backgrnd\gray2.bmp Luiz, é um reloginho analogico bem simplizinho.... mas pode ser melhorado. William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Luiz boa noite , achei este aqui nos meus arquivos, veja se funciona, pois nao testei. http://www.4shared.com/zip/RW6q0tZM/anaclock.html abraço William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

olá Marcelo, no link abaixo tem a classe display3 com exemplo de uso. http://www.4shared.com/rar/NIwJho3C/DISPLAY3.html talvez resolva seu problema. William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Tambem me interesso em participar e ajudar na programacao deste software. William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

bom dia, eu faço assim: * aqui pego a conexao atual nCnn:=SR_GetActiveConnection() * abro a conexao com outro banco cConnString = "MySQL=dbmy0003.whservidor.com;UID=fbaluminar;PWD=fazen1;DTB=fba" nDetected := DetectDBFromDSN( cConnString ) If nDetected > SYSTEMID_UNKNOW nCnn1 := SR_AddConnection( nDetected, cConnString ) EndIf If nCnn1 < 0 SR_SetActiveConnection(nCnn) msgalert("NAO Conectou com o Banco de Dados WEB !","Aviso") close data return nil else os2:settext("Conectado com o Banco de Dados 2 !") EndIf * tendo os dois bancos abertos, para copiar eu faço assim: * abre BD fazenda SR_SetActiveConnection(nCnn) select 1 USE "USUARIOS" ALIAS ORI SHARED VIA "SQLRDD" xt:=ori->(reccount()) ometer:SetTotal(xt) * abre BD web SR_SetActiveConnection(nCnn1) * arquivo de Usuarios * zera arquivo oSql := SR_GetConnection() oSql:Exec( "TRUNCATE TABLE usuarios" ) i:=0 select ori go top do while !ori->(eof()) xcod :=ori->cod xnome:=ori->nome xsenha:=ori->senha xset:=ori->setor xo1:=ori->obs1 xo2:=ori->obs2 xo3:=ori->obs3 xo4:=ori->obs4 xo5:=ori->obs5 * campo logico xsup:=iif(ori->superv , "1", "0" ) mens:="INSERT INTO usuarios (cod,nome,senha,setor,obs1,obs2,obs3,obs4,obs5,superv)"+ ; "VALUES ( '" + xcod + "'," + ; "'" + xnome + "'," + ; "'" + xsenha+ "'," + ; "'" + xset + "'," + ; "'" + xo1 + "'," + ; "'" + xo2 + "'," + ; "'" + xo3 + "'," + ; "'" + xo4 + "'," + ; "'" + xo5 + "'," + ; xsup +" )" oSql:Exec( mens ) ori->(dbskip(1)) i++ ometer:set(i) enddo close data ometer:set(100) ********************************************** id=code>id=code>"Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

bom dia , aqui tem um exemplo do Daniel Garcia usando o Google Chrome, talvez te dê uma ideia de como fazer... http://forums.fivetechsupport.com/viewtopic.php?f=6&t=23415 William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

bom dia, eu nao uso o Pelles mas creio que vc pode abrir o seu arquivo .RC com um editor de texto qualquer e colar o codigo dentro dele, independente do pelles... William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

olá , eu uso assim oBrw:nHeaderHeight := 40 oBrw:nHeaderLines:= 2 e para separar o titulo use algo como "Titulo 1" + CRLF + "Titulo 2" William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

fsaguilieri , seja bem vindo ao forum. Esse SCOPE pelo que eu vi funciona como um EASYTEF, só que é do ITAU, correto? Pode passar mais informacoes como onde comprar, preço, tem exemplos em xharbour ? Parece interessante... William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Olá Luiz, será que antes do Do while !eof() nao deveria ter um dbgotop() ? William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

putz , não encontrei , ou não existe comando no mysqldump que gera todas as tabelas separadamente de uma só vez. Sempre tem que ser colocado num loop para gerar.Algo assim: For i=1 to Len(ListaTabelas) mysqldump -B BANCO --table LISTATABELAS > LISTATABELAS.sql * o mysqldump faz: * conecta no BD * executa comando * desconecta * se for um BD com 150 tabelas vai fazer isso vezes! * perde performance, fica lento... next O ideal seria o mysqldump ter algo assim: mysqldump -B BANCO --table TAB1 TAB2 > TAB1.SQL TAB2.SQL Mas isso nao funciona ! Sendo assim, desisto de tentar colocar no backup a restauracao parcial , pelo motivo de lentidão no processo. A restauração vai ser sempre TOTAL. Para melhorar o sistema de backup, vou mandar ZIPAR o arquivo .SQL gerado. Assim ganho mais espaço Físico de armazenagem. William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Luizao , seria +- assim: 0) Pego a lista de tabelas do banco com o comando mysql -h localhost -u root -psenha -d banco -s-e "SHOW TABLES" > arq.temp No arq.temp está a lista das tabelas para o dump. 1) Para fazer o Backup.SQL -> gero 1 arquivo .SQL para cada tabela da lista em uma pasta temporaria. Depois Zipo todos os arquivos gerando o BACKUP.ZIP. (Dentro do backup.zip por exemplo terá 130 arquivos .SQL) 2)para restaurar o backup: (esqueça a parte de ler o txt, nao vai precisar). Verifico o conteudo do ZIP e abro 1 listbox para marcar as tabelas escolhidas. Depois executo a restauracao das tabelas.sql selecionadas com o mysql.exe. Agora minha duvida é , será que existe um comando no mysqldump.exe que gera todas as tabelas .SQL de uma so vez? Ou terei que dar um mysqldump para cada tabela ? O comando é esse , mas gera apenas 1 tabela. mysqldump -B BANCO --table TABELA > tabela.sql William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários." Editado por - william on 05/01/2012 17:59:22

citação:Experimente se já não o conhece. http://www.cobiansoft.com/ id=quote>id=quote>Ok S.A. , vou dar uma pesquizada Luizao, lendo o que vc me disse, me surgiu uma ideia: - leio do arquivo BACKUP.SQL em modo texto e pego a lista de tabelas existentes no backup. ( o meu sistema já faz isso). - Faço o Dump das tabelas da lista uma a uma, gravando os .SQL em um pasta temporaria. - Apos gerar os .SQL para cada tabela, vou zipar tudo num arquivo ZIP. este será o arquivo de backup ! - apos gerado, limpo a pasta temporaria. - depois eu consigo selecionar as tabelas que eu desejo restaurar, do jeito que eu quero ! e ainda tem a vantagem de ja sair compactado, ganhando em espaço fisico o que vc acha ? William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários." Editado por - william on 05/01/2012 17:08:57

citação:Com ceto malabarismo, sim.http://blog.tsheets.com/2008/tips-tricks/mysql-restoring-a-single-table-from-a-huge-mysqldump-file.html id=quote>id=quote>Luizao, desta forma fica dificil incluir num programa de backup, visto que tem muitos comandos manuais de Mysql... citação:Outro modo seria ao invés de fazer o dump do BD inteiro num arquivo só, faz um arquivo por tabela. Acho que o mysqldump tem uma opção assim. id=quote>id=quote>Desta forma fica mais impossivel ainda, pois creio que um backup deve ter apenas 1 arquivo... O meu banco de dados tem 130 tabelas... ja pensou , todo dia de backup aumentar 130 tabelas.... Creio que a solução para isso vai ser mais dificil. Terei que ler o arquivo .SQL com a classe Ttxtfile() . O arquivo .SQL não passa de um arquivo texto que contem as instrucoes e os dados a serem inseridos no BD quando se restaura o backup. Vou tentar extrair o arquivo lendo diretamente o texto. Alguem ja fez assim ? William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Alguem sabe se é possivel a partir de um arquivo backup.sql , restaurar somente uma tabela, sem ter quer restaurar tudo ? William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Boa noite e Feliz Ano Novo a Todos. Estou desenvolvendo um backup para mysql e gostaria que os amigos fizessem testes com ele e se possivel dar sugestoes para melhora-lo. Ficou bem simples, basta configurar o BD, usuario e senha nas configuracoes e já deve funcionar. Ele trabalha junto com o mysqldump.exe para gerar o backup e com o mysql.exe para restaurar o backup. link : http://www.4shared.com/rar/Ajxd2i99/backup.html William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

Boa noite e Feliz Ano Novo a Todos. Estou desenvolvendo um backup para mysql e gostaria que os amigos fizessem testes com ele e se possivel dar sugestoes para melhora-lo. Ficou bem simples, basta configurar o BD, usuario e senha nas configuracoes e já deve funcionar. Ele trabalha junto com o mysqldump.exe para gerar o backup e com o mysql.exe para restaurar o backup. link : http://www.4shared.com/rar/Ajxd2i99/backup.html William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

citação:Desculpa vc esta errado. Somente o Metodo Construtor retorna o Self. Nesse caso poderia ser o metodo NEW. id=quote>id=quote>Desculpa vc está correto. realmente somente o contructor retorna self, o que ele quer é para um método qualquer... Me confundi Sorry William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

olá Geraldo , creio que o seu metodo deve retornar SELF e nao .T. METHOD Teste() CLASS TMyData "Novo método na classe database sem alterar original" return self Teste e diga se funcionou William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

boa noite, pelas mensagens de erro , nao está encontrando as libs do sqlrdd. Vc deve incluir as libs LIBMYSQL.LIB e SQLBCC58.LIB (caso for BCC582) no seu script William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

putz, pode ser que eu que esteja errado... Esta DLL que vc quer registrar , não é um controle Activex (.OCX) ? Ou é uma DLL de Funções ? Isso que eu te passei foi pressupondo que a DLL que vc vai registrar é um ACTIVEX, e é registrado pelo seu ProgId, no caso do exemplo "Codejock.CommandBars.v12.1.1.ocx" Não conheço esta DLL da flexdocs, entao pode ser que isto que eu te passei nao sirva para o que vc esta querendo. desculpe , até eu fiquei confuso agora !! RSS William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

segue abaixo o codigo da funcao Registerserver, inclua no final do seu codigo. para registrar : RegisterServer( "Codejock.CommandBars.v12.1.1.ocx" ) para desregistrar: UnRegisterServer( "Codejock.CommandBars.v12.1.1.ocx" ) Veja se funciona #pragma BEGINDUMP #include #include typedef LONG ( * PDLLREGISTERSERVER ) ( void ); HB_FUNC( REGISTERSERVER ) { HMODULE hDll = LoadLibrary( hb_parc( 1 ) ); LONG lReturn = 0; if( hDll ) { FARPROC pRegisterServer = GetProcAddress( hDll, "DllRegisterServer" ); if( pRegisterServer ) lReturn = ( ( PDLLREGISTERSERVER ) pRegisterServer )(); FreeLibrary( hDll ); } hb_retnl( lReturn ); } #pragma ENDDUMP HB_FUNC( UNREGISTERSERVER ) { LPSTR pName = ( LPSTR ) hb_parc( 1 ); LONG lReturn = 0; #ifndef UNICODE HMODULE hDll = LoadLibrary( pName ); #else LPWSTR pW = AnsiToWide( pName ); HMODULE hDll = LoadLibrary( pW ); hb_xfree( pW ); #endif if( hDll ) { #ifndef UNICODE FARPROC pUnregisterServer = ( FARPROC ) GetProcAddress( hDll, "DllUnregisterServer" ); #else FARPROC pUnregisterServer = ( FARPROC ) GetProcAddressW( hDll, ( LPCWSTR ) L"DllUnregisterServer" ); #endif if( pUnregisterServer ) lReturn = ( ( PDLLUNREGISTERSERVER ) pUnregisterServer )(); FreeLibrary( hDll ); } } id=code>id=code>"Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários." Editado por - william on 30/11/2011 16:05:15

rs... Kapi esta é para registrar . Se o seu FWH for superior a versao 9.04 ja existe uma funcao automatica: VEja: * Nuevo: Nuevas funciones RegisterServer( cServerName ) --> nResult y UnregisterServer( cServerName ) --> nResult, estas te permiten registrar y desregistrar ActiveXs y OCX servers. Por ejemplo: RegisterServer( "Codejock.CommandBars.v13.0.0.ocx" ) Abraço William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

assim ? cProgID := "LiveX_v8200" If !isActiveX( cProgID ) WinExec("regsvr32 livex_8200.ocx /s") SysRefresh() If !isActiveX( cProgID ) ? "nao foi possivel registrar a ocx " quit endif endif William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."

boa tarde, tá na mão : * aqui vc tem o codigo para recuperar inventario (xharbour): http://www.4shared.com/file/2bdr2hm0/ANVISA.html * aqui vc tem as outras rotinas (envio do xml, login, etc...) http://angeiras.blogspot.com/ Não testei mas deve funcionar ! Abraço William "Eu creio, que de algum modo, que seje relativo em demasia a subjetiva constitucional perante tecnicamente aos que assim ditam o descritivo em si, no parágrafo subconsequente do subconciente doutrinários."