| ||||
tengo este codigo que solo hace la tarea de enumerar pero igual sirve si alguien necesita solo designar un numero distinto a cada elemento que inserte Dim codigo As Integer Set RS = New Recordset RS.Open "disco_duro", CN While Not RS.EOF codigo = RS!num RS.MoveNext Wend codigo = (codigo + 1) num = Str(codigo) |
| ||||
lo que pasa es que cada vez que eliminas un registro el programa tiene que volver a asigar los valores en la tabla si en caso se borro un registro que no sea el último.. nos vemos..
__________________ * Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ Sitio http://www.geoavila.com twitter: @GeoAvila |
| ||||
vale compadre, ya la pille, me estaba puro enredando con el problema y la solucion es facil , dejo por defecto el autonumerico de acces y si quiero saber cuantos registros tengo hago un contador que recorra toda la tabla y cuente los datos... |
| ||||
tngo el mismo problema q tu, puedes explicar paso a paso como lo has solucionado. Kerriamos no usar codigo de visual y acerlo con funciones de access pero creo k las hemos probado todas y no funciona. |