sig_gilberto

luisão, igual a este arquivo TXT eu tenho outros 6000... ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Luisão... Não é o DBF que tem que ter mais de 8 caracteres e sim o arquivo TXT que tem mais de 8 caracteres, exemplo : USE BANCO.DBF APPEND FROM "ACSP_06112009_LOTE14526.TXT" SDF Entendeu, o meu problema é fazer o APPEND FROM enxergar o arquivo TXT. ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Certo Luisão, valeu pelo retorno. Só me dá uma luz ..... Como dar dar APPEND FROM de um arquivo TXT com o nome maior que 08 caracteres num DBF, conform exemplo abaixo : Procedure CriaMar ArqEnt = "ACSP_12514RETORNO_06112009.TXT" Mtz:={} AAdd(Mtz ,{"Mar_L01","C",0004,0}) AAdd(Mtz ,{"Mar_CIF","C",0034,0}) AAdd(Mtz ,{"Mar_Lin","C",1000,0}) DBCreate("TB_MAR.DBF",Mtz) Use Tb_Mar Alias Tb_Mar New Append From &ArqEnt SDF && AQUI! Olha o Tamanho do nome do arquivo que está em ARQENT ! Go Top Return Nil ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 06/11/2009 13:21:09

Olá Desenvolvedores, Boa Tarde! Caso possam me ajudar, a idéia é a seguinte : 1º Carregar para uma Array, todos os arquivos de um determinado diretório/pasta. 2º Ler cada item da Array que são os nomes dos arquivos e dar Append num DBF Geral que conterá todos os registros/linhas de dados de cada arquivo. * Todos os arquivos com extensão .DEV na verdade são TXT/ASCII e todos têm o mesmo LayOut/Formato. * A idéia e carregar todos neste DBF Grande para realização de posterior pesquisa. O problema é com os arquivo que têm o nome extenso, ou seja, com mais de 08(oito) caracteres... O que fazer neste caso, quando o Append/SDF dá erro ? **--------------------------------------------------- * Cria DBF do Arquivo de Mídia obtida da Marpress Procedure CriaMar MsgRun("Carregando Pasta com Mídias..","Aguarde..",CarregaPasta("c:\teste\*.DEV")) Mtz:={} AAdd(Mtz ,{"Mar_L01","C",0004,0}) AAdd(Mtz ,{"Mar_CIF","C",0034,0}) AAdd(Mtz ,{"Mar_Lin","C",1000,0}) DBCreate("TB_MAR.DBF",Mtz) Use Tb_Mar Alias Tb_Mar New Zap For x = 1 to Len(vLista_Arq) If vLista_Arq[x]="FIM" Exit Endif Append From &vLista_Arq[x] SDF Next Append From ArqMar SDF Go Top Index On Mar_CIF To Tb_Mar Go top Return Nil ******************************************************************************** Procedure CarregaPasta parameters b_m local afiles:=DIRECTORY(b_m), anames:={} r=len(alltrim(B_m)) Aeval(afiles,{|file|aadd(anames,file[F_NAME])}) Aadd(anames,"FIM") Public vLista_Arq:={} vr=0 Do While .T. vr++ If anames[vr]="FIM" Exit Endif Aadd(vLista_Arq,anames[vr]) Enddo If Empty(vLista_Arq) MsgStop("Arquivo(s) Não Encontrado(s)","ERRO:Pasta da Mídia Marpress") Close Data Quit EndIf ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."id=red>id='Arial Black'> Editado por - sig_gilberto on 06/11/2009 12:34:20id=teal> Editado por - sig_gilberto on 06/11/2009 12:35:06

Olá Desenvolvedores, Boa Tarde! Caso possam me ajudar, a idéia é a seguinte : 1º Carregar para uma Array, todos os arquivos de um determinado diretório/pasta. 2º Ler cada item da Array que são os nomes dos arquivos e dar Append num DBF Geral que conterá todos os registros/linhas de dados de cada arquivo. * Todos os arquivos com extensão .DEV na verdade são TXT/ASCII e todos têm o mesmo LayOut/Formato. * A idéia e carregar todos neste DBF Grande para realização de posterior pesquisa. O problema é com os arquivo que têm o nome extenso, ou seja, com mais de 08(oito) caracteres... O que fazer neste caso, quando o Append/SDF dá erro ? **--------------------------------------------------- * Cria DBF do Arquivo de Mídia obtida da Marpress Procedure CriaMar MsgRun("Carregando Pasta com Mídias..","Aguarde..",CarregaPasta("c:\teste\*.DEV")) Mtz:={} AAdd(Mtz ,{"Mar_L01","C",0004,0}) AAdd(Mtz ,{"Mar_CIF","C",0034,0}) AAdd(Mtz ,{"Mar_Lin","C",1000,0}) DBCreate("TB_MAR.DBF",Mtz) Use Tb_Mar Alias Tb_Mar New Zap For x = 1 to Len(vLista_Arq) If vLista_Arq[x]="FIM" Exit Endif Append From &vLista_Arq[x] SDF Next Append From ArqMar SDF Go Top Index On Mar_CIF To Tb_Mar Go top Return Nil ******************************************************************************** Procedure CarregaPasta parameters b_m local afiles:=DIRECTORY(b_m), anames:={} r=len(alltrim(B_m)) Aeval(afiles,{|file|aadd(anames,file[F_NAME])}) Aadd(anames,"FIM") Public vLista_Arq:={} vr=0 Do While .T. vr++ If anames[vr]="FIM" Exit Endif Aadd(vLista_Arq,anames[vr]) Enddo If Empty(vLista_Arq) MsgStop("Arquivo(s) Não Encontrado(s)","ERRO:Pasta da Mídia Marpress") Close Data Quit EndIf ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."id=red>id='Arial Black'> Editado por - sig_gilberto on 06/11/2009 12:34:20id=teal> Editado por - sig_gilberto on 06/11/2009 12:35:06

