¿Se pueden poner dos datagrid en un mismo formulario separadas por un tabbed dialog e
Publicado por Shizu (1 intervención) el 20/04/2011 01:03:44
Hola, agradecere mucho que me puedan ayudar en esta duda...tengo un tabbed dialog para separar en pestañas un formulario, la primera pestaña contiene informacion general, la segunda otro tipo de info y la tercera contiene solo fotografias, pero cada pestaña esta conectada a una base de datos en MySQL por medio de un control adodc y un control datagrid usando un tipo de conección ODBC, todo me va bien en la primera pestaña, pero al momento de dar de alta en la segunda pestaña simplemente no lo agrega a la base de datos y me sale un error en este codigo:
segunda pestaña; (la que no funciona)
Private Sub cmdguardarsegundatabla_Click()
With Adodc2
.CommandType = adCmdTable 'Esto sera la conexion hacia tu tabla
.RecordSource = "expedientes" 'nombre de tu tabla de la base de datos
.Refresh
.Recordset.AddNew 'representa el nuevo dato a guardar
End With
End Sub
primera pestaña (la que si funciona)
Primera pestaña;
Private Sub cmdguardarprimeratabla_Click()
With Adodc1
.CommandType = adCmdTable 'Esto sera la conexion hacia tu tabla
.RecordSource = "expedientes" 'nombre de tu tabla de la base de datos
.Refresh
.Recordset.AddNew 'representa el nuevo dato a guardar
End With
End Sub
el codigo de la primera pestaña es lo mismo solo que cambio el Adodc2 por Adodc1 por que la primera si funciona y la segunda no? u.u
segunda pestaña; (la que no funciona)
Private Sub cmdguardarsegundatabla_Click()
With Adodc2
.CommandType = adCmdTable 'Esto sera la conexion hacia tu tabla
.RecordSource = "expedientes" 'nombre de tu tabla de la base de datos
.Refresh
.Recordset.AddNew 'representa el nuevo dato a guardar
End With
End Sub
primera pestaña (la que si funciona)
Primera pestaña;
Private Sub cmdguardarprimeratabla_Click()
With Adodc1
.CommandType = adCmdTable 'Esto sera la conexion hacia tu tabla
.RecordSource = "expedientes" 'nombre de tu tabla de la base de datos
.Refresh
.Recordset.AddNew 'representa el nuevo dato a guardar
End With
End Sub
el codigo de la primera pestaña es lo mismo solo que cambio el Adodc2 por Adodc1 por que la primera si funciona y la segunda no? u.u
Valora esta pregunta


0