miércoles, 26 de noviembre de 2014

Obtener ID de último registro insertado en mysql

Si utilizan mysql y desean obtener el último ID autonumérico o autogenerado por la inserción de una fila a una tabla para luego procesarlo como FK en otra tabla relacionada, pueden usar la función:

LAST_INSERT_ID()
Por ejemplo:

SELECT last_insert_id() AS UltCod;

Otra alternativa es:
SELECT @@IDENTITY FROM MyTable;

martes, 7 de octubre de 2014

DataGridViewComboBoxColumn

Para contar con una columna del DataGridView con un estilo tipo ComboBox:

 


Para enlazar el DataGridViewComboBoxColumn de un DataGridView el enlace es similar al de un ComboBox:


El código en el recuadro es como se accede a la columna DataGridViewComboBoxColumn del DataGridView correspondiente (columna 3 en mi caso) para hacer las asignaciones de la data al Combo.

Para complementar (esta parte es similar al enlace de un ComboBox tradicional:


viernes, 10 de mayo de 2013

Duplicar formularios en vb. net 2010

Para hacer formularios iguales o muy similares al estar desarrollando una aplicación:
1.- En el EXPLORADOR DE SOLUCIONES activar la vista MOSTRAR TODOS LOS ARCHIVOS.
2.- Desplegar del formulario que se va a copiar, para acceder a archivo Designer.vb.

3.- En este archivo (en mi caso frmProcedencia.Designer.vb), copiar desde la subrutina InitializeComponent hasta el final de la clase

4.- Crear el nuevo formulario y acceder a su archivo Designer.vb y seleccionar desde la subrutina InitializeComponent hasta el final de la clase.

5.- Reemplazar lo seleccionado con con lo copiado en el punto 3. Listo!!!. El formulario frmProcedencia está copiado en un nuevo formulario



jueves, 19 de julio de 2012

Problemas al leer letras con tíldes de archivos en vb.net

Para evitar que al leer un archivo las letras que tienen tíldes (á, í, ñ, ã, etc.) estas aparezcan como símbolos diferentes al caracter correspondiente, algo como se aprecia a continuación:

Se debe agregar al constructor StreamReader/Writer cualquiera de las siguientes opciones como segundo argumento.

  • Encoding.GetEncoding(1252) 
  • Encoding.GetEncoding(28591) 
  • Encoding.Default 
algo así:

Dim vArchivo As New StreamReader("D:\Procesa Textos\stoplist\stoplist_espanol.txt",
Encoding.Default)

Y obtendremos el resultado adecuado:
Otra alternativa seria tener el archivo guardado en UNICODE, por ejemplo si el archivo es de texto al momento de guardarlo con el bloc de notas elegir en codificacion UNICODE.

miércoles, 11 de julio de 2012

Ocultar cursor (parpadeante) en visual basic .net 2010

A continuaciòn el código para ocultar el cursor en un TextBox o MaskedTextBox en Visual Basic 2010:

Private Declare Function HideCaret Lib "user32" (ByVal hwnd As Integer) As Integer
Private Sub txtResumenArtRevista_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtResumenArtRevista.GotFocus
HideCaret(txtResumenArtRevista.Handle)
End Sub