Set Default To (JustPath(Sys(16)))
CLOSE TABLES all
IF FILE('mentira.dbf') then
DELETE FILE mentira.dbf
ENDIF
SELECT ALL TAlias1.correos, TAlias2.letras;
FROM correos.dbf TAlias1, laletra.dbf TAlias2 ;
WHERE TAlias1.correos LIKE TAlias2.letras ;
INTO TABLE mentira.dbf
BROWSE
CLOSE TABLES all
Set Default To (JustPath(Sys(16)))
CLOSE TABLES all
IF FILE('mentira.dbf') then
DELETE FILE mentira.dbf
ENDIF
SELECT ALL TAlias1.correos, TAlias2.letras;
FROM correos.dbf TAlias1, laletra.dbf TAlias2 ;
WHERE TAlias1.correos LIKE '%' + TAlias2.letras + '%';
INTO TABLE mentira.dbf
BROWSE
CLOSE TABLES all