Code: Select all
dbUseArea(.T., "DBFCDX", "D:\Marizete\cadastros\banco\CLIENTE",
"Cliente", .T., .F.)
INDEX ON NOME TO D:\Marizete\cadastros\banco\CLIENTE
....
M->cNome := NOME;
....
dbCloseArea()
Atentos saludos
Code: Select all
dbUseArea(.T., "DBFCDX", "D:\Marizete\cadastros\banco\CLIENTE",
"Cliente", .T., .F.)
INDEX ON NOME TO D:\Marizete\cadastros\banco\CLIENTE
....
M->cNome := NOME;
....
dbCloseArea()