[zequi2009]

Pessoal!
Tenho uma tabela com vários campos
Entre ele tenho o campo Nome; e o Campo Data de Nascimento:
Gostaria de saber como faço para transformar esses campos em um código
quando esse código surgirá da união desses dois campos. os dados serão inseridos em um mesmo formulário, gravando em uma única tabela.
Exemplo: Nome: Paulo da Silva de Souza, Data Nascimento 19/06/2009 Código:automático
pegaria esses dois campos e transformaria em um código, onde esse código seria as iniciais dos Nomes e a data de nascimento sem as barras.
Então ficaria assim: PSS19062009, gravando esse código em um outro campo chamado código.
Por favor me ajudem.
Obrigado.

[Mário Monteiro]

terá que fazer isso via programação depois que inserir o registro pois automaticamente desconheço

[zequi2009]

por favor como faço isso via programação?

[Mário Monteiro]

como está inserindo os registros?

[zequi2009]

estou inserindo os dados desta forma:
Campo nome: José da Silva Souza
Campo data nasc: 20/06/2009

e gostaria que fosse gravado em outro campo o código unindo estes dois campos:

exemplo: Código_cliente: JSS20062009

onde pegaria-se as iniciais maiúsculas do campo nome e uniria-se a data de nascimento sem as barras /.

Entendeu Mário?
Obrigado.

[Mário Monteiro]

mas que leinguagem está usando

pois esta montagem fica mais simples se for feita na linguagem

[zequi2009]

estou usando access com códigos em vba

[Mário Monteiro]

então antes de inserir crie este codigo

seria simples

com um simples SPLIT voce cria um array com todas as palavras

depois com um FOR e o uso do LEFT voce pega o primeiro caracter de cada palavra

depois concatena o resultado com a data usando DAY MONTH e YEAR

duvidas? mostre como fez que o ajudamos

[zequi2009]

Tenho pouco conhecimento de Vba
e não sei como montar isso.
È possivel você me passar como faço isso?
Obrigado!

[Mário Monteiro]

ja passei como faz

[zequi2009]

esse négocio que você me passou pra mim é como se estivesse em grego.
não entendi nada, amigo.

Pô sou um quase leigo neste assunto.
Gostaria de algo mais concreto, mais explicado.

[Mário Monteiro]

não está não

farei o básico aqui mas saibas que não é padrão fazer códigos e sim ajudar a entender

voce diz que já consegue inserir isso

Quote

Campo nome: José da Silva Souza
Campo data nasc: 20/06/2009

então para inserir o outro é só adicionar o campo lai mesmo, então apenas o ajudarei a montar o código com base nestes dois campos que já tem

mas só para não fazer tudo ignorarei as preposições e o D do da entrará

Nome = "José da Silva Souza"
Data = "20/06/2009"
ArrayNomes = SPLIT(Nome, " ")
Codigo = ""
FOR I = LBOUND(ArrayNomes) TO UBOUND(ArrayNomes)
Codigo = Codigo & UCASE(LEFT(ArrayNomes(I),1))
NEXT
Codigo = Codigo & DAY(Data) & MONTH(Data) & YEAR(Data)
Response.write(Codigo)

Teste

[zequi2009]

Caro Mário
muito obrigo!
Resolveu meu problema
você é o Cara!!!!!
um abraço!

[Mário Monteiro]

que bom que resolveu

abraços