Ico, então vc é sortudo mesmo!!! Até hoje, ainda nem vi a cara do meu pedido e tão pouco retorno de alguém desta empresa! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Bom Dia! Como já usei muito o Set Device To Printer/Screen, se posso lhe dar um conselho, use FWRITE. É mais seguro e mais rápido! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

"foi deposito!" ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Kabi...te juro que se eu conseguir receber o DVD com o curso que comprei (o que duvido!) ou mesmo o meus R$ VINTÃO de volta (o que eu duvido mais ainda!)...eu compro pra vc este curso de Hacker ....kkkkkkkkkkkkkkkkkkkkkkkk...... Aliás...tem alguém ai que já tenha feito negócio com esta empresa ou mesmo conheça ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 29/10/2009 07:44:22

ICO, bom dia! Estava meio fora do AR nestes dias que se passaram mas, o site é www.acessomedia.com Comprei um curso de C# em CD/DVD e vc acredita que até agora não recebi nada......SOU UM IDIOTA MESMO NÉ !!! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Boa Tarde! Alguém já comprou algo via NET da empresa WWW.ACESSOMEDIA.COM que segundo seu site fica no Rio de Janeiro e que os telefônes não atendem e também ninguém retorna email´s ? Se tem alguém ai que conheça, por favor, me socorram !!!! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 28/10/2009 11:03:19

Olá Desenvolvedores, Boa Tarde! Alguém já comprou algo via NET da empresa WWW.ACESSOMEDIA.COM que segundo seu site fica no Rio de Janeiro e que os telefônes não atendem e também ninguém retorna email´s ? Se tem alguém ai que conheça, por favor, me socorram !!!! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 28/10/2009 11:03:19

OK...Valeu!!!! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Eu não entendi a pergunta ? citação:Galera, explica ahi: O VISUAL FIVEWIN É PAGO, OU GRÃTIS??? Abraços. João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Qual a opnião de vocês em relação ao WampServer ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Certo.... Eu vi que aki no forum tem instruções para baixar o MySQL ! Mas e pro VISTA ? TEM ? Dai depois de baixado, eu posso instalar numa maquina sem NET ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 08/10/2009 10:55:00

Certo menino..... Agora...onde acho um "bão" manual, por exemplo, da SQLLIB ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Bom Dia! Didaticamente, o que preciso para iniciar com banco de dados relacional (SQL) ? O Que baixar ? Onde Baixar ? Dá pra instalar/rodar numa maquina sem ter conexão coma NET ? Vou conseguir trabalhar em modo console ? Quem puder me dar umas dicas...agradeço! Abraços a Todos! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Bom Dia! Didaticamente, o que preciso para iniciar com banco de dados relacional (SQL) ? O Que baixar ? Onde Baixar ? Dá pra instalar/rodar numa maquina sem ter conexão coma NET ? Vou conseguir trabalhar em modo console ? Quem puder me dar umas dicas...agradeço! Abraços a Todos! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP C# / xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Boa Tarde! Já que o Local/Data/Horario/R$ já estão confirmados 100%,quanto ao Valor de R$30,00 a quem devo pagar e como ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...." Editado por - sig_gilberto on 05/10/2009 15:32:45

Certo........ Estou fazendo alguns teste aki...WS/PELLES/....mas gostaria de saber qual seria hoje a melhor IDE para FWH ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Bom Dia! Aproveitando o assunto, alguém por ai usa uma IDE chamada Visual xHarbour ? http://www.xharbour.com/ ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Funcionou legal!!! Vlw... Só mais uma coisa..alguém ai tem uma boa dica de onde encontrar BitMaps de Logos Bancários (BMP) ? Porque JPEG ou outros ele não aceita no combobox, dai tem que ser no formato BMP! Alguém tem um daqueles links fantásticos ? ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Opa! Vou testar e te retorno! ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, Bom Dia! Há como colocar uma imagem num item do ComBoBox ? No caso abaixo, exibir o Logo do Banco + Texto como Nome do Banco ou mesmo somente o Logo para o usuário selecionar ? Exemplo : Imagem+Texto ou Texto+Imagem ? @ 06.0,21.5 SAY oSay1 VAR "Banco" Of oDLg FONT oFont2 Size 100,40 COLOR RGB(050,150,000) @ 07.5,16.0 ComboBox oCodCar Var vCodCar Items {"REAL","ITAU"} Of oDlg FONT oFont2 Size 060,40 COLOR RGB(150,050,000) oCodCar:ctooltip="Selecione o Banco..." ________________________ Gilberto Herminio - Programador Pleno III - Mogi das Cruzes-SP JAVA + xxHB build 1.1.0 (SimpLex) & BCC 5.5.1 & FW 8.05 + xDev v0.65 "Não Desenvolvo Software, crio arte Binaria...."