Mensajes

El error está en la concatenación de strings...

Código [Seleccionar] Expandir

RegKey & "ProcessorNameString"

...Eso equivale a: "HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0ProcessorNameString". Le falta un backslash para separar el nombre del valor, del nombre de la subclave.

Saludos

Eso es UN INSULTO.

FALSO, no existe absolutamente ninguna relación directa entre radiaciones no ionizantes y problemas de salud. Por lo general son otras patologías médicas.
Físicamente es IMPOSIBLE que nuestro organismo distinga una señal wifi que cualquiera de las miles de millones en todo el espectro electromagnético que nos invade diariamente.

Para mi, el insulto de verdad es la extrema soberbia que muestran aquellos quienes defienden la supremacía de la opinión científica en todas las circunstancias sin excepción. Ese comportamiento es algo que podría llegar a nublar el juicio como ser humano y ralentizar el progreso en el conocimiento humano...

...Por que en no pocas ocasiones, por médicos/científicos que se limitan a decir "FALSO" es que mueren personas inocentes.

Lo de la alergía al Wi-Fi en un principio no será tan desestimable como tu te piensas cuando recuerdo que a raiz de la noticia del suicidio una universidad decidió llevar a cabo un experimento para determinar si era posible o no. No lo demostraron evidentemente (no recuerdo nada de los resultados ni lo que dijeron), pero al menos estimaron la posibilidad como buenos científicos... le dieron el beneficio a la duda en lugar de sencillamente rechazarlo sin más y llamarlo "FALSO" por sus creencias y las creencias de la comunidad científica.

Saludos

sobre el caso de la chica poco se habla de la autopsia...

por otro lado... por qué al wifi y no al radio y tv? digo una antena de radio tiene transmisiones en los orden de las decenas de KW en comparación al wifi que está en las cientos de mW, es decir, una antena de tv o radio puede tener una potencia de 30.000W mientras que una de wifi 0.3W, un wifi no se detecta a más de 300m, una señal de radio puede llegar a 300Km

Jopé, de verdad no es mi intención desviar el tema, pero déjame responderte:

Para responder a tus preguntas creo que primero habría que ser un científico capacitado, y retroceder en el pasado para investigar los síntomas que decía sufrir esta chica... hay videos de la madre explicando los síntomas, pero no los recuerdo bien. Lo que si recuerdo es que la chica si que afirmaba que también sentía malestar cerca de las antenas grandes, y que en su casa sus padres no usaban aparatos electrónicos (no recuerdo cuales) para no dañar a su hija.

Además lo de esa niña no fue el único caso conocido, existe una mujer adulta que tambien afirmó tener alergia a las ondas del Wi-Fi:

[youtube=640,360]https://www.youtube.com/watch?v=AUrvPi79gus[/youtube]

Y déjame decirte que cosas más raras se han visto en este mundo, como la supuesta alergia al Sol o luz del Sol:

[youtube=640,360]https://www.youtube.com/watch?v=KYyOai2R7q8[/youtube]

...O la supuesta alergia al Agua:

[youtube=640,360]https://www.youtube.com/watch?v=D7aF3HvXMVM[/youtube]

PD: Al parecer no hay casos conocidos (o al menos yo no los encuentro) de niños u hombres adultos que hayan sufrido estas alergias. Quizás podría ser un indicativo de que estos síntomas solo se producen en el sexo femenino, pero eso ya es especulación, lo sé, no soy médico. Siempre cabe la posibilidad de que quizás sean enfermedades psicológicas o sean padres/madres que utilizan a sus hijos para ganar fama y dinero por unos minutos... ¿quien sabe?.

Saludos!

[Outlook]

No entiendo mucho lo que pone en ese mensaje que esta todo en Ingles la verdad, pero donde te metes para que te lleguen correo de Iluminatis ?  

Perdón, modificaré mi mensaje de arriba para colocar también el texto y que la gente que quiera lo pueda traducir facilmente en Google Translate.

Basicamente lo que el e-mail dice es que me dan la oportunidad de unirme a la élite de los Illuminati, y que si lo hago me enviarán 2 millones de dólares mensualmente y también podré elegir la casa que me plazca en la parte que sea del mundo para vivir como un rey xD. También dice los beneficios de unirse al grupo de los Illuminati, entre ellos: fama, dinero, y lo mejor de todo: "protección espiritual" jajajajajajjaja.

Es la primera que lo veo ese tipo de correos.

Yo jamás habia visto un e-mail de estafa tan...absurdo. La verdad es que no sé en que tipo de..."parámetros" se habrán basado para determinar que yo podría ser un buen objetivo para enviarme un e-mail haciéndose pasar por los Illuminati...

...¿Quizás exista una base de datos de e-mails en el mercado negro de personas registradas en páginas relacionadas con la conspiración (N.W.O) donde habrán sacado mi e-mail? xD, ni idea, pero es alucinante solo de pensarlo.

¿Y se supone que existe alguien que caiga en esta trampa?. Hay que ser mongolo, pero mucho. ...Unirse a los illuminati dicen, jajaja es que vaya crack quien escribió esta mierd@.

Yo cuando me llega mensajes de correos no deseado, ni lo abro los bloqueo la dirección directamente.

Yo suelo acceder a la bandeja de SPAM de Outlook y leerme los mensajes de SCAM para ayudar con mi granito de arena a detener la cybercriminalidad reportando suplantaciones de identidad. Los reportes se le notifican al servicio de Microsoft y si se dan como válidos entonces no me vuelven a llegar más correos de la misma dirección y se supone que tampoco deberían llegarle a los demás. Y supongo que Microsoft reportará esos e-mails a la policia, F.B.I o algo parecido.

Es una humilde manera de llevar a cabo una pequeña (muy diminuta) contribuición a mi seguridad y a la de todos los usuarios de Internet.

Aquí tienes más info para ti o para quien quiera saber más:

• Recognize and Report Email Phishing Scams | microsoft.com

( lo siento, el artículo solo está disponible en Inglés. )

Saludos!

[ninguna de estas presenta un riesgo para la salud...]

la señal wifi produce una radiación no ionizante y de muy baja potencia, menos de 0.1% de la que te alcanza de señales de radio, telefono y televisión*... a ñpesar de eso ultimo, ninguna de estas presenta un riesgo para la salud...

No hay ningún estudio científicamente avalado que indique que la radiación de las señales de estos aparatos (televisión, móvil, router... etc) sea perjudicial.

Esa es la opinión oficial de la Ciencia, pero creo que no se debe desestimar la posibilidad de que exista una alergia a las señales Wi-Fi que podría afectar a una minoria de la humanidad. ¿O es que tan pronto se han olvidado del caso de la niña de 15 años que se suicidó por que ella afirmaba tener jaquecas y malestar físico al estar cerca de señales Wi-Fi y nadie en su instituto la creian y todo el mundo se burlaba de ella?...



...Puede haber sido una vida inocente perdida por la incredulidad de la Ciencia y el maltrato psicológico de la sociedad ante enfermedades desconocidas.

Miren, aunque no esté científicamente demostrado y yo no soy quien para saber si el caso fue real o simplemente una enfermedad psicológica, aun así me veo en la responsabilidad moral de ofrecer estos datos como información alternativa a la opinión científica:

• Electromagnetic hypersensitivity | Wikipedia
• Wi-Fi 'Allergies': Is Electromagnetic Hypersensitivity Real? | livescience.com
• Mother claims wifi allergy killed her daughter and accuses school of failing to safeguard children | telegraph.co.uk

Saludos

Hola.

Hoy me ha llegado este e-mail de SCAM (estafa) a mi correo, me he partido la caja mientras lo leia... es muy absurdo y divertido XDDD y me ha parecido bien compartirlo aquí con ustedes para que se echen unas risas.

Todos sabemos que hay muchos tipos de mensajes de SCAM, como por ejemplo el del premio de la lotería, o suplantadores de Paypal, o el e-mail del señor africano multimillonario que no sabe qué hacer con su dinero y te lo regala, y en fin... hay muchos mensajes, y luego está esto otro que se sale de todos los estándares:





El texto en Inglés por si lo quieren traducir a otro idioma:

Greetings, welcome to The illuminati World.
Bringing the poor, the needy and the talented to limelight of fame and
riches. Get money, fame, powers, security, get recognized in your business,
political race, rise to the top in whatever you do, be protected
spiritually and physically! All these you will achieve in a twinkle of an
eye when you get initiated into the GREAT ILLUMINATI EMPIRE. Once you are
initiated to THIS GREAT EMPIRE, you will have numerous benefits.
join the Illuminati brotherhood cult today and get instant rich sum of US$2 million dollars monthly salary payment, and a free home anywhere of your choice to live in this world, This are one out of the numerous benefit that are given to our newly recruited members.

Note that this email was created solely for the purpose of our recruitment scheme which will end next month and this offer is meant for unique ones only.

Do you agree to be a member of this illuminati new world order?
if you do, Kindly reply us back via our direct recruitment email only at: illuminatiofficial@qq.com
The Illuminati.

PD: ¿Y ahora se supone que debo reportar el e-mail como suplantación de identidad de Los Illuminati reales?

Saludos!

[Dictionary]

y necesito obtener el valor de cuantos [1] y cuantos [2] hay en la lista.

¿Cómo dices, la cantidad de "[1]" y [2]" en total?. y ¿VB6, o VB.NET?.

Simplemente puedes iterar los elementos y hacer un substring para quedarte con el número/cantidad, y entonces utilizar cualquier tipo de contenedor para ir almacenando y sumando las coincidencias de cada número/cantidad. Te muestro un ejemplo escrito en VB.NET donde utilizo la colección de tipo Dictionary:

Código (vbnet) [Seleccionar] Expandir

Dim amountsDict As New Dictionary(Of Integer, Integer)(EqualityComparer(Of Integer).Default)

For Each item As String In Me.ListBox1.Items
   Dim amount As Integer = CInt(item.Substring(item.LastIndexOf(" "c) + 1).Trim({"["c, "]"c}))

   If Not amountsDict.ContainsKey(amount) Then
       amountsDict.Add(amount, 1)
   Else
       amountsDict(amount) += 1
   End If
Next item

For Each pair As KeyValuePair(Of Integer, Integer) In amountsDict
   Console.WriteLine("Count of ""[{0}]"": {1} ", pair.Key, pair.Value)
Next pair

Resultado de ejecución:

Count of "[1]": 4
Count of "[2]": 3

...De todas formas, ¿por que estás utilizando un ListBox para empezar?. La funcionalidad de un ListBox es representar un único elemento, sin embargo tú estás intentando representar dos cosas distintas al mismo tiempo: elemento y cantidad/número, por lo tanto deberías utilizar otro control más apropiado para representar la información de forma adyacente pero individual, como por ejemplo ListView o DataGridView.

Saludos.

[especifica]

programita que reduzca el tamaño de muchas imagenes

¿Tamaño en disco (bytes), o tamaño (dimensiones) de la imagen?.   No somos adivinos, especifica. Ya me canso de repetirlo (la falta de información precisa)... en serio. :-/



Para reducir el tamaño en disco te recomiendo utilizar un programa llamado File Optimizer:

• https://sourceforge.net/projects/nikkhokkho/files/FileOptimizer/

Esta aplicación nos permite simplificar y automatizar la tediosa labor de reducir el tamaño de imágenes, que para un uso profesional (web, software) lo que hariamos sería pasar la imagen por un elaborado procedimiento de varios programas command-line previamente configurados hasta obtener el resultado esperado. File Optimizer Internamente utiliza las herramientas command-line más eficientes y reconocidas a nivel mundial para reducir el tamaño de imágenes (y otros muchos tipos de formatos de archivo) sin pérdida de calidad notable. Programas como: optipng, PngOptimizer o ImageMagick entre otros.





Para reducir (redimensionar) el tamaño de una imagen, mi programa favorito es Light Image Resizer:

• http://www.obviousidea.com/windows-software/light-image-resizer/

...¿Por qué?, por la cantidad de parámetros configurables que entre otras cosas nos permite redimensionar solo aquellas imágenes que realmente necesiten ser redimensionadas.



El único inconveniente (si eres de los que respetan la ley y prefieren no descargar..."medicinas") es que es un software comercial.

Saludos.

Esta pregunta me resulta algo inverosimil por parte de una madre en la época en la que vivimos, pues como ya han dicho:

Lo raro sería que no viese porno

deja de preocuparte, el chico esta en la edad, tiene curiosidades, y las niñas de su edad ya van tres pueblos por delante de el.

...Igual la madre podría estar hablando de páginas de gore/violencia extrema y no de sexo. En ese caso entendería la precoupación, pero de lo contrario... preocuparse por que un chaval de 15 años vea páginas XXX... ¿en serio? xD, si es lo más normal del mundo. Cuando el chaval encuentre pareja estable y pueda mantener una relación sexual diaria o semanálmente entonces ya no necesitará ver muchachas desnudas por Internet...

Saludos!

[How to: Catch an Exception in Visual Basic | MSDN]

Las preguntas sobre Visual Basic.NET debes publicarlas en el foro de .NET, no en el de Visual Basic 6.

Por favor, aclara si tu pregunta es sobre VB6 o VB.NET, ya que has preguntado por keywords o palabras clave de ambos lenguajes... y otros términos que diréctamente no existen ("NUMBER", "DESCRIPTION" ...¿?)



Todo lo que necesitas saber con ejemplos incluidos está en la documentación oficial de Microsoft...

• How to: Catch an Exception in Visual Basic | MSDN
• Try...Catch...Finally Statement | docs.microsoft.com
• Try...Catch...Finally Statement | MSDN
  
• How to: Throw an Exception in Visual Basic | MSDN
• Throw Statement | docs.microsoft.com

+

• Marshal.ThrowExceptionForHR() Method| MSDN

PD: La sentencia On Error Go To / Resume Next es de VB6 antiguo. Es algo obsoleto, un modo desestructurado de controlar excepciones que ni por asomo se te debería pasar por la cabeza aplicarlo en la programación de un código VB.NET.



Aunque ahí arriba tienes muchos ejemplos de uso, de todas formas he escrito este mini ejemplo por si te sirve:

Código (vbnet) [Seleccionar] Expandir

Dim filepaths As String() = {
   "C:\qwerty.file",
   "C:\ratatata.txt",
   "C:\Windows\Explorer.exe"
}

Dim fs As FileStream = Nothing

For Each filepath As String In filepaths
   Try
       fs = File.Open(filepath, FileMode.Open, FileAccess.ReadWrite)

       ' Controla la excepción de tipo 'FileNotFoundException' solamente cuando el nombre del archivo implicado es "C:\qwerty.file".
   Catch ex As FileNotFoundException When ex.FileName = "C:\qwerty.file"
       MessageBox.Show("Catch ex As FileNotFoundException When ex.FileName = ""C:\qwerty.file""" & Environment.NewLine & ex.Message())

       ' Controla las demás excepciones de tipo 'FileNotFoundException'.
   Catch ex As FileNotFoundException
       MessageBox.Show("Catch ex As FileNotFoundException" & Environment.NewLine & ex.ToString())

       ' Controla la excepción de tipo 'IOException' solamente cuando el código de error H_RESULT es 'ERROR_SHARING_VIOLATION'.
   Catch ex As IOException When ex.HResult = &H80070020
       MessageBox.Show("Catch ex As IOException When ex.HResult = &H80070020" & Environment.NewLine & ex.Message())

       ' Controla las demás excepciones de tipo 'IOException'.
   Catch ex As IOException
       MessageBox.Show("Catch ex As IOException" & Environment.NewLine & ex.Message())

       ' Controla el resto de posibles excepciones. ( Todas las excepciones derivan de la clase 'System.Exception'. )
   Catch ex As Exception
       MessageBox.Show("Catch ex As Exception" & Environment.NewLine & ex.Message())

       ' Nota: las instrucciones del bloque 'Finally' se ejecutarán al terminar la ejecución del bloque 'Try/Catch',
       ' por lo que podemos (y debemos) utilizar este bloque para asegurarnos de liberar recursos acumulados en el bloque 'Try'.
   Finally
       If (fs IsNot Nothing) Then
           fs.Dispose()
       End If

   End Try
Next filepath

Saludos.