Problema con PUT (archivos aleatorios)
Publicado por wanchutri (1 intervención) el 23/02/2014 23:38:30
Necesito su ayuda con un problema que tengo al querer grabar datos en un registro.
el codigo que tengo es el siguiente:
<<Codigo en un Boton >>
lstcodigo.AddItem txtcodigo
lstdescripcion.AddItem txtdescripcion
r_prod.descripcion = txtdescripcion
r_prod.codigo = txtcodigo
Put #1, , r_prod
<<<Codigo en Modulo >>
Open "d:\productos.dat" For Random As #1 Len = Len(r_prod)
el error que me sale es el siguiente : Run time error : '52' Bad file name or number.
Desde ya gracias .
el codigo que tengo es el siguiente:
<<Codigo en un Boton >>
lstcodigo.AddItem txtcodigo
lstdescripcion.AddItem txtdescripcion
r_prod.descripcion = txtdescripcion
r_prod.codigo = txtcodigo
Put #1, , r_prod
<<<Codigo en Modulo >>
Open "d:\productos.dat" For Random As #1 Len = Len(r_prod)
el error que me sale es el siguiente : Run time error : '52' Bad file name or number.
Desde ya gracias .
Valora esta pregunta
0