Mensajes

Depende de como sea la chica.

Yo tengo una novia que le encantan los dulces, chocolates, etc.

¿Que regalarle a ella?
Una caja de chocolates, una bolsa con cerezas, un pie de queso y llevarla a un lugar.

Como te digo, depende de la chica, tampoco dices cuanto cumples con ella, cumplir meses no es algo muy significativo que digamos.

Yo diría que la llevaras a algún lugar, pasa el día con ella, invitala al cine, luego te la llevas a un cafe bar o a un mirador a ver el paisaje y charlar, también sería buen momento de darle unas rosas.

Una cena romántica dejala para cuando cumplas un año con ella, o sea su cumpleaños.

No creo que llevarla a una discoteca fuera lo más indicado, te arriesgas a que pasen infortunios con demás chicas ahí, además de que no es un lugar muy intimo que digamos.

¿Se supone que debemos reirnos, o qué?

Bastante completo, gracias por la información, en cuanto esté en Windows pruebo todo.

Aqui esta la solución:

Código (dos) [Seleccionar] Expandir

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1 delims=[]" %%_ in ('type "file.txt" ^| find /i /n "45646#"') do set "coincidencia=%%_"
if not defined coincidencia (
echo.No se encontro ninguna coincidencia "45646#"
goto:eof
)
:: Meter lineas de archivo.
set /a "contador=0"
for /f "eol= tokens=* delims=" %%x in (file.txt) do (
set /a "contador+=1"
set linea!contador!=%%x
)
for /l %%: in (%coincidencia%, 1, %contador%) do (
if "!linea%%:!"=="#" (
set /a "coincidencia_final=%%:"
goto:break
)
)
:break
if not defined coincidencia_final (
echo.No se encontro ninguna coincidencia
goto:eof
)
echo.Archivo normal:
for /l %%: in (1,1, %contador%) do (echo %%: : !linea%%:!)
echo.
echo.
echo.Archivo modificado:
for /l %%: in (1,1, %contador%) do (
if %%: lss %coincidencia% (echo %%: : !linea%%:!)
if %%: gtr %coincidencia_final% (echo %%: !linea%%:!)
)
pause>nul
exit /b 0

Salida:

Código [Seleccionar] Expandir

C:\>code.bat
Archivo normal:
1 : 1234#
2 : blablabalbalb
3 : blablablabl
4 : balblabl
5 : #
6 : 456546#
7 : blablabalbalb
8 : blablablabl
9 : balblabl
10 : #
11 : 45646#
12 : blablabalbalb
13 : blablablabl
14 : balblabl
15 : #
16 : 46456#
17 : blablabalbalb
18 : blablablabl
19 : balblabl
20 : #


Archivo modificado:
1 : 1234#
2 : blablabalbalb
3 : blablablabl
4 : balblabl
5 : #
6 : 456546#
7 : blablabalbalb
8 : blablablabl
9 : balblabl
10 : #
16 46456#
17 blablabalbalb
18 blablablabl
19 balblabl
20 #

C:\>

Modifica el script a tu conveniencia.

Aquí está la solución en PERL:

Código (perl) [Seleccionar] Expandir

#!/usr/bin/perl
use strict;
use warnings;
$/ = '';
if(!@ARGV)
{
print "perl pl.pl \"archivo-a-editar\"\n";
exit(1);
}
while(<>)
{
        s/45646#.*?#\n//s;
        print;
}

Código [Seleccionar] Expandir

leo@lein:~/Escritorio$ perl pl.pl file.txt
1234#
blablabalbalb
blablablabl
balblabl
#
456546#
blablabalbalb
blablablabl
balblabl
#
46456#
blablabalbalb
blablablabl
balblabl
#
leo@lein:~/Escritorio$

Si se puede, usa el FOR:

Código (dos) [Seleccionar] Expandir

@echo off
:code
set /p "ruta=Ingrese aqui la ruta del archivo : "
if not defined ruta (goto:code)
for %%_ in ("%ruta%") do (set "mi_file= %%~nx_")
echo : %mi_file%
pause>nul
goto:eof

