Oi Xará,

No diretório de Ferramentas do VFP (Tools) existe um aplicativo chamado CPZero. Ele faz exatamente este trabalho de trocar a página de código. Para executá-lo, use a sintaxe a seguir:

DO HOME(1) + "Tools\CPZERO\CPZERO" WITH <arquivo>, <número_da_pag_cod>

Ex.:

DO HOME(1) + "Tools\CPZERO\CPZERO" WITH "D:\Arqs\Clientes.DBF", 1252

Um abraço!