La verdad esto lo ocupo para RECORDARME como utilizar algunas funciones en los lenguajes que ando programando, soy de los que hago algo hoy y mañana se me olvida cómo lo hice, entonces mejor lo copio en algún lugar “seguro” y de paso lo comparto por si alguien más lo necesita.
Saludos
estoy haciendo un trabajo practico en visual .net 2008 y sql 2008.
en un formulario realizo las altas, bajas y modificaciones, pero resulta que cuando ingreso un registro que se encuentra en la base de datos me lo carga, desearía que a través del stored procedured, me muestre un mensaje (si esta repetido o no el registro) y que luego ese mensaje se registre a traves del formulario de visual. podrian ayudarme?
paso el codiGo que tengo en el formulario y el stored.
Private Sub ToolStrip_Agregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStrip_Agregar.Click
Dim cmd As New SqlCommand
oconexion.Open()
cmd = New SqlCommand(“alta_titular”, oconexion)
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add(“@cuit_titular”, SqlDbType.VarChar, 11).Value = txt_cuit_titular.Text
cmd.Parameters.Add(“@razon_social”, SqlDbType.NVarChar, 50).Value = txt_titular.Text
cmd.ExecuteNonQuery()
oconexion.Close()
MessageBox.Show(txt_titular.Text & ” ” & “Agregado”)
Me.cargadatos()
end sub
Private Sub cargadatos()
Dim cmd As New SqlCommand
cmd = New SqlCommand(“select_titulares”, oconexion)
Dim odataadapter As New SqlDataAdapter(cmd)
Dim odataset As New DataSet
odataset.Clear()
oconexion.Open()
odataadapter.Fill(odataset, “titulares”)
oconexion.Close()
Me.dgv_titular.DataSource = odataset
Me.dgv_titular.DataMember = “titulares”
txt_cuit_titular.Text = “”
txt_titular.Text = “”
ToolStrip_Agregar.Enabled = False
ToolStrip_Modificar.Enabled = False
ToolStrip_eliminar.Enabled = False
End Sub
—————————————————————————————–
STORED PROCEDURE
ALTER procedure [dbo].[alta_titular]
@cuit_titular varchar (11),
@razon_social nvarchar(50)
as
IF EXISTS (SELECT * FROM Titulares WHERE cuit_titular = @cuit_titular)
–if (select count(*) from Titulares where cuit_titular=’27204845196′) = 0
begin
print ‘El dato esta duplicado’
end
else
begin
insert into Titulares
(cuit_titular, razon_social)
values
(@cuit_titular, @razon_social)
end
Listo… resuelto por correo.
Saludos