Para los colores usa el GeSHi del foro, y selecciona DOS.

Saludos.

Primera forma:

Código (dos) [Seleccionar] Expandir


@echo off
:code
set /p "ruta=Ingrese aqui la ruta del archivo : "
if not defined ruta (goto:code)
call:_view %ruta%
goto:eof
:_view
echo %~nx1
goto:eof

Salida:

Código [Seleccionar] Expandir


Ingrese aqui la ruta del archivo : c:\windows\system32\msg.exe
msg.exe

Segunda forma:

Código (dos) [Seleccionar] Expandir


@echo off
:code
set /p "ruta=Ingrese aqui la ruta del archivo : "
if not defined ruta (goto:code)
for %%_ in ("%ruta%") do (
echo %%~nx_
)
pause
goto:eof

El problema aqui es que de vez en cuando mostrará errores:

Código [Seleccionar] Expandir

leo@lein:~$ ls | gedit

(gedit:15573): Gtk-WARNING **: Attempting to read the recently used resources file at `/home/leo/.recently-used.xbel', but the parser failed: Ha ocurrido un error al leer el archivo «/home/leo/.recently-used.xbel»:·Es un directorio.

(gedit:15573): GLib-CRITICAL **: g_bookmark_file_get_size: assertion `bookmark != NULL' failed
sys:1: GtkWarning: Attempting to store changes into `/home/leo/.recently-used.xbel', but failed: Falló al renombrar el archivo «/home/leo/.recently-used.xbel.ZL97XU» a «/home/leo/.recently-used.xbel»:·g_rename()·falló:·Es un directorio
leo@lein:~$

Mejor crear un script que borre la línea que identifica al archivo.

Código (bash) [Seleccionar] Expandir


#!/usr/bin/bash
# Pequeño script para remover "Documentos recientes" en Ubuntu, a lo rapido.
cat "$HOME/.recently-used.xbel" | grep -vi "file:" > "temporal.txt"
mv "temporal.txt" "$HOME/.recently-used.xbel"
exit 0;
Saludos.

Claro, si lo posteas, pues sabemos que funciona, pero, imaginate que se hace un proyecto más grande y quieres compartir tu codigo con otro programador para que se mejore, imaginate con el codigo que se topará.

No puedo probarlo, estoy en Linux, pero, personalmente, no me gusta la estetica que le das al codigo, es decir, la indentación.

Concatenas demasiadas líneas con &, es preferible sacrificar el número de líneas a la "legibilidad".

Necesito hacer una secuencia de comandos con vbs que abra la ventana de dialogo de colores en windows xp. He tratado buscando información por internet y no hallado ninguna página hasta lo momentos que me pudiera ayudar.

¿Cual ventana de colores de Windows, a que te refieres con eso?

A ver, vamonos por partes, suponiendo que tengo los siguientes archivos (.txt) en el directorio "c:\prueba"

Código [Seleccionar] Expandir

C:\prueba>dir /b
1.txt
10.txt
11.txt
12.txt
13.txt
14.txt
15.txt
2.txt
3.txt
4.txt
5.txt
6.txt
7.txt
8.txt
9.txt

C:\prueba>

Quiero agregarle la palabra "pc1" al principio del nombre del archivo:

Código (dos) [Seleccionar] Expandir


@echo off
cd /d "%homedrive%\prueba"
:: "pc1" sera el nombre que sera agregado al principio del nombre de archivo.
for /f "tokens=*" %%_ in ('dir /b *.txt') do (
ren "%%_" "pc1%%_
)

Despues de ejecutar el codigo:

Código [Seleccionar] Expandir

C:\prueba>dir /b
pc11.txt
pc110.txt
pc111.txt
pc112.txt
pc113.txt
pc114.txt
pc115.txt
pc12.txt
pc13.txt
pc14.txt
pc15.txt
pc16.txt
pc17.txt
pc18.txt
pc19.txt
respaldo

C:\prueba>

Di si te funciona o no.

Saludos.