AYUDA URGENTE¡¡¡
Publicado por Abel (22 intervenciones) el 12/06/2001 00:56:14
Hola a todos:
Tengo un problema, el siguiente codigo en teoria debe convertir el contenido de un recordset en una matriz y despues esta en una cadena de texto, el resultado debería ser 12,58,71 pero solo que muestra es 12, ¿me podeis ayudar? es muy urgente. Gracias de antemano
Set rs baseDatos.OpenRecordset("SELECT lpNALB FROM dlLINPAR WHERE cpNPARTE=" & nParte2 & "")
rs.MoveLast
rs.MoveFirst
'Set a= rs.GetRows(rs.RecordCount)
a= rs.GetRows(rs.RecordCount)
a= rs.RecordCount
ReDim b(matriz)
For i = 0 To UBound(a)
b(i) = a(0, i)
Next
octlTxtNAlb.Text = Join(b, ",")
Tengo un problema, el siguiente codigo en teoria debe convertir el contenido de un recordset en una matriz y despues esta en una cadena de texto, el resultado debería ser 12,58,71 pero solo que muestra es 12, ¿me podeis ayudar? es muy urgente. Gracias de antemano
Set rs baseDatos.OpenRecordset("SELECT lpNALB FROM dlLINPAR WHERE cpNPARTE=" & nParte2 & "")
rs.MoveLast
rs.MoveFirst
'Set a= rs.GetRows(rs.RecordCount)
a= rs.GetRows(rs.RecordCount)
a= rs.RecordCount
ReDim b(matriz)
For i = 0 To UBound(a)
b(i) = a(0, i)
Next
octlTxtNAlb.Text = Join(b, ",")
Valora esta pregunta
0