RE:PLEASE HELP!!!!
Publicado por Ruri (583 intervenciones) el 25/10/2004 19:44:40
Ale: Lo primero que debes hacer es hacegurarte que el campo Numero no sea autonumérico. Si no lo es, puedes utilzar algo así
Dim k as long
With Rds 'Tu recordset
if .RecordCount<1 then exit sub
.MoveLast
.MoveFirst
For k =1 to RecordCount
.Fields("Numero").Value = k
.MoveNext
Next k
End With
Saludos Ruri
Dim k as long
With Rds 'Tu recordset
if .RecordCount<1 then exit sub
.MoveLast
.MoveFirst
For k =1 to RecordCount
.Fields("Numero").Value = k
.MoveNext
Next k
End With
Saludos Ruri
Valora esta pregunta
0