Mensajes

[Icono]

Hola,

El término correcto a lo que llamas "simbolito" es "Icono", existen miles de extensiones conocidas (.txt, .pdf, etc...) y otras miles no conocidas,
windows asigna un icono específico a las extensiones más conocidas y usadas en el propio SO, el resto no tienen icono a menos que tu le asignes manuálmente el icono o instales un programa para leer dichos archivos para asociarlos a la aplicación y que la aplicación le asigne un icono (esto último depende de como hayan programado la aplicación...)

Por ejemplo el archivo "sgen.pl" de la imagen es un archivo de Perl, para leerlo necesitas instalar el intérprete de Perl, y el instalador le asignará un icono a ese tipo de archivos ".pl"...

El archivo "changelog" y "dicnum13" no tienen extensión pero eso no significa que sean archivos "extraños", son archivos de texto plano, los puedes abrir con notepad.

con frecuencia me encuentro con formatos que no conozco. Salen en blanco

El icono blanco es el icono predeterminado (default file) para archivos desconocidos, no es nada por lo que preocuparse, símplemente ese tipo de archivos no tienen un icono asignado, pero como ya dije tu puedes asignar de forma manual cualquier icono a cualquier tipo de extensión de archivo, desde el registro de Windows, hay muchos tutoriales en Google...


PD: En la imagen tienes las extensiones escondidas para los archivos comunes (txt y exe), sincéramente yo odiaria navegar por mi equipo con las extensiones escondidas, si quieres activarlas puedes hacerlo desde el menú "opciones de carpeta", eso también está en Google...


Saludos!

[y por ello es mejor realizar un if anidado]

Aunque la primera evaluación sea falsa se hace la segunda evaluación y por ello es mejor realizar un if anidado.

En lugar de anidar podemos servirnos del resto de operadores del lenguaje (los que ya ha nombrado ABDERRAMAH),
solo es necesario leer la referencia de los operadores de VBNET para entender como funcionan y saber las expresiones que se evaluan y las que no...

-> Logical/Bitwise Operators (Visual Basic)

Saludos!

ups, perdon.

Te explico, por descomprimir me refiero a desempaquetar, si no sabes hacerlo manuálmente puedes dejar que el instalador lo haga por ti...

...En la VM, símplemente haz click para ejecutar el instalador, manten el instalador abierto pero no instales nada, dirígete al directorio "%TEMP%" y allí encontrarás la carpeta con los archivos que necesitas, el nombre exacto de la carpeta no te lo puedo especificar porque la carpeta se genera con un nombre único temporal, pero te di una pista creo que eran 181 archivos, y pesaban 30 MB en total, pues el contenido de esa carpeta es lo que te tienes que pasar a tu PC.

Si tienes complicaciones para encontrar los archivos desempaquetados del instalador puedes utilizar un monitor: http://www.moo0.com/?top=http://www.moo0.com/software/FileMonitor/

Saludos!

[Paint]

INSTRUCCIONES:

http://i.imgur.com/6QmPYd0.png
http://i.imgur.com/hvLAlsW.png

¿Descargarse una aplicación pesada (y encima de Microsoft) y realizar 4 pasos sólamente para redimensionar + imprimir?...

Lo más sencillo es hacerlo en Paint como ha dicho Simorg o Irfanview como ha dicho Songoku, o en cualquier otro visor de imágenes.

En Irfan:
paso 1: Pulsar "CTRL+R" y redimensionar a las dimensiones deseadas.
paso 2:  Pulsar "CTRL+P" para imprimir.

Saludos

Lo que necesito es crear un bat que me mueva de cada una de esas maquinas todas las grabaciones exceptuando siempre la ultima que es la que se esta generando hacia otras carpetas alojadas en un servidor.

No es necesario realizar ningún código de varias lineas, puedes mover todos los videos diréctamente con el comando "Move":

Código (dos) [Seleccionar] Expandir

Set "Output=C:\Carpeta" & call mkdir "%Output%" 2>NUL

net use Z: "\\IP\Carpeta De Grabaciones"
move "Z:\*.mp4" "%Output%\"

PD: El último archivo, es decir, el archivo que se esté generando actualmanete no se moverá ya que la aplicación que realiza las grabaciones debería mantener ese archivo abierto en modo escritura, así que el sistema no permitirá moverlo porque el archivo está siendo leido/escrito, símplemente no se moverá, pero el resto de archivos si, por eso no es necesario filtrar los archivos del directorio para descartar el último archivo, es una tontería.

Saludos

[EDITO:]

Una Class para manejar la aplicación mp3gain.

Sirve para aplicar una ganancia NO destructiva a archivos MP3.

