Crear, escribir y leer archivo de texto (.txt) con PHP

A continuación un script de PHP que crea un fichero de texto y otro que lo lee. Esto es útil cuando necesitamos guardar datos simples de algún formulario y no queremos hacer ni configurar ninguna base de datos MySQL.

1. Script PHP que crea un archivo de texto (*.txt):

$arch = fopen("archivo.txt", "w");              //abre archivo.txt modo w (write)
fwrite($arch, "Texto de ejemplo 1" . PHP_EOL);  //escribe la línea
fwrite($arch, "Otra línea extra" . PHP_EOL);    //escribe una segunda línea
fclose($arch);                                  //cerramos archivo.txt

¡Ojo! El modo fopen("archivo.txt","w") elimina el contenido que tenía anteriormente y lo sustituye por el nuevo. Si lo que queremos es añadir texto nuevo al contenido hay que abrir en modo "a", es decir, fopen("archivo.txt","a"). De esa manera el archivo será un archivo que se abre, se añade contenido nuevo, y se cierra.


2. Script PHP que lee de un archivo de texto.

$arch = fopen("archivo.txt", "r");  //abre archivo.txt
while(!feof($arch)) {               //saca todas las lineas 
echo fgets($arch);        
}
fclose($arch);                      //cierra archivo.txt                           

Evidentemente, podemos hacer un formulario con HTML y registrar los datos en fichero de texto. Recogemos con variables PHP del formulario y después lo introducimos en el fichero de texto.

¡Ánimo, hay que tener un poco de imaginación, que no nos lo van a dar todo cocinado!

Un saludo.

Crear script con Visual Basic para abrir lector de CD

En ocasiones el pequeño botón que sirve para abrir el lector de CD/DVD de nuestro ordenador deja de funcionar, puede ser que para siempre o puede ser que en ciertas sesiones. Como método para aguantar un tiempo mas sin tener que cambiar el lector entero podemos hacer el siguiente script con Visual Basic, e cual guardaremos con extensión de archivo .vbs habiéndolo editado con el Bloc de notas o Notepad++ o cualquier otro editor:

Set oWMP = CreateObject("WMPlayer.OCX.7" ) 
Set colCDROMs = oWMP.cdromCollection 
colCDROMs.Item(i).Eject 

Sin nos ponemos tiquismiquis, guardamos el archivo en una carpeta cualquiera y desde el escritorio creamos un acceso directo, al cual luego en Propiedades > Cambiar icono le ponemos un icono mas apropiado.

Un salud.