HOLA TARINGUEROS COMO LES VA BUENO AQUI DENUEVO HACIENDO
UN
MINI TUTO O TIPS O COMO QUIERAN LLAMARLE.. DE COMO AUTOGENERAR
UN
CODIGO O
ID
DANDO CLICK
EN
UN
BOTON NUEVO O NEW ya que aqui
en
taringa no lo he visto o no lo han hecho pues aki lo publico
BIEN este tema es mas relacionado para los programadores que se inician en diferentes plataformas.. en este kaso hablo del VS.NET
se han preguntado algunas vez cuando insertan datos a una base de datos sql que se autogenere cada vez ke das click osea :
SUPONGAMOS K KEREMOS INGRESAR A LA BASE DE DATOS UN PRODUCTO XXX y este tendra un codigo
que hara referencia a este producto entonces le pondremos PRO00000 y si insertarmos otro tendria que ser PRO00001 y asi
sucesivamente.. PRO00003,PRO00004....
OJO:
BIEN para esto uds ya tendran que estar conectados a su base de datos asi que obviamos este paso en mi kaso utilizare SQL2000 o tb pueden usar SQL 2005 ETC..
1.) una vez dentro del formprincipal CREAMOS UN BOTON QUE SE LLAMARA NUEVO (btnnuevo) Y otro que se llamara GUARDAR(btnguardar).
2) tb un textbox en donde mostrara el codigo que se autogenerara cuando demos click en nuevo lo llamare(txtcodigo)
.
3)usaremos un datagriedview para mostar los campos de la base de datos lo llamare (dgvPrueba)
LAS IMAGENES QUE PONGO NO LAS SUBI LAS BUSQUE EN INTERNET PERO LAS PONGO COMO PARA QUE SE GUIEN y nose confundan
<!--///////////////////////////////////////////////////////////////////////////////////////////////////////////////-->
paso 1 : crearemos un PROCEDIMIENTO ALMACENADO(copia y pega ste codigo y modifica a tu manera)
CREATE PROCEDURE aqui_el_nombre_que_quieras(ojo acuerdate que nombre le vas aponer porque mas adelante lo llamaremos)
AS
SELECT ( case when(select count(*) from nombre_de_la_tabla)=0 then 'Nulo' else
RIGHT(MA
aqui_el_codigo_o_id_o_la_que_tiene_llave_primaria_oseaelprimercampo), 5) end) AS Maximo
FROM nombre_De_la_tabla
RETURN
GO
paso 2 : doble click en el boton Nuevo(copia y pega este codigo )
Try
dgvPrueba.DataSource = DatosTabla.DevCursor("execute aqui_el_nombre_del_procedimiento_almacenado_que_pusiste"
TxtCodigo.Text = "CLI" + Format(dgvPrueba.Item(0, 0).ToString() + 1, "00000"
Catch ex As Exception
TxtCodigo.Text = "CLI00000"
End Try
paso 3: doble click en el boton guardar
Dim cadena As String
cadena = ""
cadena = "insert into aqui_nombre_de_la_tabla values ('" + TxtCodigo.Text + "')"// aqui insertando el codigo en la bd
DatosTabla.DevCursor(cadena) // este devcursor es una funcion que he kreado en una clase para conectarme a la bd lo puedes ver en
// mi otro post de coneccion a bd
dgvPrueba.DataSource = DatosTabla.DevCursor(" select * from aqui_nombre_de_la_tabla" ) // aqui muestra los datos en el datagriedview
y eso es todo.. cada vez que den click en el boton nuevo se agregara automaticamente CLI00000,CLI00001,CLI00002...ETC..ETC cave recalcar que para que funcione esto uds tienes que tener ya una bd de datos creada con almenos una tabla y un campo y que este se conecte una vez realizado eso ud pueden hacer lo que esta aquí almenos creen una tabla con dos campos ejmplo cod_cliente y nom_cliente.
OJO
esto es mio es mi codigo no COPY PASTE y de antemano digo que este material es valorado solo por un informatico... cualquier duda o consulta manden un PVT y io les mando el resto