| Pregunta: | 66039 - CLICLO FOR LLENANDO REGISTROS EN UN DATA GRID EN VB 6.0 |
| Autor: | carlos fernando tellez |
| hola como estas, estoy haciendo una aplicacion cliente servidor en vb 6.0 el servidor manda los registros para colocarlos en un data grid, con el slip separa las columnas y los registros, en el primer for agrego las columnas hace todo bien en el segundo for agregas los datos la sentencia q tengo del for es: For x = 1 To UBound(lineas) - 1 si lo bugeo y coloco el cursos en UBound m dice q son 49 registros y tengo q agregar 1106 registros , de echo hace el cliclo agrega los 49 registros se sale del ciclo los agrega en el data grid se va en el end sub y vulve a subir otra vez a kerer seperar todo de nuevo me pregunto yo si en vez de colocarle ubound seria algo mas grande para q sean los 1106 o mas de 1106 espero y m ayuden les pongo el codigo por si = ustedes lo kieren ocupar y a si almacenar datos en un data grid.
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Winsock1.GetData Datos 'Guardo el resultado lineas = Split(Datos, vbCrLf) 'Lo convierto en un Array Columnas = Split(lineas(0), ",") 'Consigo un array con los nombre de las columnas rs.CursorLocation = adUseClient For x = 0 To UBound(Columnas) rs.Fields.Append Columnas(x), adVarChar, 100, adFldIsNullable Next x rs.Open , , adOpenStatic, adLockBatchOptimistic 'Agrego las Rows con un for For x = 1 To UBound(lineas) - 1 renglon = Split(lineas(x), ",") rs.AddNew Array(Columnas(0), Columnas(1), Columnas(2), Columnas(3), Columnas(4), Columnas(5), Columnas(6), Columnas(7), Columnas(8), Columnas(9), Columnas(10), Columnas(11), Columnas(12), Columnas(13), Columnas(14)), _ Array(renglon(0), renglon(1), renglon(2), renglon(3), renglon(4), renglon(5), renglon(6), renglon(7), renglon(8), renglon(9), renglon(10), renglon(11), renglon(12), renglon(13), renglon(14)) 'Cargo mi Res con los datos recibidos. Next x Set DataGrid1.DataSource = rs End Sub | |
| Respuesta: | carlos diaz |
| Tienes que trabajar con 2 procesos uno en primer plano y otro en segeundo plano... el problema está en la asincroia de los procesos.. | |