Visual Basic - Problema al crear y verificar si existe un fichero urge

Life is soft - evento anual de software empresarial
   
Vista:

Problema al crear y verificar si existe un fichero urge

Publicado por fajardo (9 intervenciones) el 16/10/2011 01:11:03
cuando le doi a crear fichero
Private Sub cmdverificausuario_Click()

Savefile = FreeFile
Nombre = "C:\" & lblusuario.Caption
Open Nombre For Output As #Savefile
Print #Savefile, lblusuario.Caption
Close #Savefile


End Sub
melo crea pero cuando doi a verificar

Private Sub cmdverifica_Click()
GetAttr ("C:\" & lblusuario.Caption)
MsgBox "El fichero existe."
Exit Sub
MsgBox "El fichero no existe."
end sub
me da error por cierto se podria acer que creara el fichero cuando entre el el form o por ejemplo cuando pasen 5 segundos de aver cargado.... gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder