abrir un archivo secuencial en modo lectura y escritura
Publicado por Willy (1 intervención) el 19/03/2018 19:42:21
Hola a todos.
Estoy haciendo una aplicación que gestione los pacientes de una pequeña clínica de una ONG (lo estoy haciendo gratis). Hace tiempo aprendí vb6 y años después me he atevido con ello.
El caso e que en el mismo formulario debe aparecer la información de las sesiones anteriores del paciente (lectura) y poder modificar esa informacón añadiendo o quitando cosas (escritura). Todo eso en el mismo archivo.
con un botón 'go' envio el número del paciente al formulario y se revisa el fichero hasta que lo encuentra (al principio, al final o a la mitad, donde esté), lo que sigue a ese número en el archivo son los registros de la info del paciente, se leen, aparecen en los textbox, se modifican en el mismo txtbox y con un botón 'add' añado estas modificaciones al mismo fichero de antes (para que otro día en otra consulta pueda aparecer de nuevo)
No puedo usar ficheros random (ojalá) porque las variables recogen un txtbox de longitud no definida (dependerá de lo que tenga que escribir el médico sobre el paciente, quizá mucho quizá poco, no se sabe)
y no puedo usar binarios porque me pisan la información de los registros siguientes.
Tampoco puedo decirle a vb6 que se conecte a una base de datos porque el ordenador de allí no tene acces ni esas cosas (son una ONG pequeña).
Y no querría utilizar una copia del fichero como temporal porque ya serían dos secuencias leyendo info y no sé de cuánta memoria tira eso pero igual ya es bastante con una.
Entonces... ¿Hay alguna forma de abrir el fichero en lectura, y luego pedir que escriba una info en una posición determinada (buscada con el número del paciente)?
¿Alguna idea? porque a mi se me han acabado y no para de darme error...
no sé mucho pero tampoco me da pa más...
¡Gracias de antemano!
P.D.: no he puesto el código fuente porque tengo varios intentos y todos tienen el mismo problema, no puedo abrir el mismo fichero en lectura y en escritura para que me lea con un
input #numfile, datos.numeropaciente
hsta llegar con un bucle al paciente esecífico y luego me escriba ahí con un
write #numfile, datos
Estoy haciendo una aplicación que gestione los pacientes de una pequeña clínica de una ONG (lo estoy haciendo gratis). Hace tiempo aprendí vb6 y años después me he atevido con ello.
El caso e que en el mismo formulario debe aparecer la información de las sesiones anteriores del paciente (lectura) y poder modificar esa informacón añadiendo o quitando cosas (escritura). Todo eso en el mismo archivo.
con un botón 'go' envio el número del paciente al formulario y se revisa el fichero hasta que lo encuentra (al principio, al final o a la mitad, donde esté), lo que sigue a ese número en el archivo son los registros de la info del paciente, se leen, aparecen en los textbox, se modifican en el mismo txtbox y con un botón 'add' añado estas modificaciones al mismo fichero de antes (para que otro día en otra consulta pueda aparecer de nuevo)
No puedo usar ficheros random (ojalá) porque las variables recogen un txtbox de longitud no definida (dependerá de lo que tenga que escribir el médico sobre el paciente, quizá mucho quizá poco, no se sabe)
y no puedo usar binarios porque me pisan la información de los registros siguientes.
Tampoco puedo decirle a vb6 que se conecte a una base de datos porque el ordenador de allí no tene acces ni esas cosas (son una ONG pequeña).
Y no querría utilizar una copia del fichero como temporal porque ya serían dos secuencias leyendo info y no sé de cuánta memoria tira eso pero igual ya es bastante con una.
Entonces... ¿Hay alguna forma de abrir el fichero en lectura, y luego pedir que escriba una info en una posición determinada (buscada con el número del paciente)?
¿Alguna idea? porque a mi se me han acabado y no para de darme error...
no sé mucho pero tampoco me da pa más...
¡Gracias de antemano!
P.D.: no he puesto el código fuente porque tengo varios intentos y todos tienen el mismo problema, no puedo abrir el mismo fichero en lectura y en escritura para que me lea con un
input #numfile, datos.numeropaciente
hsta llegar con un bucle al paciente esecífico y luego me escriba ahí con un
write #numfile, datos
Valora esta pregunta
0
