Re: [Internauta] canvi format txt
En/na [EMAIL PROTECTED] ha escrit: Guaita, aquestos son el començament i primera part dels arxius. Primer l'original : Be, tot i que he vist que ja ho tens respost, m'he pres la llibertat de fer-ho amb Basic, suposo que no et sera masa dificil entendre com funciona La idea es que si tens tots els fitxers a un directori, puguis llegir-los tots d'una vegada, per aixo pots definir el directori de treball, i el tipo de fitxer. Soc conscient de que es una mica cutre, sobretot pel fet de fer un SHELL i marranades per l'estil, pero funciona, que es l'important. No obstant, esta obert a millores per part de qualsevol dels llistaires, eh? ;) -- Jordi DECLARE FUNCTION t$ (cadena AS STRING) DECLARE FUNCTION just$ (cadena AS STRING, llocs AS INTEGER, caracter AS STRING) CONST cami = C:\temp\ 'directori de treball CONST resum = resum 'nom del fitxer de sortida CONST llegir = *.txt 'fitxers que es llegiran CONST temp = txt.tmp DIM linia AS STRING DIM cadena AS STRING DIM a AS STRING DIM c(8) AS STRING c(1) = N030787000302590632084083211506305250420003051904200030527043051304200030119030 c(2) = VN030787 cadena = dir + cami + llegir + /b + cami + temp SHELL cadena OPEN cami + resum FOR OUTPUT AS #1 OPEN cami + temp FOR INPUT AS #2 PRINT #1, c(1) WHILE NOT EOF(2) INPUT #2, linia OPEN cami + linia FOR INPUT AS #3 WHILE NOT EOF(3) LINE INPUT #3, a c(3) = MID$(a, 1, 3) c(4) = MID$(a, 4, 8) c(5) = MID$(a, 12, 3): c(5) = just(c(5), 4, 0) c(6) = MID$(a, 15, 3): c(6) = just(c(6), 4, 0) c(7) = MID$(a, 18, 3): c(7) = just(c(7), 4, 0) c(8) = MID$(a, 21, 4): c(8) = just(c(8), 4, 0) c(0) = c(2) + SPACE$(3) + c(3) + c(4) + c(5) + STRING$(6, 0) c(0) = c(0) + c(7) + c(8) + c(6) PRINT #1, c(0) WEND CLOSE #3 WEND CLOSE KILL cami + temp FUNCTION just$ (cadena AS STRING, llocs AS INTEGER, caracter AS STRING) cadena = RTRIM$(LTRIM$(cadena)) cadena = STRING$(llocs - LEN(cadena), caracter) + cadena just$ = cadena END FUNCTION ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
Re: [Internauta] canvi format txt
Guaita, aquestos son el començament i primera part dels arxius. Primer l'original : 9920040205214483375 279 13920040205357429325 165 14720040205382354313 92 151200402053703352872687 161200402053943223201118 16720040205264404344 256 17220040205236414381 704 on les 3 primeres columnes identifiquen un animal, les 8 seguents la data, les 3 seguents columna A, les 3 seguents col. B, les 3 seguents C, i les 4 ultimes D. El nº total de files varia d'arxiu a arxiu, pero volta el centenar. Aquest arxiu, un cop modificat, hauria de quedar així : N03078700030259063208408321150630525042000305190420003052704 3051304200030119030 VN030787 9920040205021400037502790483 VN030787 13920040205035700032501650429 VN030787 14720040205038200031300920354 VN030787 1512004020503728726870335 VN030787 16120040205039400032011180322 VN030787 16720040205026400034402560404 VN030787 17220040205023600038107040414 No se si ho veureu bé. La primera linea s'ha de posar en tots els cassos. Despres cada linia comença també en tots els cassos amb VN030787. Segueixen 3 espais, identificacio de l'animal, 8 columnes per la data,4 columnes per A, insertar-hi sis zeros, 4 columnes per C, 4 columnes per D i 4 columnes per B. He provat l'ultraedit, fent una macro. Hi he estat poca estona, i avanço força, pero no m'aclareixo com fer per en una columna com la D, on els valors poden tenir 3 o 4 xifres, les macros no ho tenen en compte, o com a mínim no se com fer que ho tinguin en compte Potser abuso ! De totes maneres gràcies Ton Perque no envies un exemple dels canvis que tens que fer? -- Jordi ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
Re: RE: [Internauta] canvi format txt
L'estic fent servir i crec que funcionarà. De totes maneres estic encallat en un punt i potser em podeu donar un cop de ma. A les darreres 4 columnes, les xifres poden ser de 2 , 3 o 4 xifres, i en un format hi ha espais, i el que m'interessa és posar-hi zeros. El que faig al fer la macro és seleccionar tota la columna ( que per cert no se si ja faig malament aixo, ho faig seleccionant amb el shift i uns quants pgdn per arribar sempre al final de la columna- no he trobat altra manera de seleccionar una columna sencera ! )i llavors un find i un replace selecttext. Si ho faig manualment funciona, pero si ho copio a la macro no pita. Em diu cadena de busqueda no encontrada . Que faig malament ? Ton - Mensaje Original - De: Esteve Montaner [EMAIL PROTECTED] Fecha: Lunes, Octubre 4, 2004 8:39 pm Asunto: RE: [Internauta] canvi format txt Hola a tots, Perquè no proves l'editor de text UltraEdit-32, és per a programadors i a més de tenir tot el que tenen de bo els bons editors de text, pots seleccionar columnes i separar o copiar al notepad o on vulguis, és Free i está en http://www.ultraedit.com/, tb pots seleccionar i fer que sigui hexadecimal, en fi te moltes utilitats. Salut. Esteve -Mensaje original- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED] Enviado el: lunes, 04 de octubre de 2004 17:56 Para: [EMAIL PROTECTED] Asunto: [Internauta] canvi format txt Necessito fer un canvi de format a uns arxius que rebo mensualment en format txt. Son petits i duen informacio organitzada en fileres i columnes. El problema es que en rebo bastants i fer-ho a ma em pren massa temps. PEnsava fer-me algun programet amb C o C++ , per automatitzar-ho, pero tot i que ja m'agradaria, no sé programar ( em vaig quedar al Basic, i alguna noció del C amb el DevC++ ). De fet em fa ilusio provar-ho jo mateix, pero no se ni per on començar. Us agrairia qualsevol consell, o fins i tot si em dieu que millor ho deixi estar i ho possi en mans d'un programador... Gràcies Ton PS . Potser importarlo a excel i fer un macro ?? un altra bestiesa :-)? ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
RE: [Internauta] canvi format txt
mmm aquesta pregunta és un pèl massa oberta però ho intentarem: Amb C/C++ hauras d'investigar l'objecte que te permet llegir i gravar arxius, crec que es deia FileSystem, File o algo així... Amb un bucle tipus while (controles el fi de fitxer amb EOF), vas col·locant les dades en una taula. la organització depèn del que representen les teves dades és clar... Ara et tocarà fer la transformació de dades que necessitis, evidentment pot ser tant senzill o complicat com tu vulguis... i per exemple ho vas passant a una altre taula. llavors amb un altre bucle vas desant això a un altre fitxer. Espero haver-te pogut ajudar, ja fa temps que no toco el C, jo per a coses d'aquestes ara utilitzaria Java segurament, però si mai has treballat amb POO potser necessitaries un temps per entrar-hi. Salut! __ PolNetwork.com Pol Maresma i Oliveras [EMAIL PROTECTED] - [EMAIL PROTECTED] Creació, manteniment i allotjament de pàgines Web __ PRIVAT I CONFIDENCIAL - Aquest missatge i els document adjunts que pugui contenir són confidencials. Si no sou el destinatari del missatge no teniu permís per llegir-lo, copiar-lo ni reenviar-lo. Si heu rebut aquest missatge per error, siusplau comuniqueu-ho al remitent retornant el missatge i esborreu les còpies del missatge i els seus documents adjunts. Aquest avís no pot ser eliminat. PRIVATE CONFIDENTIAL - This email message and attachments contain information that is confidential. If you are not the intended recipient, you are not permitted to use, copy or distribute the message and attachments in any manner. If you have received this email in error, please inform the sender by return email immediately and delete all copies of the message and its attachments. This notice should not be removed. __ -Mensaje original- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] nombre de [EMAIL PROTECTED] Enviado el: dilluns, 4 / octubre / 2004 17:56 Para: [EMAIL PROTECTED] Asunto: [Internauta] canvi format txt Necessito fer un canvi de format a uns arxius que rebo mensualment en format txt. Son petits i duen informacio organitzada en fileres i columnes. El problema es que en rebo bastants i fer-ho a ma em pren massa temps. PEnsava fer-me algun programet amb C o C++ , per automatitzar-ho, pero tot i que ja m'agradaria, no sé programar ( em vaig quedar al Basic, i alguna noció del C amb el DevC++ ). De fet em fa ilusio provar-ho jo mateix, pero no se ni per on començar. Us agrairia qualsevol consell, o fins i tot si em dieu que millor ho deixi estar i ho possi en mans d'un programador... Gràcies Ton PS . Potser importarlo a excel i fer un macro ?? un altra bestiesa :-)? ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
RE: [Internauta] canvi format txt
Hola a tots, Perquè no proves l'editor de text UltraEdit-32, és per a programadors i a més de tenir tot el que tenen de bo els bons editors de text, pots seleccionar columnes i separar o copiar al notepad o on vulguis, és Free i está en http://www.ultraedit.com/, tb pots seleccionar i fer que sigui hexadecimal, en fi te moltes utilitats. Salut. Esteve -Mensaje original- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED] Enviado el: lunes, 04 de octubre de 2004 17:56 Para: [EMAIL PROTECTED] Asunto: [Internauta] canvi format txt Necessito fer un canvi de format a uns arxius que rebo mensualment en format txt. Son petits i duen informacio organitzada en fileres i columnes. El problema es que en rebo bastants i fer-ho a ma em pren massa temps. PEnsava fer-me algun programet amb C o C++ , per automatitzar-ho, pero tot i que ja m'agradaria, no sé programar ( em vaig quedar al Basic, i alguna noció del C amb el DevC++ ). De fet em fa ilusio provar-ho jo mateix, pero no se ni per on començar. Us agrairia qualsevol consell, o fins i tot si em dieu que millor ho deixi estar i ho possi en mans d'un programador... Gràcies Ton PS . Potser importarlo a excel i fer un macro ?? un altra bestiesa :-)? ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
Re: [Internauta] canvi format txt
En/na [EMAIL PROTECTED] ha escrit: Necessito fer un canvi de format a uns arxius que rebo mensualment en format txt. Perque no envies un exemple dels canvis que tens que fer? -- Jordi ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta
Re: RE: [Internauta] canvi format txt
Es poden automatitzar les accions ? Ton - Mensaje Original - De: Esteve Montaner [EMAIL PROTECTED] Fecha: Lunes, Octubre 4, 2004 8:39 pm Asunto: RE: [Internauta] canvi format txt Hola a tots, Perquè no proves l'editor de text UltraEdit-32, és per a programadors i a més de tenir tot el que tenen de bo els bons editors de text, pots seleccionar columnes i separar o copiar al notepad o on vulguis, és Free i está en http://www.ultraedit.com/, tb pots seleccionar i fer que sigui hexadecimal, en fi te moltes utilitats. Salut. Esteve -Mensaje original- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED] Enviado el: lunes, 04 de octubre de 2004 17:56 Para: [EMAIL PROTECTED] Asunto: [Internauta] canvi format txt Necessito fer un canvi de format a uns arxius que rebo mensualment en format txt. Son petits i duen informacio organitzada en fileres i columnes. El problema es que en rebo bastants i fer-ho a ma em pren massa temps. PEnsava fer-me algun programet amb C o C++ , per automatitzar-ho, pero tot i que ja m'agradaria, no sé programar ( em vaig quedar al Basic, i alguna noció del C amb el DevC++ ). De fet em fa ilusio provar-ho jo mateix, pero no se ni per on començar. Us agrairia qualsevol consell, o fins i tot si em dieu que millor ho deixi estar i ho possi en mans d'un programador... Gràcies Ton PS . Potser importarlo a excel i fer un macro ?? un altra bestiesa :-)? ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta ___ llista de correu de l'Internauta [EMAIL PROTECTED] http://zeus.internauta.net/mailman/listinfo/internauta