Visual Basic.NET - VB.Net Y SQL

   
Vista:

VB.Net Y SQL

Publicado por Juan Camilo camilito--13@hotmail.com (1 intervención) el 18/07/2011 22:06:19
Programadores ayuda con esto por favor...
Conexión bases de datos SQL con VB.Net
Creación matriz CRUD. (Ingresar- -buscar-Actualizar- eliminar)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

VB.Net Y SQL

Publicado por Damian (824 intervenciones) el 22/07/2011 14:44:51
Public Conexion As String = "Data Source=.\SQLEXPRESS;Initial Catalog=NombreDeTuBase;Integrated Security=True"
'Public Conexion As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=Construccion.MDF;Integrated Security=True"
Public MiConexion As New SqlConnection(Conexion)
Public Rs As SqlDataReader
Public Com, Insert, Delete As New SqlCommand
Public SQL As String
--------------------------------------------------------------

'INSERTAR
Insert.CommandText = "Insert into ArticuloPorProv(CodProv,CodDetArt,Detalle,Costo,Descuento,CostoXCant)" _
& "Values (" & CodProv & "," & CodArt & "," & IIf(Detalle = "null", Detalle.ToString, "'" & Detalle & "'") _
& "," & Costo & "," & Descuento & "," & CostXCant & ")"
Insert.Connection = MiConexion
Insert.ExecuteNonQuery()
-----------------------------------------------------

'BUSCAR
Sql = "select top 1 CodProv from Proveedores order by 1 desc"

Com = New SqlCommand(SQL, MiConexion)

Rs = Com.ExecuteReader()

Rs.Read()
txtCod.Text = Rs("CodProv") + 1
Rs.Close()
------------------------------------------------

'ACTUALIZAR
Insert.CommandText = "Update Empleados set FechaBaja=null,Baja=0 where CodEmp=" & cod
Insert.Connection = MiConexion
Insert.ExecuteNonQuery()
-----------------------------------------------------
'ELIMINAR
Delete.CommandText = "Update Clientes set Baja=1 where CodCli=" & cod
Delete.Connection = MiConexion
Delete.ExecuteNonQuery()
----------------------------------------------------

Espero se entienda, las variables de conexión y demás estan como públicas porque las mismas se encuentran dentro de un modulo y asi puedo trabajar con ellas desde cualquier parte de mi formulario.
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar