20/04/2010, 07:19
|
 | | | Fecha de Ingreso: julio-2006 Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 18 años, 3 meses Puntos: 29 | |
| Respuesta: Funcion eliminar registro que borra todo
Imagino que el código de erbuson será mejor, ya que creo que tiene experiencia en trabajar con ese tipo de archivos.
Yo realmente solo he modificado un poco tu código.
Como has comentado, con el with lo que hacías era estropear los registros leidos, cuando para lo que tú querías hacer solo hay que leer el registro y guardarlo directamente al nuevo fichero.
El fallo que me comentabas que dá era porque no he revisado tu línea de Put y no he visto que usa una variable incorrecta. No es RegActualTemp sino RegActual, aunque imagino que realmente el mejor modo sería algo como lo que pone erbuson:
Put #Salida, (LOF(Salida) / Len(Horas)) + 1, Horas
Que se dé bien
__________________
No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza! |