1. La programación requiere completa concentración en lo que haces, hasta el zumbido de una mosca puede estropear ideas espontaneas que surgen durante el desarrollo, por ende, lo que cuentan en la imagen es más falso que una moneda de 10€, yo no me creo que mujeres tan provocativas y sexys cómo la de la última imagen, que solo por mirarla ya se te empalma hasta el día siguiente, pues no me creo que poner a chicas así desfilando en la oficina sea un método eficiente para aumentar la productividad de los empleados, sino más bien para todo lo contrario, ¿pero a quien quieren engañar?, y mucho menos si son chinos salidos, ¿salidos dije?, si, un tópico pero bien real ...ya que su sociedad parece estar "reprimida sexualmente" (aunque realmente yo no he ido a China para comprobarlo, pero todos lo hemos visto muchas veces en la TV/Documentales) así que tal vez todo eso de lucir mujeres con pechos grandes simplemente sea una excusa para saciar su sed de erotismo, para pasarlo bien y nada más, normal que digan que la idea es buena y demás (¿qué hombre diria lo contrario si le llenan su oficina de teens con escotes y minifaldas?), ya pueden inventar lo que quieran diciendo que ahora son más productivos... ja!.

2. No me estoy quejando, ya me gustaría a mi trabajar así (aunque poco iba a trabajar entonces) simplemente digo la verdad sobre algo que en la imagen pretenden transmitir como una idea prometedera y productiva, cuando es una simple excusa para seguir haciendo lo que hacen, una imagen con unos comentarios muy estúpidos y falsos. A ver quien iba a ser capaz de hacer un trabajo bien hecho con "animadoras" paseando el culo por su cara cada 5 minutos y haciendo grupitos para pegarse unos karaokes o tomarse unos chupitos con ellas, ¡en fin!,

3. Las feminazis tienen que estar muy, pero que muy contentas con esto... .

Saludos!

hmmm, pues siento decepcionarte por el tiempo que hayas invertido buscando la solución, pero ahora que me doy cuenta creo que me equivoqué al recomendarte el RoboCopy, lo siento, pero al parecer RoboCopy no permite filtrar por fecha de modificación.

"minage" y "maxage" se refieren a la fecha de creación del archivo.
"minlad" y "maxlad' se refieren a la última marca de acceso al archivo.

No parece haber nada para la fecha de modificación.

---

Te mostraría algún ejemplo en puro Batch pero con las filtraciones de días y patrones de búsqueda y demás se hace ddemasiado tedioso (una pérdida de tiempo).

Lo mejor tal vez sería que utilizases otra herramienta, u otro lenguaje que no sea Batch, eso también sería una solución efectiva.

En VBS se puede enumerar los archivos del árbol y comparar por fechas, se puede hacer de manera sencilla, sin embargo, si es para algún tipo de backup importante sería preferible utilizar una herramienta especializada en lugar de desarrollar el algoritmo, ¿tienes algún inconveniente en utilizar XXCOPY?, este programa si que permite filtrar por modificación de archivo de una manera bastante sofisticada, este podría ser el comando:

(las exclusiones no estoy seguro de si lo hice siguiendo la sintaxis correcta que indica el programa, tendrías que testearlo)

Este es el significado de cada parámetro que utilicé:

PD: Si no lo usaste por que ves que es de pago entonces te lo puedo pasar sin problemas, lo tengo craqueado desde hace mucho (pero no lo uso para nah), mándame un mp si lo quieres.

Saludos

Allá cada uno con sus rarezas

Con fecha de que?, ¿de creación, modificación, o último acceso?.

Míra el parámetro /MAXLAD también.

Saludos

Pues ...no lo se, a simple vista todo me parece correcto, la ayuda de los parámetros dicen que deberían hacer lo que tú has mencionado.

¿Por "me copia todo" te refieres a toda la estructura completa de archivos y carpetas, o solamente a las carpetas que intentas excluir?.

No creo que esto solucione el problema, pero prueba a encerrar los argumentos cómo es debido:

Siempre puedes probar la aplicación EazyCopy para ayudarte a construir el comando de RoboCopy:
➢ http://choeazycopy.codeplex.com/

...O alternativas a RoboCopy más sofisticadas, cómo por ejemplo XXCopy:
➢ http://www.xxcopy.com/

EDITO: Ups, veo que he repetido la mención al programa XXCopy, lo siento xD, pero de todas formas es una muy buena herramienta a tener en cuenta ...mucho más elaborada que el RoboCopy.

Saludos

Una alternativa que puedes utilizar serían los contadores de rendimiento.

He desarrollado la siguiente Class que permite monitorizar el tráfico de una interfáz de red, o incluso el tráfico de un proceso, quiero decir del proceso actual o de un ensamblado .Net externo (en ambos casos para monitorizar el tráfico de un proceso primero es necesario habilitar los contadores de rendimiento en el archivo de configuración de la aplicación, "app.config"), con características básicas para controlar el intervalo de actualización y demás, y con algoritmos simples para medir la velocidad de descarga y subida (los he escrito en un par de horas, dan buenos resultados si se asigna un intervalo de actualización de 1 segundo, son muy mejorables pero por el momento lo he dejado así).

---

Son dos classes distintas, NetworkTrafficMonitor y ProcessTrafficMonitor, en esta demostración hago uso del monitor del tráfico del proceso actual:

---

Un ejemplo del modo de empleo, el mismo que he utilizado para la app de la imagen GIF:

Imports NetworkUtil
Imports NetworkUtil.NetworkTrafficMonitor
 
Public NotInheritable Class Form1 : Inherits Form
 
    Dim WithEvents procNetMon As NetworkUtil.ProcessTrafficMonitor
 
    Private Sub Form1_Load() Handles MyBase.Load
 
        Me.procNetMon = New ProcessTrafficMonitor(Process.GetCurrentProcess.Id)
        Me.procNetMon.UpdateBehavior = UpdateBehaviorEnum.FireAlwaysAfterTick
        Me.procNetMon.UpdateInterval = 1000 ' 1 sec.
        Me.procNetMon.Start()
 
    End Sub
 
    Private Sub ProcNetMon_TrafficChanged(ByVal sender As Object, ByVal e As ProcessTrafficMonitor.TrafficChangedEventArgs) _
    Handles procNetMon.TrafficChanged
 
        Me.LabelBytesReceived.Text = String.Format("Bytes received: {0} kb", (e.BytesReceived / 1024).ToString("n2"))
        Me.LabelDlSpeed.Text = String.Format("DL Speed: {0} kb/sec", (e.DiffBytesReceived / 1024).ToString("n2"))
 
        Me.LabelBytesSent.Text = String.Format("Bytes sent: {0} kb", (e.BytesSent / 1024).ToString("n2"))
        Me.LabelUlSpeed.Text = String.Format("UL Speed: {0} kb/sec", (e.DiffBytesSent / 1024).ToString("n2"))
 
    End Sub
 
    Private Sub BtDownloadUrl_Click() Handles BtDownloadUrl.Click
 
        Dim url As String = "http://download.thinkbroadband.com/10MB.zip"
        Dim client As New WebClient()
        client.DownloadFileAsync(New Uri(url), Path.GetTempFileName())
 
    End Sub
 
    Private Sub BtPauseMon_Click() Handles BtPauseMon.Click
 
        If Me.procNetMon.IsActive Then
            Me.procNetMon.Stop()
        Else
            Me.procNetMon.Start()
        End If
 
    End Sub
 
End Class

La Class NetworkTrafficMonitor, que es en lo que podrías estar interesado, se maneja exactamente de la misma manera, ya que ProcessTrafficMonitor la heredo de esta;
La única diferencia es el constructor, que toma cómo argumento el nombre de una interfáz de red activa.

Ejemplo:

Dim WithEvents netMon As New NetworkTrafficMonitor(NetworkTrafficMonitor.GetAvaliableInterfaceNames.First)

---

El código fuente lo puedes descargar aquí, simplemente copiar pegar y utilizar:

➢ Network/Process Traffic Monitor in VBNet, By Elektro - PasteBin

PD: Si usas la class, te sugiero separar las subclasses que hay definidas en varios archivos.

---

Diagrama de classes:



   

 
 

---

Espero que les sirva de algo a ti y a los que estén interesados

Saludos

Engel, en realidad es para convertir de binario a decimal solo aclaro el dato pero no tiene importancia.

La misma tarea pero en .Net (VB.Net):

Dim bin As String = "101001001" ' 329
Dim dec As Integer = Convert.ToInt32(bin, fromBase:=2)
Console.WriteLine(dec)

En C# sería lo mismo, y en Ruby, Python, Java y etc también solamente que utilizando sus miembros built-in.

PD: Te muestro el ejemplo equivalente pa que veas la diferencia de simplificación de código, aunque las diferencias son muchas más que esa, Batchero advertido .

Entonces el peor lenguaje que puedes escojer es Batch. Batch fue ideado para automatizar tareas del sistema, con él no podrás aprender nada útil al respecto del hacking, cómo mucho podrás hacer una bomba lógica y ya (en lo referente al Malware), olvídate de cualquier tipo de interacción/comunicación con la red (Sockets y demás).

---

Batch no es complejo, Batch es el lenguaje más sencillo de aprender ya que carece de cualquier componente de un lenguaje real, lo que el compañero @Engel Lex seguramente intentó decirte es que precisamente por ese motivo que acabo de explicar (o similares), cualquier código en Batch requiere más lineas de escritura y por ende más tiempo de desarrollo en comparación con cualquier otro lenguaje, Batch se vuelve tedioso y complejo en el sentido de que para cualquier código hay que buscarle 5 patas al gato, por que es un lenguaje limitado, muy, muy limitado.

---

Windows soporta nativamente varios lenguajes más, los cuales le dan mil patadas a Batch, estos son:

• Visual Basic Script (VBS)
• Visual Basic for Applications (VBA)
• PowerShell
• javascript (mejor no lo tomes cómo una opción por el momento en lo relacionado con apps/tareas de escritorio)

Sin embargo, para alguien que quiere introducirse en la programación, sea por el motivo que sea, yo recomendaría Ruby o Python (si hablamos de Scrpting) o C#/VB.Net (si hablamos de lenguajes compilados).

---

Vuelvo a repetirte mi consejo. Si tu interés es el hacking ...evita Batch.

De todas formas...
➢ Tutorial extendido de aprendizaje Batch - By Elektro
➢ [BATCH] Manual PDF de Batch (INGLÉS) - By Elektro (SS64)
➢ An A-Z Index of the Windows CMD command line - SS64
+

Saludos

1.
El motivo de que en un equipo te funcione y en otro no, probablemente se deba a que en esta orden asumes que la primera interfáz de todas que se encuentre (0) es la que se debe monitorizar, y eso no siempre tiene por que ser así, ya que otros equipos tendrán varias interfaces o simplemente la primera interfáz encontrada no será la que realmente quieras monitorizar.

'//Estado de red
Dim ipv4Stats As IPv4InterfaceStatistics
ipv4Stats = NetworkInterface.GetAllNetworkInterfaces(0).GetIPv4Statistics

Debes comprobar con evaluaciones qué interfáz es la que realmente quieres monitorizar, empezando por filtrar los adaptadores de Internet y verificar cuales de ellos están activos:

If NetworkInterface.GetIsNetworkAvailable() Then
 
    Dim interfaces As NetworkInterface() = NetworkInterface.GetAllNetworkInterfaces()
 
    For Each ni As NetworkInterface In interfaces
 
        If ni.OperationalStatus = OperationalStatus.Up Then
 
            If (ni.NetworkInterfaceType <> NetworkInterfaceType.Tunnel) AndAlso
               (ni.NetworkInterfaceType <> NetworkInterfaceType.Loopback) Then
 
                Dim statistics As IPv4InterfaceStatistics = ni.GetIPv4Statistics()
 
                If (statistics.BytesReceived > 0) AndAlso (statistics.BytesSent > 0) Then
                    ' En ste punto tenemos una interfáz de red (Internet) activa...
                    ' ...una de varias que pueden haber conectadas y activas al PC.
                End If
 
            End If
 
        End If
 
    Next ni
 
End If

(Si tienes adaptadores "virtuales" de Ethernet cómo por ejemplo TAP-Win podría ser un problema con el código que he mostrado, debes omitir esas interfaces claro está)

---

2.
La estructuración en general de la Class InformationNetwork es incorrecta, el dato más importante a tener en cuenta es que defines una función EnumerateNetwok sin un valor de retorno asignado, por ende no es una función como tal, y, no se con que intención, devuelves un 0 que no utilizarás en ninguna evaluación posterior.

Por mencionar algo más, esta evaluación es inecesaria (¿con que intención checkeas una conexión TCP establecida?, de esa manera no se verifica si el adaptador está activo, solo si "X" conexión TCP lo está), el casteo es innecesario, el método lambda también, y no especificas el type de la variable declarada:

Dim state As TcpState = ipv4Time.GetActiveTcpConnections.First.State

En general debes limpiar todo el código de esa y la otra class, añade las declaraciones Option apropiadas y posteriormente corrige todos los errores de compilación que te vas a encontrar debido a los malos hábitos de programación que has aplicado en ambas classes.

Option Explicit On
Option Strict On
Option Infer Off
 
Class
...
End Class

---

En resumen, simplemente debes asgurarte de que interfáz quieres monitorizar, y complementariamente sigue también las indicaciones del punto 2. para producir un código limpio y evitar malos hábitos que te causarán otros problemas.

Saludos

Eso no significa nada ya que para empezar el supuesto testimonio del forense fue que los encuentra semajentes, que no iguales, y por supuesto no puede decir que sean iguales, por que no lo son y se sabría.

Los métodos de detección de la imitación de caligrafía han avanzado mucho y hoy por hoy es sencillamente imposible hacer una falsificacción perfecta de la escritura de otra persona (a menos que la fuente original sea un papel o superficie "inestable", algo que complique la comparación), ya que los peritos que viven de ello disponen de métodos efectivos y sofisticados para determinar la imitación en los movimientos subconscientes que hacemos al escribir, y que otra persona es incapaz de recrear por mucho que se esfuerze en intentarlo.

Eso por no mencionar que los diagnósticos de un forense se pueden comprar o mejor dicho sobornar, al igual que a la policia o cualquier personal médico que quieras, mientras haya la suficiente confianza o cara dura y por supuesto el suficiente $$$ por medio entonces se pueden inventar cualquier suceso para intentar sacar un beneficio económico mayor, es lo mismo que hacer una inversión, una inversión de testimonios en donde te apoyas en una persona y esa otra persona se apoya en ti para crear un engaño "sostenible" por la complicidad entre los testimonios de esas personas (y sino, no tienes más que mirar algún programa de esos de corazón rosa, cada día hacen este tipo de engaños y eventuálmente salen a la lúz profesionales de la medicina o demás "organismos" que engañan inventando una historia con la que llenarse los bolsillos, aunque en realidad podemos ver esto en cualquier tipo de caso, como en las reencarnaciones claro está).

Por suerte o por desgracia me gusta documentarme sobre casos "paranormales" de todo tipo que hayan ocurrido, he visto y también leido muchos casos de supuestas reencarnaciones, y debido a eso soy conocedor de casos más extraños y perturbadores que los que has mencionado, algunos casos hacen dudar, mucho, pero todos tienen algo en común: La ausencia de pruebas irrefutables, y por ese motivo es absurdo darle creedibilidad a alguna de ellas.

Esas historias solamente se basan en testimonios ya sea de los supuestos reencarnados o de "expertos" en medicina, son personas al fin y al cabo pero cómo en toda historia paranormal que no merece crédito alguno lo que hacen siempre para intentar sostener su creedibilidad es jugar subliminálmente con la psicología del ser humano, ya que tendemos a darle mayor importancia a cualquier opinión y mayor creedibilidad a cualquier afirmación que provenga de alguien con estatus de "autoridad", cómo por ejemplo alguien cualificado en la medicina forense, pues forma parte de nuestra inevitable sumisión a la Jerarquía, sin ello no seriamos nada ...no habríamos evolucionado hasta donde lo hemos hecho, y ellos, los que se inventan estas historias, lo saben, y por eso SIEMPRE utilizan esa técnica de manipulación con testimonios de médicos y demás personal semejante.

El que no lo vea, es ciego, e ignora la magnitud de la fuerza que mueve este mundo y los pilares que lo sostienen.

EDITO: Con esto tampoco intento decir que yo me cierre a que tal vez exista la posibilidad de que una de todas las supuestas reencarnaciones sea real (al igual que si estuviesemos hablando de cualquier otro fenómeno paranormal), pero en ese caso entonces probablemente no sería causa de una reencarnación tal y cómo creemeos que es y por que creemos que sucede; hay muchas cosas de las que desconocemos su significado real.

Saludos!