|
7312
|
Programación / .NET (C#, VB.NET, ASP) / Re: ¿cifrar?
|
en: 11 Marzo 2014, 15:03 pm
|
@KZN
Hola
Me gustaría aclararte que no tienes que preocuparte no incumples ninguna norma del foro por publicar urls de contenido educativo (Ej: "¿Como hacer...?") ya sea de temática Hacking, Cracking, Malware, o de lo que sea... siempre que no implique actos delictivos (Ej: "¿Como hackear el Facebook de tu novia?") (nótese la diferencia de ética).
Por otro lado, también quiero aclarar (aclarar, sin ánimo de ofender), que ese artículo que muestras no tiene nada que ver con esto, ahí se están bloqueando carpetas, no cifrando texto, y no usan ningún algoritmo, solo usan el comando Rename/Cacls del lenguaje de la utilidad Batch, mientras que aquí se está hablando del lenguaje C#.
PD: Porfavor, que alguien mueva esto a .NET para no atraer más confusiones por parte de otros usuarios.
Saludos!
|
|
|
7313
|
Programación / Scripting / Re: [AYUDA][VBS] Pasar varios argumentos en un acceso directo
|
en: 11 Marzo 2014, 12:38 pm
|
Ya te solucionaron el punto 2, respondiendo al punto 1 e diré que: Solo tienes que modificar el icono del tipo de archivo registrado como 'VBSFile': HKEY_CLASSES_ROOT\VBSFile\DefaultIcon Por el icono del tipo de archivo registrado como 'jpegfile': HKEY_CLASSES_ROOT\jpegfile\DefaultIcon Pero, óbviamente, este cambio requiere de un reinicio o relogueo del usuario actual. Otra forma de cambiar el icono, de forma permanente e inmediata, sería usar una utilidad (Ej: ExeScript Editor) para 'compilar' el archivo VBS en un EXE, y modificar el icono del archivo executable. Saludos
|
|
|
7314
|
Foros Generales / Foro Libre / Re: Alguna vez os ha pasado?
|
en: 11 Marzo 2014, 02:34 am
|
¿Es como cuando empiezas a quitarle el sujetador a una "hembra"? No, Rando, yo te explico: Por el día es más bien como cuando se te queda la hebilla del sujetador enganchada y no puedes desabrocharlo, a pesar de que has hecho ese movimiento de manos cientos de veces, pero la tensión del día no te deja hacerlo, y los nervios van en aumento, al llegar la noche, después de estar intentándolo todo el día, tu cerebro se relaja y por fin consigues quitar esa maldita hebilla, y de repente sientes ese momento de euforia por haberlo conseguido, y por el orgasmo que viene después ...que según el 'estudio psicológico' ese nos dice que dura hasta las 3 de la madrugada . Así que según datos científicos a mi me quedan 20 minutos de orgasmo para programar, pero mi cerebro está muy distraido viendo ' La que se avecina' xD. Saludos
|
|
|
7316
|
Programación / .NET (C#, VB.NET, ASP) / Re: ¿cifrar?
|
en: 11 Marzo 2014, 02:17 am
|
@CoolTesting Hola 1. Te hago saber que el foro tiene una sección de .NET, allí es donde debes publicar tus dudas relacionadas con CSharp ~> http://foro.elhacker.net/net-b62.0/.2. En tu código símplemente estás reemplazando caracteres, pero hay que tener en cuenta que lo estás haciendo siguiendo un patrón, el resultado queda codificado, y se puede revertir de forma inversa para decodificar, así que yo diría que si que se le puede llamar cifrado. 3. No se sí el código lo estás escribiendo por diversión, por aprender, o por que motivo, pero de todas formas te hago saber que .NET Framework pone a tu disposición Classes de algoritmos criptográficos (AES, DES, etc...) así como de Hashing (MD5) en el espacio de nombres 'Security.Cryptography'. ( lo tienes bien facil, vaya xD ) · System.Security.Cryptography Namespace Saludos!
|
|
|
7318
|
Foros Generales / Sugerencias y dudas sobre el Foro / Re: Mensaje dirijido a los usuarios del foro
|
en: 11 Marzo 2014, 01:48 am
|
Joder, nunca habia visto a CrazyKenny enfadado xD.
Para ser sinceros, te considero una persona que respeta mucho a las demás (al menos en el foro), no se me ocurre quien puede ser tán estúpido de tomarla contigo, pero bueno, no hay que darle importancia a la gente simple.
Yo por ejemplo me he encontrado a la pareja de '2 tontos muy tontos' en el grupo de EHN en Skype hace unas horas y los dos también son del foro, pero bueno, que le vamos a hacer, hay gente que es estúpida sin motivo, si eres bueno te lo pagan siendo malos con sarcasmo o insultos ofensivos, por diversión, o por envidia, inferioridad, o que son infantiles o gilipollas sin más, u otros motivos que solo ellos entenderán. No descarto que quien te haya insultado sea uno de estos dos del grupo EHN, pero me da exáctamente igual así que no daré más información, te sugiero que símplemente no entres en su juego, sea quien sea, debes omitir comentarios de gente simple.
Saludos!
|
|
|
7319
|
Programación / Scripting / Re: [Bat] Copiar Carpetas y Archivos USB
|
en: 10 Marzo 2014, 14:47 pm
|
puedo copiar manualmente, pero quiero hacerlo de forma oculta para que no se dean cuenta mis victimas Lo siento pero en el foro está prohibido pedir ayuda para cosas no éticas y/o que impliquen actos delictivos, como en este caso es, robar.Tema cerrado.PD: Puedes leer las reglas del foro en mi firma. Saludos!
|
|
|
7320
|
Programación / .NET (C#, VB.NET, ASP) / Re: enviar datos con WebRequest
|
en: 10 Marzo 2014, 14:41 pm
|
Kubox sabe más sobre este tema que yo, pero si la página no te carga... creo que sería una tontería hacer peticiones simultaneas desde la misma IP ya que ninguna te cargaría, creo. De todas formas, poder se puede, puedes usar el método HttpWebRequest.BeginGetResponse, que es asíncrono, pero también podrías enviar una única petición y esperar hasta que se realice corréctamente con un Do Until/While NotEl siguiente Snippet lo escribí hace mucho tiempo, se puede mejorar, pero siempre me ha funcionado bien, pruébalo. ''' <summary> ''' Determines whether a connectivity to an URL is avaliable. ''' </summary> ''' <param name="url">Indicates the URL.</param> ''' <param name="RetryInterval"> ''' Indicates the retry interval, in seconds. ''' Use "-1" to any interval.</param> ''' <param name="StatusControl"> ''' Indicates the status control. ''' If any control is specified, the status will be shown in Debug console. ''' </param> ''' <returns><c>true</c> if connectivity avaliable; otherwise, <c>false</c>.</returns> Private Function IsConnectivityAvaliable(ByVal url As String, Optional ByVal RetryInterval As Integer = -1, Optional ByVal StatusControl As Control = Nothing) As Boolean Dim NoNetworkMessage As String = "Network connection is not avaliable." Dim NoWebsiteMessage As String = "WebSite is not avaliable." Dim NoNetworkRetryMessage As String = "Network connection is not avaliable, retrying in {0} seconds..." Dim NoWebsiteRetryMessage As String = "WebSite is not avaliable, retrying in {0} seconds..." Dim YesNetworkMessage As String = "Network connection established." Dim YesWebsiteMessage As String = "WebSite connection established." Select Case My.Computer.Network.IsAvailable Case False ' No network device avaliable If RetryInterval = -1 Then ' Do not retry PrintNetworkStatus(NoNetworkMessage, StatusControl) Return False Else ' Retry For X As Integer = 0 To RetryInterval WaitNetworkStatus() PrintNetworkStatus(String.Format(NoNetworkRetryMessage, RetryInterval - X), StatusControl) Next X IsConnectivityAvaliable(url, RetryInterval, StatusControl) End If ' RetryInterval Case True ' Network device is avaliable ' Inform that network device is avaliable. PrintNetworkStatus(YesNetworkMessage, StatusControl) Try ' Try connect to the given url My.Computer.Network.Ping(url) ' Inform that Website connection is avaliable. PrintNetworkStatus(YesWebsiteMessage, StatusControl) Return True Catch ex As Net.NetworkInformation.PingException If RetryInterval = -1 Then ' Do not retry PrintNetworkStatus(NoWebsiteMessage, StatusControl) Return False Else ' Retry For X As Integer = 0 To RetryInterval WaitNetworkStatus() PrintNetworkStatus(String.Format(NoWebsiteRetryMessage, RetryInterval - X), StatusControl) Next X IsConnectivityAvaliable(url, RetryInterval, StatusControl) End If ' RetryInterval Catch ex As InvalidOperationException If RetryInterval = -1 Then ' Do not retry PrintNetworkStatus(NoNetworkMessage, StatusControl) Return False Else ' Retry For X As Integer = 0 To RetryInterval WaitNetworkStatus() PrintNetworkStatus(String.Format(NoNetworkRetryMessage, RetryInterval - X), StatusControl) Next IsConnectivityAvaliable(url, RetryInterval, StatusControl) End If ' RetryInterval End Try End Select End Function ''' <summary> ''' Prints the network status. ''' </summary> ''' <param name="Message">Indicates the Status message.</param> ''' <param name="StatusControl">Indicates the control to print the connection Status.</param> Private Sub PrintNetworkStatus(ByVal Message As String, Optional ByVal StatusControl As Control = Nothing) If StatusControl IsNot Nothing Then StatusControl.Invoke(Sub() StatusControl.Text = Message) Else End If End Sub ''' <summary> ''' Waits an interval before trying to reconnect. ''' </summary> ''' <param name="WaitPeriod">Indicates the wait interval, in ms.</param> Private Sub WaitNetworkStatus(Optional ByVal WaitPeriod As Integer = 1000) Threading.Thread.Sleep(WaitPeriod) End Sub
Ejemplo de uso: Private Sub Test() Handles MyBase.Load Dim t As New Threading.Thread(AddressOf CheckConnectivity) t.Start() End Sub Private Sub CheckConnectivity() Do Until IsConnectivityAvaliable("sqwertyqwertyqwerty.com", 10, Label1) Application.DoEvents() Loop ' Enviar POST aquí... End Sub
Saludos
|
|
|
|
|
|
|