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


 


Tema destacado: Píldoras formativas en seguridad de la información


  Mostrar Mensajes
Páginas: [1] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ... 53
1  Foros Generales / Foro Libre / Re: Enseña tu teclado. en: 19 Julio 2020, 14:39
Una de las razones por las que me compré yo este modelo concreto de teclado mecánico a pesar de su precio es por la posibilidad de ponerle teclas customizadas cuando lo desease. De modo que el otro día me dio por hacerle un cambio de look a mi teclado y pedí un nuevo juego de teclas con esta combinación de colores:





[img
width=1000]https://i.imgur.com/zcZYF1W.jpg[/img]




Como veis si miráis el primer mensaje de este hilo esta nueva combinación de colores es un poco menos colorida que la anterior o primigenia, y en ella abunda mas el blanco. En fin espero que les guste.
Saludos...

Songoku[/color]


Jo con el pc que tienes ¿ porque le haces esto ?

saludos


2  Programación / .NET (C#, VB.NET, ASP) / Otra de combinaciones pero ahora condicionadas en: 5 Abril 2020, 17:29
Hola y espero que todos estén bien

Yo como toda España encuevado para frenar el Mega Bicho  >:D

Y claro frente al pc ahora que puedo jejej

Bueno tengo este código que me combina sin error,ni duplicados etc etc, pero me da tres números y necesito aumentar los números de tres a cuatro ,cinco y sucesivamente con solo cambiar la condición ,no se implementar lo de los números  o si se debe hacer un " sele case " o en su defecto por código cada ves que quiera cambiar  :silbar:


ahora me entrega los resultados de esta forma :

tengo estos números base  {2, 6, 10, 11, 17, 20, 24, 34}  ejecuto y me da :
(solo las 3 primeras)
02.06.10
02.06.11
02.06.20
02.06.24

bien necesito que me forme resultados pero de cuatro números cinco números etc etc donde por supuesto sean números únicos o resultados

Ejemplo:

Bien:
01.05.16.25
01.05.16.26
01.05.16.30

Mal:

01.05.16.16
01.05.05.26
01.01.16.30

Código
  1. Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
  2.        Dim intCol As IEnumerable(Of Integer) = {2, 6, 10, 11, 17, 20, 24, 34}
  3.        Dim pairsCol As IEnumerable(Of String) =
  4.            From value1 As Integer In intCol
  5.            From value2 As Integer In intCol
  6.            Select String.Join(Environment.NewLine, (
  7.                               From value3 As Integer In intCol
  8.                               Where (value1 <> value2) AndAlso
  9.                                     (value1 <> value3) AndAlso
  10.                                     (value2 <> value3) AndAlso
  11.                                     (value3 > value2) AndAlso
  12.                                     (value2 > value1)
  13.                               Select String.Format("{0:00}, {1:00}, {2:00}",
  14.                                                    value1, value2, value3)))
  15.  
  16.  
  17.        Dim ClearRep As New List(Of String)
  18.  
  19.        For Each pairs As String In pairsCol
  20.            For Each line As String In pairs.Split({Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries)
  21.                ListBox4.Items.Add(line)
  22.            Next line
  23.        Next pairs
  24.  
  25.        MessageBox.Show(ListBox1.Items.Count)
  26.  
  27.  
  28.  
  29.    End Sub


Saludos
LUIS
QUÉDATE EN CASA ENTRE TODOS PODREMOS














 
3  Informática / Hardware / se puede hacer esto ? a un i3 550 overclocked y llevarlo a 4.5Ghz en: 2 Abril 2020, 19:47

Pues eso, ahora estoy afanado con mas potencia mientras preparo un pc nuevo y tengo este i3 Viejito y queria experimentar con el ,se puede hacer overclocked  sin reventar nada jejej

saludos
Luis
4  Media / Multimedia / Re: Programa para mezcla de audios o música en: 1 Abril 2020, 09:24
Gracias Songoku

Ya lo he bajado ,antes tenia la versión antigua Pero lo he perdido en un formateo  :silbar:
ahora con este tardare mil años en aprender como funciona jejejej

Luis
5  Media / Multimedia / Programa para mezcla de audios o música en: 31 Marzo 2020, 22:04
Hola

Que programa para crear o mesclar audios tipo Dj hay ahora ? y ya sabéis de los facilitos de usar jejje no pienso vender CD es para crear pistas de audio para mis loco vídeos

gracias
Luis
6  Seguridad Informática / Wireless en Windows / Re: Bloquear paginas web desde router cisco DPC3928S DOCSIS 3.0 2-PORT en: 24 Marzo 2020, 18:40
Hay una forma mas facil

ruta: windws/system32/driver/etc


Habres el archivo hosts

y le pones tal como ves esto ya esta blokeada

127.0.0.1       208.67.222.222

saludos
Luis
7  Programación / .NET (C#, VB.NET, ASP) / Re: Eliminar registros iguales condicionados :( en: 23 Marzo 2020, 15:49
lo que me muestra el lisbtox es esto: salen muchos registros (8747)  pero si te fijas en la muestra ,el ultimo si cumple la condición de números diferentes ,no debe tener números repetidos en cada registro

01.04.05.04.04.05
01.04.05.04.04.08
01.04.05.04.04.33

08.98.45.33.44.05 <------tiene que tener números diferentes como este registro

gracias por tu atencion
Luis
8  Programación / .NET (C#, VB.NET, ASP) / Re: Eliminar registros iguales condicionados :( en: 23 Marzo 2020, 15:13
"Format1" que formato le estas dando al String? .

Fue la solución que me dio el visual ya que antes usaba
Código
  1. String.Format("{0:00}, {1:00}, {2:00}

pero me daba error ??

saludos
9  Programación / .NET (C#, VB.NET, ASP) / Eliminar registros iguales condicionados :( en: 23 Marzo 2020, 14:17
Trabajando con este código de combinaciones o permutas ?? quiero eliminar los registros que dupliquen los números o que tengan los mismos números en diferente orden dejando solo uno de ellos ya que me repite muchos registros donde tienen los mismos numeros:
ejemplo

Código
  1. Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
  2.        Dim Elementos As IEnumerable(Of Integer) = {1, 4, 5, 8, 33, 44, 45, 68, 98}
  3.        Dim EleX As Integer = 0
  4.        Dim EleX1 As Integer = 0
  5.        Dim EleX2 As Integer = 0
  6.        Dim EleX3 As Integer = 0
  7.        Dim EleX4 As Integer = 0
  8.        ListBox4.Items.Clear() 'Limpia el ListBox
  9.        For I1 As Integer = 0 To Elementos.Count - 1 : EleX += 1
  10.            For I2 As Integer = EleX To Elementos.Count - 1
  11.                For I3 As Integer = EleX To Elementos.Count - 2
  12.                    For I4 As Integer = EleX To Elementos.Count - 3
  13.                        For I5 As Integer = EleX To Elementos.Count - 4
  14.                            For I6 As Integer = EleX To Elementos.Count - 5
  15.                                If Elementos(I2) <> Elementos(I3) And Elementos(I3) <> Elementos(I2) < Elementos(I4) < Elementos(I5) Then
  16.                                    ListBox4.Items.Add(String.Format(Format1, Elementos(I1), Elementos(I2), Elementos(I3), Elementos(I4), Elementos(I5), Elementos(I6)))
  17.                                End If
  18.  
  19.                            Next
  20.                        Next
  21.                    Next
  22.                Next
  23.            Next
  24.        Next
  25.        MessageBox.Show("Combinaciones: " & ListBox4.Items.Count)
  26.    End Sub


estoy tratando de implentarle esta funcion pero no me sale

Código
  1. '//QUITAR ELEMENTOS REPETIDOS --------------------funciona bien con otra funcione con esta me da error
  2.        Dim nuevaLista As New List(Of Integer)
  3.        For Each elemento In ListBox4.Items
  4.            nuevaLista.Add(elemento)
  5.        Next
  6.  
  7.        nuevaLista = nuevaLista.Distinct.ToList() 'elimina repetidos
  8.        nuevaLista.Sort() 'Ordena la lista
  9.        ListBox4.Items.Clear() 'limpia el listbox (no funciona con DataSource)
  10.        'ListBox4.DataSource= Nothing 'usar solo si es se usó datasource para llenar el listbox
  11.        For Each Elemento As String In nuevaLista
  12.            ListBox4.Items.Add(Elemento)
  13.        Next


saludos
Luis



10  Foros Generales / Foro Libre / Re: Tema Coronavirus COVID-19. en: 22 Marzo 2020, 16:45
Una de las soluciones es cerrar a cal y canto las ciudades y mas donde no haya contagios ,cerrar Madrid y las grandes ciudades donde haya mayor contagio ,son soluciones drásticas pero hay mucho irresponsables que por escapar de Madrid han llevado la muerte a los pueblos donde generalmente vive gente mayor y la de mayor riesgo.

QUEDATE EN TU CASA

Luis
Páginas: [1] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ... 53
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines