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


Tema destacado: Únete al Grupo Steam elhacker.NET


  Mostrar Mensajes
Páginas: 1 ... 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 [976] 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 ... 1253
9751  Programación / .NET (C#, VB.NET, ASP) / Re: Buscar cadenas de texto dentro de un archivo en: 5 Febrero 2013, 16:43 pm
como Elektro cerro el tema pues abro este.
Yo no lo cerré, no soy moderador de esta sección, también me cerraron mi post por desgracia.



Código
  1.        Dim Texto As String = My.Computer.FileSystem.ReadAllText("C:\Archivo.txt")
  2.        Dim Pos As Integer = InStr(Texto, "String")
  3.        MsgBox(Pos)


Código
  1.        Dim Text_Pos As String = InStr(My.Computer.FileSystem.ReadAllText("C:\Archivo.txt"), "String")
  2.        MsgBox(Text_Pos)
9752  Programación / .NET (C#, VB.NET, ASP) / Re: [APORTE] Snippets !! (Posteen aquí sus snippets) en: 5 Febrero 2013, 03:05 am
Para cambiar los cursores de Windows (En el sistema, fuera del form)

Código
  1. #Region " Set System Cursor Function "
  2.  
  3.    ' [ Set System Cursor Function ]
  4.    '
  5.    ' Examples :
  6.    '
  7.    ' Set_System_Cursor("C:\Cursors\Arrow.ani", System_Cursor.ARROW))
  8.    ' MsgBox(Set_System_Cursor("C:\Cursors\Cross.cur", System_Cursor.CROSS))
  9.  
  10.    ' Set System Cursor [ API declarations ]
  11.    Private Declare Function SetSystemCursor Lib "user32.dll" (ByVal hCursor As IntPtr, ByVal id As Integer) As Boolean
  12.    Private Declare Function LoadCursorFromFile Lib "user32.dll" Alias "LoadCursorFromFileA" (ByVal lpFileName As String) As IntPtr
  13.  
  14.    ' Set System Cursor [ API Constants ]
  15.    Private Enum System_Cursor As UInt32
  16.        APP_STARTING = 32650
  17.        ARROW = 32512
  18.        CROSS = 32515
  19.        HAND = 32649
  20.        HELP = 32651
  21.        I_BEAM = 32513
  22.        NO = 32648
  23.        SIZE_ALL = 32646
  24.        SIZE_NESW = 32643
  25.        SIZE_NS = 32645
  26.        SIZE_NWSE = 32642
  27.        SIZE_WE = 32644
  28.        UP = 32516
  29.        WAIT = 32514
  30.    End Enum
  31.  
  32.    ' Set System Cursor [ Function ]
  33.    Private Function Set_System_Cursor(ByVal Cursor_File As String, ByVal Cursor_Type As System_Cursor) As Boolean
  34.        If SetSystemCursor(LoadCursorFromFile(Cursor_File), Cursor_Type) = 0 Then Return False ' Error loading cursor from file
  35.        Return True
  36.    End Function
  37.  
  38. #End Region




Hotmail sender (Envía correos desde hotmail)

* Es necesario descargar la librería EASENDMAIL (Es gratis aunque se puede comprar licencia): http://www.emailarchitect.net/webapp/download/easendmail.exe  

PD: Sé que esto se puede hacer con la class system.net.mail, pero con esto no dependemos de puertos, y el SSL de los servidores que usemos en la librería se detecta automáticamente...

Código
  1. #Region " Hotmail Sender Function "
  2.  
  3.    ' [ Hotmail Sender Function ]
  4.    '
  5.    ' // By Elektro H@cker
  6.    '
  7.    ' * First add a reference to "EASendMail" into the project.
  8.    '
  9.    ' Examples :
  10.    '
  11.    '  MsgBox(Hotmail_Sender("ElektroHacker@hotmail.com", "MyPass", "Anonym@gmail.com", "Test subject", "Test body", {"C:\File1.txt", "C:\File2.txt"}))
  12.  
  13.    Private Function Hotmail_Sender(ByVal Account_User As String, ByVal Account_Password As String, ByVal Mail_To As String, ByVal Mail_Subject As String, ByVal Mail_Body As String, Optional ByVal Mail_Attachments() As String = Nothing) As Boolean
  14.  
  15.        Dim Hot_Mail As New EASendMail.SmtpMail("TryIt")
  16.        Dim Hot_Server As New EASendMail.SmtpServer("smtp.live.com")
  17.        Dim Hot_Smtp As New EASendMail.SmtpClient()
  18.  
  19.        Hot_Server.User = Account_User
  20.        Hot_Server.Password = Account_Password
  21.        Hot_Server.ConnectType = EASendMail.SmtpConnectType.ConnectSSLAuto
  22.  
  23.        Hot_Mail.From = Account_User
  24.        Hot_Mail.To = Mail_To
  25.        Hot_Mail.Subject = Mail_Subject
  26.        Hot_Mail.TextBody = Mail_Body
  27.        If Mail_Attachments IsNot Nothing Then For Each Attachment In Mail_Attachments : Hot_Mail.AddAttachment(Attachment) : Next
  28.  
  29.        Try : Hot_Smtp.SendMail(Hot_Server, Hot_Mail) : Return True
  30.        Catch ex As Exception : Return False : End Try
  31.  
  32.    End Function
  33.  
  34. #End Region
9753  Programación / .NET (C#, VB.NET, ASP) / Re: ¿Como monitorizar unidades de dispositivos PENDRIVE? en: 5 Febrero 2013, 01:14 am
Keyen, muchas gracias por la info, a pesar de que ahora pienses que soy un vago quizás por culpa de lo que siempre anda comentando spiritdead... a mi cualquier información que me den me sirve para empezar, y no te preocupes que buscaré.

Me dejas bastante perdido porque yo siempre he usado la API de windows para realizar funciones y cambios, sin necesidad de hacer gran cosa, pero no para recibir/interceptar/monitorizar datos, y no sé si será tán fácil como almacenarlo en una variable cada cierto tiempo para comprobar el valor del resultado y ya está, pero bueno, ya lo busco.

Saludos
9754  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 5 Febrero 2013, 00:58 am
si fuera novlucker ya estubieras baneado te lo digo claro

Pero no lo eres, y eso es lo que diferencia a moderadores de usuarios:
Novlucker: madurez + buen juicio + saber hacer
Tú: payasadas + insultos + amenazas (en resumen, lo que se denomina como "troll", sin odenfer)

Tranquilo, que por suerte nunca serás moderador por esa personalidad.

Y con esto me despido de esta discusión,
saludos.
9755  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 5 Febrero 2013, 00:51 am
si muy bien spiritdead, yo ya sabía que la class system.io tiene methods que lo hacen mucho más extensivo que usar my.computer.filesystem, que este último se queda corto en "opciones", y también sé que downloadfile necesita escribir mediante un stream, que no hace mágia, vale, pero no por eso yo iba a ser adivino y saber que es una mala práctica usar my.computer, porqué lo vi en los snippets de Microsoft al empezar en VB.NET, que como te recuerdo, llevo poco tiempo,
y cuando ves que en la propia información del VS usan my.computer para todo, tanto tu, como yo, y cualquiera, tendería a pensar que está ahí porque es lo más correcto, no lo más sencillo, ahora, gracias por la aclaración, a pesar de tus insultos.

Saludos.
9756  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 5 Febrero 2013, 00:40 am
Puedes intentar putear todo lo que quieras, es lo que hacen los payasos, pero ahora díme, de entre todas las gilipolleces que acabas de decirme, ¿que tiene que ver con lo de ponerse a investigar cosas que uno no sabe que tiene que investigarlas?, ¿también eres mago aparte de payaso?.

Saludos
9757  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 5 Febrero 2013, 00:21 am
Y como esperabas que me pusiera a investigar en Google "¿Es mejor system.io que my.computer"? así porque sí sin venir a cuento, si la primera referencia que he tenido de dicha diferencia es ahora mismo por parte de Keyen?,
¿Acaso tu buscas las cosas cuando no sabes ni siquiera que necesitas buscarlas?,
creo que tu tampoco sabes mucho lo que dices cuando te pones a criticar, spiritdead.

saludos
9758  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 5 Febrero 2013, 00:13 am
al igual que métodos como My.Computer.FileSystem tienen su uso correcto en System.IO, entre otros ejemplos.

Hola,
no quiero poner en duda lo que dices Keyen, porque te considero muy avanzado en .NET, pero al leer eso, pienso que más que ser de uso incorrecto en realidad es una simple preferencia de gustos, por una contundente razón:
  • Los snippets originales que incorpora el VS, usan My.Computer. para casi todo, en lugar de usar System.IO. u otros métodos como tu indicas.
Y por esa razón, pienso que los propios desarrolladores del VisualStudio no habrían empleado malas prácticas para sus propios snippets... ¿No estás deacuerdo conmigo?.

Sé que no tiene mucho que ver con el tema de este post, pero bueno, cualquier lugar es bueno para aprender algo, por eso te quiero preguntar, ¿Es más bien una cuestión de gustos, o en realidad se considera una mala práctica el uso de My.computer.?, ¿Puedes dar más datos de porqué se considera una mala práctica?

Gracias por leer.
9759  Programación / Scripting / Re: ¿Cual es el lenguaje scripting mas rapido? en: 4 Febrero 2013, 23:46 pm
Los lenguajes de scripting no se pueden compilar, se interpretan (añades el intérprete + tu script, lo juntas todo en un .exe y tachán), así que la velocidad en ese aspecto es la misma, porque se usa el intérprete en los dos casos xD, aunque al ""compilar"", el código y las librerías que uses tienen que descomprimirse a una carpeta temporal, y eso puede ralentizar bastante el tiempo de inicio de ejecución si se trata de librerías muy pesadas de tamaño.

Sobre lo otro, al menos yo no te lo puedo aclarar al 100%, pero sin duda alguna Batch es el más lento de la lista, porque tiene que usar executables para casi todo, y porque es procesamiento por lotes.

Siempre he escuchado que el más veloz es Perl, aunque debe estar bastante equilibrado Perl/python/ruby,
Pero de todas formas no tiene mucha importancia si python/perl/ruby es más rápido o más lento, si la idea es programar aplicaciones no vas a notar la diferencia entre uno y otro... (Menos en Batch, ahí si que se nota mucho).

Pero si se quiere conseguir el máximo performance para usar python/ruby/perl en programación web, eso ya me parece más útil, y hay varios tests en Google:

Citar
Código:
Ruby vs. Python: Web Performance

Everything was benchmarked by running multiple iterations of apache-bench from the terminal on my MBP. I used Green Unicorn as my test WSGI server, and Thin for Rack apps.

WSGI (PyPy 1.6.0): ~5300 req/sec
WSGI (Python 2.6.1): ~3200 req/sec
WSGI (Python 2.7.2): ~3000 req/sec

Rack (Ruby 1.9.2 MRI):  ~4500 req/sec
Rack (Ruby 1.8.7 MRI): ~4050 req/sec

Rawr/WSGI (PyPy 1.6.0): ~4900 req/sec
Rawr/WSGI (Python 2.6.1): ~2750 req/sec
Rawr/WSGI (Python 2.7.2): ~2700 req/sec

Sinatra/Rack (Ruby 1.9.2 MRI): ~1900 req/sec
Sinatra/Rack (Ruby 1.8.7 MRI): ~1399 req
/sec


EDITO: Aquí tienes otro test Ruby 1.9 vs Python 3, algunas cosas las procesa más rápido Ruby, y en otras Python: http://benchmarksgame.alioth.debian.org/u32/benchmark.php?test=all&lang=yarv&lang2=python

Un saludo.
9760  Programación / .NET (C#, VB.NET, ASP) / Re: Hacer que un Form se descargue un archivo a traves de cadenas de texto: en: 4 Febrero 2013, 21:31 pm
yo me registre el primero de los 3 y mira lo que se :P

Nah, yo os gano a los dos,
Creo que no conoces a mi otro yo en el foro, un tál Pitoloko registrado en el 2009, con 2.500 mensajes.
http://foro.elhacker.net/profiles/pitoloko-u345950.html

PD: Ya me podrían sumar todos esos mensajes a esta cuenta, tener +5.000 mensajes en el perfil tiene que acojonar bastante x'D

Saludos x'DDD
Páginas: 1 ... 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 [976] 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 ... 1253
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines