Mensajes

Si el SO del ordenador es Windows 7 puede que te interese esto:
http://www.connectify.me

Un saludo,
Herio

Busca algoritmos XOR, RC4 y ROT que para VB6.0 hay modulos por todos lados 

Pues yo miraré primero el ROT (que me ha parecido/es lo más fácil) y luego... ya... si eso... el XOR ... 

Gracias ignorantev1.1, me sirvieron mucho tus aclaraciones...

Lo único que cambie será el último If (para que no me salga el uno)

Código (vb) [Seleccionar] Expandir

    If e = True And n1 <> 1 Then

Un saludo,
Herio

PD Espero que las tortillas de harina estuvieran buenas... 

[no logro ver qué falla]

Buenas;
Bien, pues estoy intentando hacer un código simple que muestre los números primos hasta un límite marcado por el usuario. No me interesan códigos que hagan esto, ya encontré una que funciona al 100%, la cuestión es que no logro ver qué falla en mi código... Sé que es muy fácil, pero llevo rato (y demasiado) intentado resolverlo.

Suponiendo que tengo un List1 (donde se mostrarán los números primos de la secuencia), un TextBox (aquí el usuario pondrá el número límite) y un Command1 (el cual realizará la acción al cliquear en él).

Código (vb) [Seleccionar] Expandir

Private Sub Command1_Click()
Dim n1 As Long
Dim n2 As Long
Dim e As Boolean
Dim i

    n1 = Text1.Text

While n1 > 0
    e = True
    n2 = n1 - 1

    For i = 2 To n2
        If n1 / n2 <> CInt(n1 / n2) Then
            e = False
        End If
    Next i
   
    If e = True Then
        List1.AddItem (n1)
    End If
   
    n1 = n1 - 1
Wend
End Sub

Le estaría muy agradecido a quien pudiera señalarme el fallo,
Gracias de antemano, un saludo
Herio

Tan interesante como el anterior, también le echaré un vistazo cuando tenga tiempo (aunque no entienda nada...).

Un saludo 
Herio

Le echaré un vistazo...
Gracias por comartirlo 

Un saludo,
Herio

StrReverse$() es demasiado simple y por tanto no costará nada sacarlo, en vez de en 10 s, lo sacarán en 12...

Por eso mismo tendré que investigar un poco sobre el tema... 

Un saludo,
Herio

Ya tengo qué hacer, voy a informarme sobre cómo cifrar strings... Pues creo que con el StrReverse no hago nada 

Un saludo,
Herio

[wifisn]

wifisn, quizás esto te interese:
http://www.dragonjar.org/recuperar-contrasenas-de-windows-vista-y-anteriores.xhtml
http://www.ubcd4win.com

No lo he probado, únicamente le heché un vistazo por encima, pero parece que es lo que necesitas...

Un saludo

PD Disponible para Windows 7, Vista y anteriores...

[eso]

Randomize dijo:

Tu sistema está mal...

Tú pásale el antivirus a tu computadora (y no te olvides del SUPERAntiSpyware), que no cuesta nada, es poco probable que sea algún malware el causante de ese problema pero se hace en un "ti-ta"... Si eso, limpia también el registro con, por ejemplo, CCleaner o TuneUp Utilities...

¿Que no tienen nada que ver? ... ¿Acaso cuesta algo hacerlo? Además, aprovechas para hacer eso (escanear) que no hiciste desde hace mucho, admítelo...


Un saludo,  
Herio