Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Eleкtro

#9971
Scripting / Re: [Perl] FindIcons 0.1
25 Noviembre 2012, 23:44 PM
Hola Doddy, buenisimo code

¿Sabes si hay alguna palabra clave para encontrar TODOS los resultados de la web?, Es decir, para bajar la página ENTERA.

He probado con el asterisco "*" pero dice que la palabra es muy corta jeje, lo mismo si pongo "a", "b", etc...

EDITO: Bueno casi que para bajarla entera mejor sería usar algún "WebDownloader:xD

Gracias por el code!
#9972
Gracias Keyen,
La verdad es que el comando attrib es solo es el ejemplo con el que estoy practicando para darle uso a esta función más tarde, porque lo que si necesitaré usar son utilidades de terceros como "Mediainfo.exe" y quiero mostrar el output de ese programa en cuestión.

Ya lo he solucionado usando "appendText":

Código (vbnet) [Seleccionar]
   Private Function attrib() As Boolean
       consolebox.AppendText(vbNewLine + "[+] Deleting the attributes of the files..." + vbNewLine + vbNewLine)
       Dim attrib_process As New Process()
       Dim attrib_startinfo As New ProcessStartInfo()
       Dim attrib_args As String = videofolder
       attrib_startinfo.FileName = "cmd.exe "
       attrib_startinfo.UseShellExecute = False
       attrib_startinfo.CreateNoWindow = True
       attrib_startinfo.Arguments = "/C dir /B /AD C:\"
       attrib_startinfo.RedirectStandardOutput = True
       attrib_process.EnableRaisingEvents = True
       attrib_process.StartInfo = attrib_startinfo
       attrib_process.Start()
       Dim readerStdOut As IO.StreamReader = attrib_process.StandardOutput
       Do While readerStdOut.EndOfStream = False
           consolebox.AppendText(readerStdOut.ReadLine() + vbNewLine)
           consolebox.SelectionStart = consolebox.Text.Length
           consolebox.ScrollToCaret()
       Loop
       consolebox.AppendText(vbNewLine + "[OK] attributes deleted!" + vbNewLine + vbNewLine)
   End Function


Saludos
#9973
Scripting / Re: NECESITO AYUDA URGENTE CON SCRIPTS
25 Noviembre 2012, 21:54 PM
Si las carpetas tienen MUCHOS archivos y/o pesan demasiado creo que te convendría más comprimir cada carpeta en un solo archivo por carpeta, aquí tienes una manera de hacerlo:

[BATCH] Script para backups incrementales
#9974
Scripting / Re: bath inicio
25 Noviembre 2012, 21:50 PM
No podemos adivinarlo, pero tampoco tiene importancia porque la clave que estás trasteando no está relacionada con lo que intentas hacer en este post: http://foro.elhacker.net/scripting/cambiar_pagina_inicio_con_bath-t376847.0.html;msg1804148#msg1804148

Saludos!
#9975
Hola,

Tengo una pregunta antes de la verdadera pregunta xD

¿Que control es el más adecuado para mostrar el output de la CMD?  (Estoy usando un richtextbox)

Y bueno, el problema es que no consigo que el texto cambie antes d emostrar el output:
Código (vbnet) [Seleccionar]
Me.consolebox.Text = "Deleting the attributes of the files..."

Todo lo demás funciona bien, pero no consigo mostrar ese string, se queda el richtextbox vacío hasta que finaliza el búcle...

Código (vbnet) [Seleccionar]
  Private Function attrib() As Boolean
       Me.consolebox.Text = "Deleting the attributes of the files..."
       Dim attrib_process As New Process()
       Dim attrib_startinfo As New ProcessStartInfo()
       Dim attrib_args As String = videofolder
       attrib_startinfo.FileName = "cmd.exe "
       attrib_startinfo.UseShellExecute = False
       attrib_startinfo.CreateNoWindow = True
       attrib_startinfo.Arguments = "/C PUSHD " & ControlChars.Quote & videofolder & ControlChars.Quote & " & Attrib -A -R -S -H -I /S *.* & attrib +H /S *.ico >nul & attrib +H -R /S *.ini >nul"
       attrib_startinfo.RedirectStandardOutput = True
       attrib_process.EnableRaisingEvents = True
       attrib_process.StartInfo = attrib_startinfo
       attrib_process.Start()
       Dim readerStdOut As IO.StreamReader = attrib_process.StandardOutput
       Do While readerStdOut.EndOfStream = False
           output = output + readerStdOut.ReadLine()
       Loop
       Me.consolebox.Text = "This is the result of the command:" + output
   End Function


¿Y si necesito usar un comando de múltiples líneas como le hago?

por ejemplo:
Código (vbnet) [Seleccionar]
attrib_startinfo.Arguments = "/C
Echo linea 1 &
(Echo linea2
Echo linea 3)
"
#9977
Yo usé VS2010, ahora uso VS2012, y puedo asegurar que su interfaz ayuda mucho más a los que estamos aprendiendo, además, me gusta mucho, puedes cambiar el theme por defecto a uno más oscuro para relajar la vista y optimizar tu lugar de trabajo/aprendizaje, y además va muy a juego con el nuevo estilismo de microsoft (Windows 8), sin duda es una IDE exageradamente buena! Y BONITA (Aunque digan lo contrario).

Cita de: Keyen Night en 24 Noviembre 2012, 22:20 PMLa herramienta que busca posibles optimizaciones para el código
¿Donde encuentro esa opción?

Saludos.
#9978
Creo que lo que quieres hacer es esto:



Código (dos) [Seleccionar]
@Echo OFF

Set "DETECTOR="
Set /P "VAR=Escribe algo >>"

:: Comprobamos si se trata de un número
Echo "%VAR%"|FINDSTR "^\"[0-9]*\"$" >NUL && Set "DETECTOR=Numero"

:: Comprobamos si se trata de una letra
Echo "%VAR%"|FINDSTR /I "^\"[A-Z]\"$" >NUL && Set "DETECTOR=Letra"

:: Si las comprobaciones anteriores han fallado entonces es una palabra...
IF NOT DEFINED DETECTOR (Set "DETECTOR=Palabra")

Echo La variable es un %DETECTOR%
Echo ^<span^>^<div class="%detector%"^>%Var%^</div^>Izquierdar^</span^>

Pause&Exit
#9979
MOD: Perdón, tuve un error, juraría que posteé esto en dudas generales, si me lo pudieran mover allá...





Hola,

Como navegador uso Firefox

Y actualmente yo no uso seamonkey, uso una extensión que se llama "customizeyourweb" https://addons.mozilla.org/en-us/firefox/addon/customize-your-web/

Me gustaría saber si en este tipo de extensiones parecidas al seamonkey hay alguna forma de desmarcar una casilla en una página web que siempre aparece la casilla marcada.

Gracias.
#9980
Cita de: Seazoux en 25 Noviembre 2012, 00:51 AM
Oye elecktro, que pasa?

Siento no haber contestado, pero lo que pasa es que no se entiende nada, aparte de eso, podrías usar saltos de líneas en el párrafo para tomar un respiro al leer :xD


A ver, por un lado tienes esta linea en el html:
<span><div class="tecla"></div>Izquierdar</span>


Ahora intenta darme un ejemplo de tus intenciones con el bat, algo que se parezca a esto:

Código (DOS) [Seleccionar]

@Echo OFF
Set "VAR=La variable vacía"

Set /P "VAR=Escribe algo>>"

REM El usuario introduce por ejemplo la tecla "A", bien, el valor de la variable "VAR" será "A", pero ¿Que se supone que quieres que contenga la variable "VAR" en ese caso? Es decir, "A" lo cambiamos por...¿?


A todo esto, una pregunta... Estás intentando que la CMD reconozca una tecla del keyboard sin que presiones "ENTER"? porque en ese caso no puedes esperar un evento de teclado usando Batch.

Saludos