AMSSpecialist

Buenas,
Me gustaría conseguir una cosa en Autoplay, pero no llego a hacerlo solo :(
Lo que quiero es que al pulsar en un CheckBox (por ejemplo), se añada automaticamente una línea en un determinado lugar de un archivo TXT.

Ej.
Archivo original:



$table_prefix  = 'wp_';



/**

 * Idioma de WordPress.

 *

 * Cambia lo siguiente para tener WordPress en tu idioma. El correspondiente archivo MO

 * del lenguaje elegido debe encontrarse en wp-content/languages.

 */

define ('WPLANG', 'es_ES');

define('WP_POST_REVISIONS', 3);



/* No edites desde aquí */



/** WordPress absolute path to the Wordpress directory. */

if ( !defined('ABSPATH') )

	define('ABSPATH', dirname(__FILE__) . '/');

Archivo modificado:



$table_prefix  = 'wp_';



/**

 * Idioma de WordPress.

 *

 * Cambia lo siguiente para tener WordPress en tu idioma. El correspondiente archivo MO

 * del lenguaje elegido debe encontrarse en wp-content/languages.

 */

define ('WPLANG', 'es_ES');

define('WP_ALLOW_MULTISITE',false);

define('WP_POST_REVISIONS', 3);



/* No edites desde aquí */



/** WordPress absolute path to the Wordpress directory. */

if ( !defined('ABSPATH') )

	define('ABSPATH', dirname(__FILE__) . '/');

¿Hay alguna forma de hacerlo?

Gracias!

claro que se puede , mediante string.gsub

str=[[$table_prefix  = 'wp_';

/**
 * Idioma de WordPress.
 *
 * Cambia lo siguiente para tener WordPress en tu idioma. El correspondiente archivo MO
 * del lenguaje elegido debe encontrarse en wp-content/languages.
 */
define ('WPLANG', 'es_ES');
define('WP_POST_REVISIONS', 3);

/* No edites desde aquí */

/** WordPress absolute path to the Wordpress directory. */
if ( !defined('ABSPATH') )
        define('ABSPATH', dirname(__FILE__) . '/');]];
        
str = str:gsub("(define%s%('WPLANG',%s'es_ES'%);)",function(a) return a.."\r\ndefine('WP_ALLOW_MULTISITE',false);" end);
Debug.ShowWindow(true)
Debug.Print(str);

prueva esto...
y si quieres eliminar la lista usa string.replace

For example, to write to the fourth line in the TextFile

Where tx = " your text "

tb = TextFile.ReadToTable("AutoPlay\\Docs\\abood.txt");
new={tb[1] , tb[2] , tb[3] , tx , tb[5] , tb[6]};
TextFile.WriteFromTable("AutoPlay\\Docs\\abood.txt", new, false);

[/color][/b]

abood1987 escribió:For example, to write to the fourth line in the TextFile

Where tx = " your text "
tb = TextFile.ReadToTable("AutoPlay\\Docs\\abood.txt");
new={tb[1] , tb[2] , tb[3] , tx , tb[5] , tb[6]};
TextFile.WriteFromTable("AutoPlay\\Docs\\abood.txt", new, false);
[/color][/b]

Esta bien , pero el problema es que tienes que tener el control y numero de lineas , pero esto puede variar según vayas editando y entonces... ;P

Publicado: **26 Sep 2013 17:15**

rafaxplayer escribió:
abood1987 escribió:For example, to write to the fourth line in the TextFile

Where tx = " your text "
tb = TextFile.ReadToTable("AutoPlay\\Docs\\abood.txt");
new={tb[1] , tb[2] , tb[3] , tx , tb[5] , tb[6]};
TextFile.WriteFromTable("AutoPlay\\Docs\\abood.txt", new, false);
[/color][/b]
Esta bien , pero el problema es que tienes que tener el control y numero de lineas , pero esto puede variar según vayas editando y entonces... ;P

¿Y se puede hacer para que escriba una linea justo al final del texto/archivo, independientemente de cual sea?

Publicado: **26 Sep 2013 19:20**

text append , haz una cosa usa textfileread to string concatena la linea con \r\n y vuelves a editar con textfilewritefromstring.

AMSSpecialist

Añadir linea en archivo TXT desde AMS

Añadir linea en archivo TXT desde AMS

Re: Añadir linea en archivo TXT desde AMS

Re: Añadir linea en archivo TXT desde AMS

Re: Añadir linea en archivo TXT desde AMS

Re: Añadir linea en archivo TXT desde AMS