Tengo un problema tonto y no soy capaz de ver el error, ¿Puede alguien echarme una mano?
Tengo una rutina donde me abre archivos hasta ahora le daba el nombre del archivo y no tenia problemas pero he cambiado la forma para poder abrir un archivo con un nombre solo conocido al ejecutarse el programa y me sale este error "error 75" y no le veo el fallo. aqui esta el codigo por pasos .:
Código vb:
Ver original
Private Sub Form_Load() Dim Fichero As String Fichero = InputBox("Número de pedido") & ".dat" End Sub ' -------------------------------------------------------------------------- ' \\ -- Subrutina para abrir el archivo Horas.dat. ' -------------------------------------------------------------------------- Private Sub AbrirArchivo() Numero = FreeFile Open Fichero For Random As Numero Len = 94 RegActual = 1 ' Almacenamos la posición del último registro RegUltimo = LOF(Numero) / 94 If RegUltimo = 0 Then RegUltimo = RegActual End If End Sub
Podria alguien decidme domde estoy cometiendo el error. Se que es algo tonto pero soy incapaz de verlo por muchas vueltas que le doy.
Un saludo