Visual Basic.NET - ¿Como hacer que funcione esto?

 
Vista:

¿Como hacer que funcione esto?

Publicado por miguel (86 intervenciones) el 02/03/2007 15:02:33
Hola. Tengo el siguiente porblema:

Tengo mi DataSet con mis tablas de mi BD las cargo correctamente, pero a ese mismo DataSet le quiero agregar una Tabla mas, pero una Tabla que cree en tiempo de ejecucion y tambien se la agrego al xsd de mi proyecto.

Pero al tratar de añadir una nueva fila a esa tabla que cree me aparece el error de que estoy haciedo referencia a un objeto no establecido.

¿Sera que es por que tengo que emplear un DataAdapter para esa Tabla como lo hago con las demas? Si es asi, como se puede hacer por que esa tabla no existe en mi BD, solo lo cree en tiempo de ejecucion para otros fines.

:-) Saludos
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

RE:¿Como hacer que funcione esto?

Publicado por Edgar (1501 intervenciones) el 02/03/2007 17:18:32
Hola

Podrias mostrar el codigo que estas usando?? En principio si se puede crear una tabla nueva, puede ser que tengas algun error en el codigo

Saludos

Edgar Gonzalez
http://www.edgaragg.com
http://sobre-ing-software.blogspot.com/
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

RE:¿Como hacer que funcione esto?

Publicado por miguel (86 intervenciones) el 05/03/2007 18:30:59
Hola Edgar, perdon por no constestarte antes tuve unos pequeños contratiempos. Pero bueno aca stamos de vuelta.

Este el el codigo que empleo:

Private TablaClaves As New DataTable("ReporteClaves")

Private Sub frmReporteClaves_Load(ByVal . . .
Call generaDataTable( ) --> aqui llamo a la funcion
.
.
.
end sub

Public Sub generaDataTable()
Filiacion.ColumnName = "Filiacion"
Filiacion.DataType = System.Type.GetType("System.String")
Filiacion.MaxLength = 15
Filiacion.AllowDBNull = False
TablaClaves.Columns.Add(Filiacion)

Nombre.ColumnName = "Nombre"
Nombre.DataType = System.Type.GetType("System.String")
Nombre.MaxLength = 20
Nombre.AllowDBNull = False
TablaClaves.Columns.Add(Nombre)

Apellidos.ColumnName = "Apellidos"
Apellidos.DataType = System.Type.GetType("System.String")
Apellidos.MaxLength = 25
Apellidos.AllowDBNull = False
TablaClaves.Columns.Add(Apellidos)

C_Ingreso.ColumnName = "Clave de Ingreso"
C_Ingreso.DataType = System.Type.GetType("System.String")
C_Ingreso.MaxLength = 25
C_Ingreso.AllowDBNull = False
TablaClaves.Columns.Add(C_Ingreso)

ClaveActual.ColumnName = "Clave Actual"
ClaveActual.DataType = System.Type.GetType("System.String")
ClaveActual.MaxLength = 25
ClaveActual.AllowDBNull = False
TablaClaves.Columns.Add(ClaveActual)

FchaInicioCA.ColumnName = "Fecha de InicioCA"
FchaInicioCA.DataType = System.Type.GetType("System.String")
FchaInicioCA.MaxLength = 25
FchaInicioCA.AllowDBNull = False
TablaClaves.Columns.Add(FchaInicioCA)

TipoClaveCA.ColumnName = "Tipo de ClaveCA"
TipoClaveCA.DataType = System.Type.GetType("System.String")
TipoClaveCA.MaxLength = 25
TipoClaveCA.AllowDBNull = False
TablaClaves.Columns.Add(TipoClaveCA)

ClavePromocion.ColumnName = "Clave de Promocion"
ClavePromocion.DataType = System.Type.GetType("System.String")
ClavePromocion.MaxLength = 25
ClavePromocion.AllowDBNull = False
TablaClaves.Columns.Add(ClavePromocion)

FchaInicioCP.ColumnName = "Fecha de InicioCP"
FchaInicioCP.DataType = System.Type.GetType("System.String")
FchaInicioCP.MaxLength = 25
FchaInicioCP.AllowDBNull = False
TablaClaves.Columns.Add(FchaInicioCP)

TipoClaveCP.ColumnName = "Tipo de ClaveCP"
TipoClaveCP.DataType = System.Type.GetType("System.String")
TipoClaveCP.MaxLength = 25
TipoClaveCP.AllowDBNull = False
TablaClaves.Columns.Add(TipoClaveCP)

TalonPago.ColumnName = "Talon de Pago"
TalonPago.DataType = System.Type.GetType("System.String")
TalonPago.MaxLength = 25
TalonPago.AllowDBNull = False
TablaClaves.Columns.Add(TalonPago)

'luego de hacer todo esto no se si tengo que agregarle esa tabla a mi
'DataSet como lo hago aca, ¿o automaticamente se añade?
'DataSetDRH_.Tables.Add(TablaClaves)
End Sub

Bueno este es el codigo de como genero mi tabla, como comente tengo duda en esta linea de codigo "DataSetDRH_.Tables.Add(TablaClaves)" no se si asi debe ir o como dije que ya añadi una tabla a mi archivo xsd (es dde se encuentra la vista de todas las tablas de mi DataSet) de mi proyecto, ¿lo agrega automaticamente?

Bueno, como escribi en la primera duda dije que me aparecia un mensaje de error, es en esta linea de codigo dde me aparece:

Dim fila As DataRow
fila = DataSetDRH_.Tables("RepoteClaves").NewRow() --> aca

Y me aparece el mensaje de: " referencia a objeto no establecida como instancia de un objeto.

:-) 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