http://mp3gain.sourceforge.net/

EDITO: Código mejorado.

Código (vbnet) [Seleccionar] Expandir

#Region " mp3gain Helper "



' [ mp3gain Helper ]
'
' // By Elektro H@cker
'
'
' Instructions:
'
' 1. Add the "mp3gain.exe" into the project.
'
'
' Examples :
'
' MsgBox(mp3gain.Is_Avaliable) ' Checks if mp3gain executable is avaliable.
'
' MsgBox(mp3gain.File_Has_MP3Gain_Tag("File.mp3")) ' Checks if file contains mp3gain APE tag
'
' mp3gain.Set_Gain("File.mp3", 95) ' Set the db Gain of file to 95 db (In a scale of "0/100" db)
' mp3gain.Set_Gain("File.mp3", 95, True) ' Set the db Gain of file to -95 db and preserve the datetime of file.
'
' mp3gain.Apply_Gain("File.mp3", +5) ' Apply a change of +5 db in the curent gain of file.
' mp3gain.Apply_Gain("File.mp3", -5) ' Apply a change of -5 db in the curent gain of file.
'
' mp3gain.Apply_Channel_Gain("File.mp3", mp3gain.Channels.Left, +10) ' Apply a change of +10 db in the curent Left channel gain of file.
' mp3gain.Apply_Channel_Gain("File.mp3", mp3gain.Channels.Right, -10) ' Apply a change of -10 db in the curent Right channel gain of file.
'
' mp3gain.Undo_Gain("File.mp3") ' Undo all MP3Gain db changes made in file.
'
'
' ------
' EVENTS
' ------
' Public WithEvents mp3gain As New mp3gain
'
' Sub mp3gain_Progress(Progress As Integer, e As EventArgs) Handles mp3gain.PercentDone
'     ProgressBar1.Maximum = 100
'     ProgressBar1.Value = Progress
' End Sub
'
' Sub mp3gain_Exited(Message As String, e As EventArgs) Handles mp3gain.Exited
'     ProgressBar1.Value = 0
'     MessageBox.Show(Message)
' End Sub



Public Class mp3gain

#Region " CommandLine parametter legend "

    ' MP3Gain Parametter Legend:
    '
    ' /c   - Ignore clipping warning when applying gain.
    ' /d   - Set global gain.
    ' /e   - Skip Album analysis, even if multiple files listed.
    ' /g   - apply gain
    ' /p   - Preserve original file timestamp.
    ' /r   - apply Track gain automatically (all files set to equal loudness)
    ' /t   - Writes modified data to temp file, then deletes original instead of modifying bytes in original file.
    ' /u   - Undo changes made (based on stored tag info).
    ' /s c - Check stored tag info.

#End Region

#Region " Variables "

    ' <summary>
    ' Gets or sets the mp3gain.exe executable path.
    ' </summary>
    Public Shared mp3gain_Location As String = "c:\mp3gain.exe"

    ' Stores the MP3Gain process ErrorOutput.
    Private Shared ErrorOutput As String = String.Empty

    ' Stores the MP3Gain process StandardOutput.
    Private Shared StandardOutput As String = String.Empty ' Is not needed

    ' Sets a Flag to know if file has MP3Gain APE tag.
    Private Shared HasTag As Boolean = False

#End Region

#Region " Enumerations "

    Enum Channels As Short
        Left = 0  ' /l 0
        Right = 1 ' /l 1
    End Enum

#End Region

#Region " Events "

    ' <summary>
    ' Event raised when process progress changes.
    ' </summary>
    Public Shared Event PercentDone As EventHandler(Of PercentDoneEventArgs)
    Public Class PercentDoneEventArgs : Inherits EventArgs
        Public Property Progress As Integer
    End Class

    ' <summary>
    ' Event raised when MP3Gain process has exited.
    ' </summary>
    Public Shared Event Exited As EventHandler(Of ExitedEventArgs)
    Public Class ExitedEventArgs : Inherits EventArgs
        Public Property Message As String
    End Class

#End Region

#Region " Processes Info "

    Private Shared Process_TagCheck As New Process() With { _
    .StartInfo = New ProcessStartInfo With { _
                .CreateNoWindow = True, _
                .UseShellExecute = False, _
                .RedirectStandardError = False, _
                .RedirectStandardOutput = True _
    }}

    Private Shared Process_For_Tag As New Process() With { _
    .StartInfo = New ProcessStartInfo With { _
                .CreateNoWindow = True, _
                .UseShellExecute = False, _
                .RedirectStandardError = False, _
                .RedirectStandardOutput = True _
    }}

    Private Shared Process_For_NonTag As New Process() With { _
    .StartInfo = New ProcessStartInfo With { _
                .CreateNoWindow = True, _
                .UseShellExecute = False, _
                .RedirectStandardError = True, _
                .RedirectStandardOutput = True _
    }}

#End Region

#Region " Miscellaneous functions "

    ' <summary>
    ' Checks if mp3gain.exe process is avaliable.
    ' </summary>
    Public Shared Function Is_Avaliable() As Boolean
        Return IO.File.Exists(mp3gain_Location)
    End Function

    ' Checks if a file exist.
    Private Shared Sub CheckFileExists(ByVal File As String)

        If Not IO.File.Exists(File) Then
            ' Throw New Exception("File doesn't exist: " & File)
            MessageBox.Show("File doesn't exist: " & File, "MP3Gain", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End If

    End Sub

#End Region

#Region " Gain Procedures "

    ' <summary>
    ' Checks if mp3gain APE tag exists in file.
    ' </summary>
    Public Shared Function File_Has_MP3Gain_Tag(ByVal MP3_File As String) As Boolean

        CheckFileExists(MP3_File)

        Process_TagCheck.StartInfo.FileName = mp3gain_Location
        Process_TagCheck.StartInfo.Arguments = String.Format("/s c ""{0}""", MP3_File)
        Process_TagCheck.Start()
        Process_TagCheck.WaitForExit()

        Return Process_TagCheck.StandardOutput.ReadToEnd.Trim.Split(Environment.NewLine).Count - 1

        ' Process_TagCheck.Close()

    End Function

    ' <summary>
    ' Set global db Gain in file.
    ' </summary>
    Public Shared Sub Set_Gain(ByVal MP3_File As String, _
                               ByVal Gain As Integer, _
                               Optional ByVal Preserve_Datestamp As Boolean = True)

        Run_MP3Gain(MP3_File, String.Format("/c /e /r /t {1} /d {2} ""{0}""", _
                                            MP3_File, _
                                            If(Preserve_Datestamp, "/p", ""), _
                                            If(Gain < 0, Gain + 89.0, Gain - 89.0)))

    End Sub

    ' <summary>
    ' Apply db Gain change in file.
    ' </summary>
    Public Shared Sub Apply_Gain(ByVal MP3_File As String, _
                                 ByVal Gain As Integer, _
                                 Optional ByVal Preserve_Datestamp As Boolean = True)

        Run_MP3Gain(MP3_File, String.Format("/c /e /r /t {1} /g {2} ""{0}""", _
                                            MP3_File, _
                                            If(Preserve_Datestamp, "/p", ""), _
                                            Gain))

    End Sub

    ' <summary>
    ' Apply db Gain change of desired channel in file.
    ' Only works for Stereo MP3 files.
    ' </summary>
    Public Shared Sub Apply_Channel_Gain(ByVal MP3_File As String, _
                                         ByVal Channel As Channels, _
                                         ByVal Gain As Integer, _
                                         Optional ByVal Preserve_Datestamp As Boolean = True)

        Run_MP3Gain(MP3_File, String.Format("/c /e /r /l {2} {3} ""{0}""", _
                                            MP3_File, _
                                            If(Preserve_Datestamp, "/p", ""), _
                                            If(Channel = Channels.Left, 0, 1), _
                                            Gain))

    End Sub

    ' <summary>
    ' Undo all MP3Gain db changes made in file (based on stored tag info).
    ' </summary>
    Public Shared Sub Undo_Gain(ByVal MP3_File As String, _
                                Optional ByVal Preserve_Datestamp As Boolean = True)

        Run_MP3Gain(MP3_File, String.Format("/c /t {1} /u ""{0}""", _
                                            MP3_File, _
                                            If(Preserve_Datestamp, "/p", "")))

    End Sub

#End Region

#Region " Run MP3Gain Procedures "

    Private Shared Sub Run_MP3Gain(ByVal MP3_File As String, ByVal Parametters As String)

        CheckFileExists(MP3_File)

        HasTag = File_Has_MP3Gain_Tag(MP3_File)

        Process_For_Tag.StartInfo.FileName = mp3gain_Location
        Process_For_Tag.StartInfo.Arguments = Parametters

        Process_For_NonTag.StartInfo.FileName = mp3gain_Location
        Process_For_NonTag.StartInfo.Arguments = Parametters

        If HasTag Then
            Run_MP3Gain_For_Tag()
        Else
            Run_MP3Gain_For_NonTag()
        End If

    End Sub

    Private Shared Sub Run_MP3Gain_For_Tag()

        Process_For_Tag.Start()
        Process_For_Tag.WaitForExit()

        RaiseEvent Exited(Process_For_Tag.StandardOutput.ReadToEnd.Trim.Split(Environment.NewLine).LastOrDefault, Nothing)

        StandardOutput = Nothing
        ' Process_For_Tag.Close()

    End Sub

    Private Shared Sub Run_MP3Gain_For_NonTag()

        Process_For_NonTag.Start()

        While Not Process_For_NonTag.HasExited

            Try

                ErrorOutput = Process_For_NonTag.StandardError.ReadLine.Trim.Split("%").First
                If CInt(ErrorOutput) < 101 Then
                    RaiseEvent PercentDone(ErrorOutput, Nothing)
                End If

            Catch : End Try

        End While

        StandardOutput = Process_For_NonTag.StandardOutput.ReadToEnd.Trim.Split(Environment.NewLine).Last

        RaiseEvent Exited(StandardOutput, Nothing)

        ErrorOutput = Nothing
        StandardOutput = Nothing
        ' Process_For_Tag.Close()

    End Sub

#End Region

End Class

#End Region

[Art-ASCII]

Leyenda. Es decir el nombre del programador bien grande

Creo que confundes lo que es una Leyenda, una Leyenda es una especie de ayuda para describir ciertos parámetros, como por ejemplo la Leyenda de un desfragmentador (EJ: rojo: archivos, amarillo: carpetas, negro: espacio reservado, etc...).

Código (dos) [Seleccionar] Expandir

Echo. ___________.__                      
Echo. \_   _____/^|__^|______  _____ _____  
Echo.  ^|    __)  ^|  \_  __ \/     \\__  \  
Echo.  ^|     \   ^|  ^|^|  ^| \/  Y Y  \/ __ \_
Echo.  \___  /   ^|__^|^|__^|  ^|__^|_^|  (____  /
Echo.      \/                    \/     \/

Eso se denomina Art-ASCII, puedes generar tu "Firma" ASCII con cualquier servicio online: http://patorjk.com/software/taag/#p=display&f=Graffiti&t=Firma

Saludos

http://en.wikipedia.org/wiki/Virtual_machine

https://www.virtualbox.org/wiki/Downloads

saludos

Según me comentaron los que atacan son de holoscripter.org y uno de los users que atacan es inzect02, es de México. Mail: nnnj8@hotmail.es

En letra grande, que se enteren esos lammers!

Como siempre el equipo infalible de EHN "devolviendo el golpe" a cualquier juanker que ose atacarles, Gran trabajo encontrando las huellas de los sospechosos y hallando respuestas.

Saludos!

el controlador de nvidia dejo de funcionar

Sin duda tienes un problema con la T.Gráfica.

Puedes probar esto:

1. Actualizar el driver de tu tarjeta (o reinstalar el mismo) haciendo una instalación LIMPIA del driver:
- Descargar la última versión del Driver: http://www.nvidia.es/Download/index.aspx?lang=es
- Iniciar el instalador y elegir la opción "Instalación limpia".
- Al finalizar la instalación, reiniciar el PC y testear tus navegadores.

2. Downgradear la tarjeta, esta técnica nunca me ha fallado para solucionar problemas similares en los peores momentos con mis tarjeta nVidia:
- Descargar e instalar ASUS GPU Tweak: http://support.asus.com/download.aspx?p=9&m=GPU+Tweak&hashedid=n%2fa
- Iniciar la aplicación y disminuir en un 20% (o más si no resulta suficiente) todos los valores de frecuencia y de RAM.
- Guardar los cambios en el programa y seguídamente testear tus navegadores.

3. Abre las opciones de configuración de la pantalla (en el panel de control)
- Reduce el modo de visualización a 16 Bits, perderás bastante color, pero solo es para testear.
- Testea los navegadores.

PD: Los cambios si no recuerdo mal no eran permanentes, cada vez que reinicies el PC vas a tener que abrir la aplicación para volver a disminuir los valores.





El problema de "un script está tardando demasiado en responder" me ha pasado alguna que otra vez de forma ocasional, en tu caso podría estar relacionado con el mismo problema gráfico de la tarjeta, o también podría ser otro problema aislado del navegador (de la página web que corre el script),
sea como sea instálate estas dos extensiones en Firefox y lo agradecerás (creo que también disponen de versión para Chrome):

-> NoScript
-> Adblock+

El primero bloquea scripts, puedes configurar los que se bloquean y los que no, aunque esto no significa que tu problema en concreto se vaya a solucioanr, quizás no se solucione.
El segundo bloquea "Ads", popus molestos y otras historias.

Saludos