>How can I mark and then return to a line of my VFP program as we do in Pascal ?
>
>FOR exemple, in the program below I would like to go back to line LINE 4,
>in case NOT FILE (LINE 7)
>
>*********************************************
>IF FILE (bkpc_path)
> caminho_rest = bkpc_path
>
> else
>dire1 = GETDIR("C:\" , [choose folder], [Seleção], 1) && LINE 4
> caminho_rest = dire1 + thisform.text2.Value
>
>
> DO CASE
>
> CASE NOT FILE (dire1 + thisform.text2.Value) && LINE 7
>
> = MESSAGEBOX ("O arquivo não encontra no local selecionado. Selecione outro local")
>
> THISFORM.LABEL1.Visible = .F.
> THISFORM.COMMAND3.ENABLED = .T.
> THISFORM.COMMAND5.ENABLED = .T.
> thisform.refresh
>
>
> RETURN
>
> OTHERWISE
> endcase
>
> ENDIF
>***************************************************
Moises:
That's the way you do in VB also. Try to structure your program in a way you don't need the line jumps, it leads to spagetti code and VFP doesn't support that.