Ver Mensaje Individual
  #5 (permalink)  
Antiguo 26/02/2010, 14:58
ginosan
 
Fecha de Ingreso: febrero-2010
Ubicación: manabi - ecuador
Mensajes: 22
Antigüedad: 14 años, 2 meses
Puntos: 0
Respuesta: DataGridViewComboBoxColumn

hola kyha, como estas?? espero q bien!! gracias por la ayuda pero ahora te voy a molestar por lo siguiente y es q ahora me sale en el momento de insertar el siguiente mensaje de error:
'Sintaxis incorrecta cerca de ','.
'La cuestión es q el objetivo de la función Agregar_Requisitos() es de crear requisitos para
'cada materia a ver, es decir, q si quiero ver Programación III tengo q tener aprobadas
'Programación I y Programación II pero solo me almacena un codigo x decir solo el codigo
'de Programación I y el de Programación II no lo almacena
'Esta es la codificacion de Agregar_Requisitos()
Private Sub Agregar_Requisitos()
Dim sQuery As String = ""
Dim sConexion As String = Negocio.Conexion
Dim Ds_Datos As New DataSet

Dim KROW As Integer = 0


Try

For KROW = 0 To Me.DGVMaterias.RowCount - 1

sQuery = "spi_spsatbrequisito_asignatura " & Codigo & "," & Me.DGVMaterias.Rows(KROW).Cells(0).Value & ""

Ds_Datos = Accesar_Datos.GetDataSet(sQuery, sConexion)

Next KROW
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
End Try

End Sub

'A continuación te doy la codificación de mi procedimiento:

ALTER PROCEDURE [dbo].[spi_spsatbrequisito_asignatura]
@asg_codigo tinyint,
@asg_requisito tinyint
AS
Begin transaction
if not exists( select * from spsatbrequisito_asignatura where asg_codigo=@asg_codigo and asg_requisito=@asg_requisito )
begin
insert spsatbrequisito_asignatura(asg_codigo,asg_requisit o)
Values(@asg_codigo,@asg_requisito)
end

if @@error <> 0
begin
raiserror('Error al insertar registro.',16,-1)
rollback transaction
return
end

commit transaction
'de antemano gracias por el apoyo y la ayuda :)