ASP - A ver si alguien SABE!!

 
Vista:

A ver si alguien SABE!!

Publicado por Anibal Canelon (1 intervención) el 19/09/2001 21:20:23
Salu2

Fijense en esto..tengo una dll en visual basic q me retorna un objeto variant.. q es realmente un arreglo de objetos..
osea tengo un arreglo donde cada posicion es un objetoX.
cuando lo llamo desde una forma en visual basic excelente..fijense..
Dim X As cva_reglas.cvaProyect
Set X = CreateObject("cva_reglas.cvaProyect")
Dim C
c = X.FindByUser("1")
For i = 0 To UBound(c)
MsgBox "codPro=" & c(i).codProyecto & ", nombrePro=" & c(i).Proyecto
Next i

Set X = Nothing

Pero en ASP no me funciona :(
set proyect=Server.CreateObject("cva_reglas.cvaProyect")
ap=proyect.FindByUser("1")
Response.Write(ubound(ap)) ' Si me imprime la cantidad de datos..
s="<center><table>\n"
Set oProyect = Server.CreateObject("cva_domain.proyecto")
for i=0 to ubound(ap)
s=s & "<tr bgcolor=blue>"
set oProyect= ap(i)
s="<td>"+oProyect.codProyecto+"</td><td>"+oProyect.Proyecto+"</td>\n"
s=s+"</tr>\n"
next
s=s+"</table></center>\n"
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