Category Archives: Vb.net

Cómo llenar un datatable sin usar un datasource (dinámico) vb.net

En muchas ocasiones tengo que llenar un datatable dinámicamente por lo general obteniendo la data de información que un usuario llena o si viene de una fuente que no puede ser transformada a datatable. Esta es la solución: Dim dt As New DataTable dt.Columns.Add(“cuenta”) dt.Columns.Add(“nombre_cuenta”) dt.Columns.Add(“nombre”) dt.Columns.Add(“apellido”) dt.Columns.Add(“celular”) Dim dr As DataRow = dt.NewRow dr(“cuenta”)… Read More »

Cómo acceder URL con certificado no valido

Realizando un “robot” que accede un URL utilizando Net.HttpWebRequest sobre https que no tiene un certificado de una autoridad certificadora me tope con el siguiente error: System.Net.WebException: The underlying connection was closed: Could not establish trust relationship for the SSL/TLS secure channel. Solución: Sólo se debe agregar la siguiente línea. ServicePointManager.ServerCertificateValidationCallback = Function(sender As Object,… Read More »

Cómo obtener los valores seleccionados de un listbox

En el evento que se necesite saber que opciones multiples selecciona un usuario en un listbox debemos hacer lo siguiente: Solución: ‘Nuestro listbox se llam lst_test Dim tp As DataRowView For Each tp In lst_test.SelectedItems MsgBox(tp.Row(1).ToString) Next Row(1) nos devuelve el displaymember Row(0) nos devuelve el valuemember.

Como obtener el ID del CPU en vb.net

Estoy protegiendo un software para lo cual necesito obtener el id único del cpu de la máquina que lo utilizará, para esto desarrollé esta pequeña función: Solución: Imports System.Management Private Sub obtener_id() Dim objMOS As ManagementObjectSearcher Dim objMOC As Management.ManagementObjectCollection Dim objMO As Management.ManagementObject objMOS = New ManagementObjectSearcher(“Select * From Win32_Processor”) objMOC = objMOS.Get For… Read More »

Enviar correo gmail desde vb.net

En muchas ocasiones no queremos utilizar nuestro servidor para enviar correos por lo que recurrimos a nuestro viejo amigo google. He aqui como enviar un correo utilizando una cuenta de gmail: Solución: Imports System.Net.Mail ‘referencia Public Sub enviar_mail(ByVal i_de As String, ByVal i_para As String, ByVal asunto As String, ByVal mensaje As String) Dim insMail… Read More »