elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


  Mostrar Mensajes
Páginas: 1 ... 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 [610] 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 ... 1253
6091  Programación / Scripting / Re: Copiar carpetas en base a la fecha de modificación en: 21 Enero 2015, 16:08 pm
Que debo modificar para que solo me copie las con fecha de modificación exacta y no otras.

La aplicación XCopy no permite personalizar el copiado especificando el filtro que necesitas.

Puedes utilizar la aplicación de terceros XXCopy: http://www.xxcopy.com/
Citar
Código:
/Do:<date>  Copies files that were changed on the specified date.

Así pues:
Código:
XXCopy.exe "\\DestinoA" \\DestinoB" /Do:01-20-2015 /E /C /SC /K /H /VL

O también puedes utilizar la aplicación RoboCopy de Microsoft:
Citar
Código:
/MAXAGE:n :: Antigüedad máxima de archivo, excluir archivos más antiguos de n días o fecha.
/MINAGE:n :: Antigüedad mínima de archivo, excluir archivos más nuevos de n días o fecha.

Así pues:
Código:
RoboCopy.exe "\\DestinoA" \\DestinoB" /MINAGE:01-20-2015 /MAXAGE:01-20-2015 /E /COPY:DATSOU /DCOPY:DAT /R:999 /W:30

O bien puedes hacer el copiado utilizando técnicas de Batch (Usar el comando Dir /B /S para listar los archivos y filtrarlos según la fecha de modificación de cada), pero sería un proceso algo lento y un código engorroso debido a que Batch es un lenguaje muy limitado.

Saludos
6092  Programación / Programación General / MOVIDO: [Python]Generador de contraseñas en: 21 Enero 2015, 12:44 pm
El tema ha sido movido a Scripting.

http://foro.elhacker.net/index.php?topic=428470.0
6093  Foros Generales / Dudas Generales / Re: Opiniones sobre servicios Multihoster (Multiples Premum en Uploaded,RG,MG, etc) en: 21 Enero 2015, 11:26 am
Gracias tio, me acabas de ahorrar 10 euros gracias a tu opinión de Zebera... ya me temía que algo de gato encerrado tenía que tener eso....

Muchas gracias crack!

Hola

Si estás buscando un servicio de ese tipo, te recomiendo AllDebrid.com, son de fiar, y cuesta mucho menos que el nefasto y fraudulento Zevara.
No tengo ninguna queja sobre AllDebrid, es perfecto :)

Saludos!
6094  Programación / .NET (C#, VB.NET, ASP) / Re: Comprobar cambios en los registros en: 21 Enero 2015, 07:11 am
capturo el error que dice "@oldnombre no tiene un valor predeterminado", no se cual puede llegar a ser el problema.

Prueba a añadir un valor predeterminado.

Un valor DBNull.Value en lugar de un null:
Código
  1. parameter = adapter.UpdateCommand.Parameters.Add("@oldnombre", OleDbType.VarChar, 255, "nombre").Value = DBNull.Value
  2. parameter = adapter.UpdateCommand.Parameters.Add("@oldapellido", OleDbType.Char, 255, "apellido").Value = DBNull.Value

Saludos
6095  Programación / Programación General / MOVIDO: Mi programa no se abre cuando lo compilo desde cmd en: 21 Enero 2015, 06:52 am
El tema ha sido movido a Java.

http://foro.elhacker.net/index.php?topic=428455.0
6096  Programación / Java / Re: Mi programa no se abre cuando lo compilo desde cmd en: 21 Enero 2015, 06:52 am
Cuando pongo javac MainClass sin la extension .java me tira el siguiente error
error: Class names, 'MainClass', are only accepted if annotation processing is explicitly requested
1 error
Entiendo ingles pero igual no puedo entender el error que me esta tirando  :-(


Java FAQ

Class names, 'HelloWorldApp', are only accepted if annotation processing is explicitly requested

If you receive this error, you forgot to include the .java suffix when compiling the program. Remember, the command is javac HelloWorldApp.java not javac HelloWorldApp.

Como te está indicando, debes añadir la extensión .java en el nombre del archivo al usar el compilador de java.

Sobre el problema que tienes de que el compiler compila sin tirar error pero ¿tampoco muestra ningún tipo de información?, no tengo ni idea de que puede ser.

PD: Las preguntas relacionadas con Java van en la sección de Java.

Saludos
6097  Programación / .NET (C#, VB.NET, ASP) / Re: Cómo Cambiar las Propiedades de un Control con "Reflection" ??? en: 21 Enero 2015, 06:39 am
En las propiedades de tu proyecto, cambia el .Net Framework objetivo del proyecto a .Net framework 3.5 o superior, para añadir la referencia a LINQ.

Saludos
6098  Programación / .NET (C#, VB.NET, ASP) / Re: Cómo Cambiar las Propiedades de un Control con "Reflection" ??? en: 20 Enero 2015, 18:48 pm
En el caso específico del problema que has expuesto, puedes hacerlo por ejemplo así:

Ten en cuenta que el siguiente código no está pulido, es solo un ejemplo, y se podría simplificar o parsear el string de otra manera más eficiente.

EDITO: Versión extendida:

Código
  1. Imports System.Reflection
  2. Imports System.Globalization
  3.  
  4. Public Class Form1
  5.  
  6.    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
  7.    Handles Button1.Click
  8.  
  9.        Me.ParseControlInstruction("Textbox2.Enabled = False")
  10.        Me.ParseControlInstruction("Textbox2.Hide()")
  11.  
  12.    End Sub
  13.  
  14.    Private Sub ParseControlInstruction(ByVal instruction As String)
  15.  
  16.        Dim isProperty As Boolean
  17.        Dim isMethod As Boolean
  18.  
  19.        If instruction Like "*[.]*[!(]*[=]*" Then
  20.            isProperty = True
  21.  
  22.        ElseIf instruction Like "*[.]*[!=]*[(]*[)]" Then
  23.            isMethod = True
  24.  
  25.        Else
  26.            Throw New NotImplementedException(String.Format("Cannot recognize the instruction string: {0}", instruction))
  27.  
  28.        End If
  29.  
  30.        ' Fix whitespaces.
  31.        instruction = instruction.Trim({" "c})
  32.  
  33.        ' Fix Namespaces. (THIS IS NOT PROPERLY IMPLEMENTED)
  34.        If instruction.StartsWith("Me.", StringComparison.OrdinalIgnoreCase) Then
  35.            instruction = instruction.Remove(0, "Me.".Length)
  36.        End If
  37.  
  38.        Dim ctrlName As String = instruction.Substring(0, instruction.IndexOf("."c))
  39.  
  40.        If isProperty Then
  41.            Dim propName As String = instruction.Remove(0, ctrlName.Length + 1)
  42.            propName = propName.Substring(0, propName.IndexOf(" "c))
  43.  
  44.            Dim value As Object = instruction.Substring(instruction.IndexOf("="c) + 1).Trim({" "c})
  45.  
  46.            Me.SetControlProperty(ctrlName, propName, value, MyBase.Controls, searchChildrens:=True)
  47.  
  48.        ElseIf isMethod Then
  49.            Dim methodName As String = instruction.Remove(0, ctrlName.Length + 1).TrimEnd({"("c, ")"c})
  50.  
  51.            Dim methodParamsStr As String = instruction.Substring(instruction.IndexOf("("c) + 1)
  52.            methodParamsStr = methodParamsStr.Substring(0, methodParamsStr.LastIndexOf(")"c))
  53.            Dim methodParams As IEnumerable(Of Object) = methodParamsStr.Split({", "}, StringSplitOptions.RemoveEmptyEntries)
  54.  
  55.            Me.CallControlMethod(ctrlName, methodName, methodParams, MyBase.Controls, searchChildrens:=True)
  56.  
  57.        End If
  58.  
  59.    End Sub
  60.  
  61.    Private Sub SetControlProperty(ByVal ctrlName As String,
  62.                                   ByVal propName As String,
  63.                                   ByVal value As Object,
  64.                                   ByVal controlCollection As Control.ControlCollection,
  65.                                   Optional ByVal searchChildrens As Boolean = False,
  66.                                   Optional ByVal searchFlags As BindingFlags =
  67.                                                                 BindingFlags.IgnoreCase Or
  68.                                                                 BindingFlags.Instance Or
  69.                                                                 BindingFlags.Public Or
  70.                                                                 BindingFlags.NonPublic)
  71.  
  72.        Dim ctrl As Control = controlCollection.Find(ctrlName, searchChildrens).FirstOrDefault
  73.        Dim prop As PropertyInfo
  74.  
  75.        Select Case ctrl Is Nothing
  76.  
  77.            Case False
  78.                Try
  79.                    prop = ctrl.GetType().GetProperty(propName, searchFlags)
  80.  
  81.                Catch ex As AmbiguousMatchException
  82.                    Throw New AmbiguousMatchException(String.Format("More than one property found with the same name: {0}", propName))
  83.                    Exit Sub
  84.  
  85.                End Try
  86.  
  87.                Select Case prop Is Nothing
  88.  
  89.                    Case False
  90.                        Try
  91.                            prop.SetValue(ctrl, Convert.ChangeType(value, prop.PropertyType), Nothing)
  92.  
  93.                        Catch ex As Exception
  94.                            Throw
  95.  
  96.                        End Try
  97.  
  98.                    Case Else
  99.                        Throw New NullReferenceException(String.Format("Property not found by name: {0}", propName))
  100.  
  101.                End Select ' prop Is Nothing
  102.  
  103.            Case Else
  104.                Throw New NullReferenceException(String.Format("Control not found by name: {0}", ctrlName))
  105.  
  106.        End Select ' ctrl Is Nothing
  107.  
  108.    End Sub
  109.  
  110.    Private Sub CallControlMethod(ByVal ctrlName As String,
  111.                                  ByVal methodName As String,
  112.                                  ByVal methodParams As IEnumerable(Of Object),
  113.                                  ByVal controlCollection As Control.ControlCollection,
  114.                                  Optional ByVal searchChildrens As Boolean = False,
  115.                                  Optional ByVal searchFlags As BindingFlags =
  116.                                                                BindingFlags.IgnoreCase Or
  117.                                                                BindingFlags.Instance Or
  118.                                                                BindingFlags.Public Or
  119.                                                                BindingFlags.NonPublic)
  120.  
  121.        Dim ctrl As Control = controlCollection.Find(ctrlName, searchChildrens).FirstOrDefault
  122.        Dim method As MethodInfo
  123.  
  124.        Select Case ctrl Is Nothing
  125.  
  126.            Case False
  127.                Try
  128.                    method = ctrl.GetType().GetMethod(methodName, searchFlags)
  129.  
  130.                Catch ex As AmbiguousMatchException
  131.                    Throw New AmbiguousMatchException(String.Format("More than one method found with the same name: {0}", methodName))
  132.                    Exit Sub
  133.  
  134.                End Try
  135.  
  136.                Select Case method Is Nothing
  137.  
  138.                    Case False
  139.                        Try
  140.                            method.Invoke(ctrl, searchFlags, Nothing, methodParams.ToArray, CultureInfo.InvariantCulture)
  141.  
  142.                        Catch ex As Exception
  143.                            Throw
  144.  
  145.                        End Try
  146.  
  147.                    Case Else
  148.                        Throw New NullReferenceException(String.Format("Method not found by name: {0}", methodName))
  149.  
  150.                End Select ' prop Is Nothing
  151.  
  152.            Case Else
  153.                Throw New NullReferenceException(String.Format("Control not found by name: {0}", ctrlName))
  154.  
  155.        End Select ' ctrl Is Nothing
  156.  
  157.    End Sub
  158.  
  159. End Class

Saludos
6099  Programación / .NET (C#, VB.NET, ASP) / Re: 1 muestra del poder de la programacion dinamica en: 19 Enero 2015, 23:01 pm
@LordBynary

Está prohibido revivir temas antiguos, además, fíjate en la fecha de conexión del usuario SpiritDead en su perfil, dudo que vaya a responderte.



Para modificar en tiempo de ejecución la propiedad de un control teniendo solamente un string del tipo "Control.Property = Value", puedes hacerlo utilizando Reflection.
Pero no entendí muy bien si es eso lo que pretendes hacer.

Plantea tu duda de forma correcta en otro tema, y muestra tú código.



Tema cerrado.

Saludos.
6100  Foros Generales / Foro Libre / Re: Zozo, el infame demonio de la Ouija en: 19 Enero 2015, 22:49 pm
entonces por que hay gente que han visto espíritus  viven fenómenos paranormales en sus casas hay gente ahora que lo estarán sufriendo en sus casas esos fenómenos y no son para tomarnos de risa

En mi opinión... todos esos fenómenos paranormales son producto de la imaginación, es como el típico individuo que por desgracia sufre una experiencia cercana a la muerte ...por ejemplo un coma de corta duración (o incluso simplemente anestesiados xD), y en esa exeriencia dicen haber visto un tunel de luz... una luz que por supuesto debe ser Dios (¿que otra cosa podría ser, no?), y cuando despiertan de esa experiencia cercana a la muerte asocian de una manera irracional y primitiva esa luz con Dios, que Dios les estaba guiando con una luz o cosas así, cuando en realidad ese efecto túnel de luz es creado por el decrebro debido al estado de los ojos y del individuo (de forma muy mal explicada), es algo demostrado de forma científica, pero la gente seguirá creyendo que ha visto a Dios.. o espíritus, cuando todas esas cosas tienen otra explicación.

Para mi esto es lo mismo... gente que cree en algo de forma equivocada, pero bueno, que cada uno crea en lo que le de la gana.

Para ser sinceros no siempre he pensado así, de pequeño yo era menos racional e hice Ouija 2 veces, pero no vi nada ni tampoco me pasó nada.

Saludos!
Páginas: 1 ... 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 [610] 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 ... 1253
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines