El Guru Programador Web Hosting Argentina. Alojamiento de paginas web en Español. Hospedaje de sitios web. Hosting php, multidominio, mysql, posgresql, ruby on rails, Fantastico TM, Panel de control CPanel, Promociones para desarrolladores. Planes de webhosting GRANDES, a la mejor relacion precio/prestacion
Usuario DESCONOCIDO | Registrate Gratis | Usuarios Registrados
Foro de ASP/ASP.NET
Foros del Guru > ASP/ASP.NET
 
Usuario ERROR al devolver un datatable
Desconocido
Enviado - 29/9/2004
 
Tengo esta dll compilada que carga un datatable:
-------------prueba.vb-----------
Imports System
Imports System.Data
Imports System.Security
Imports System.DirectoryServices
Imports Microsoft.VisualBasic

Namespace miespacio

Public Class adder

Public function addvalues(ByVal categoria as string, ByVal txtnombre as string) as datatable
Dim nombre, telefono, email, sam, login, centro as string
Dim i as integer
Dim dt as datatable
Dim dr as datarow
Dim col as datacolumn

dt = New DataTable
dt.Columns.Add(New DataColumn("Name",GetType(String)))
dt.Columns.Add(New DataColumn("PhoneNumber",GetType(String)))
dt.Columns.Add(New DataColumn("Email",GetType(String)))
dt.Columns.Add(New DataColumn("samaccountname",GetType(String)))
dt.Columns.Add(New DataColumn("Centro",GetType(String)))
'dt.Columns.Add(New DataColumn("Name",GetType(String)))
'dt.Columns.Add(New DataColumn("PhoneNumber",GetType(String)))
'dt.Columns.Add(New DataColumn("Email",GetType(String)))
'dt.Columns.Add(New DataColumn("samaccountname",GetType(String)))
'dt.Columns.Add(New DataColumn("Centro",GetType(String)))

col = dt.columns("Name")
col.maxlength = 100
For i=0 to 5
nombre = "nombre" & i
telefono = "telefono" & i
email = "email" & i
sam = "sam" & i
centro = "centro" & i

dr = dt.NewRow()
dr(0) = nombre
dr(1) = telefono
dr(2) = email
dr(3) = sam
dr(4) = centro
dt.Rows.Add(dr)
Next
return dt
End function
End Class
End Namespace
............................................

En mi página aspx lo recojo y cargo un dataview:

listado as New DataTable
listado = usuarios.addvalues(categoria, txtnombre)

Dim oView as new DataView()
oView = New DataView(listado) -> En esta línea obtengo el error: "Specified cast is not valid"

¿Alguien sabe por qué?
Si hago lo mismo llamando a una funcion dentro del aspx funciona correctamente, pero al hacerlo instanciando la dll (correctamente compilada) no funciona. Sin embargo si puedo contar el número de filas = "listado.rows.count()" sin problema.

No entiendo por qué puedo contar las filas pero no puedo recorrerlo.

Ayuda por favor

 
 

 

Contactos myStudio Network