Olá!
Precisei de alguns dados de pessoas para fazer testes e descobri o site Fake Name Generator
É possível escolher entre nomes de pessoas de alguns países, sexo, idade e ainda selecionar os campos desejados entre os campos disponíveis, alem de determinar a ordem de aparição dos campos no arquivo gerado, que pode ser em alguns diferentes formatos, e é enviado por e-mail.
Muito útil.
Gerador de dados pessoais fictícios
Moderador: Moderadores
- rochinha
- Administrador

- Mensagens: 4664
- Registrado em: 18 Ago 2003 20:43
- Localização: São Paulo - Brasil
- Contato:
Gerador de dados pessoais fictícios
Amiguinhos,
Vou complementar a idéia com um trecho usado por mim em um teste de envio de dados.
Vou complementar a idéia com um trecho usado por mim em um teste de envio de dados.
Código: Selecionar todos
Request DBFCDX
RddRegister('DBFCDX',1)
RddSetDefault('DBFCDX')
Request OrdKeyNo
Request OrdKeyCount
//
if file( "clientes.dbf" )
dbCloseAll()
erase( "clientes.dbf" )
ESTRU_DBF := { { "IDCODIGO" , "N", 5, 0 } , ;
{ "NOME" , "C", 30, 0 } }
dbcreate( "clientes", ESTRU_DBF )
endif
USE clientes SHARED
for i = 1 to 100
aPrimeiroNome := {"JOSE","JOAO","ANTONIO","MARIA","CATIA","MARIANA"}
aSegundoNome := {"CARLOS","MARCOS","PIRES","FLAVIO","HENRIQUE","VAGNER"}
aSobreNome := {"DA SILVA","DA COSTA","DOS ANJOS","DOS SANTOS","DE MOURA","DE PAULA"}
//
cSSNome := aPrimeiroNome[Random(6)] + " " + aSegundoNome[Random(6)] + " " + aSobreNome[Random(6)]
//
dbAppend()
clientes->IDCODIGO := i
clientes->NOME := cSSNome
dbCommit()
next
dbCloseAll()
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.
@braços : ? )
A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
@braços : ? )
A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
