Primary key generated by Year+month+day+unique number of the day.

[Anacronos]

Hey everybody!.
Im new in this forum and I really hope some good guy could give me a hand with this task. I´m new with access and with VBA, I´ve already biuld a database but my personal proyect requires that the information of the costumers is stored in the following way.


Year+month+day+unique id of the current day.
So every day I can start from 1. The final code must be something like 20160109-01.
I thank any help you could give me, I don´t ask for you to do my work but I´m kind of frustrated to this point , so If any of you at least could put me in the right direction with one link I will be eternally grateful.
Tank you.

[June7]

Constructing custom unique IDs is a common topic. Search forum and Google.

Here is one for starters
https://www.accessforums.net/access/...ers-21361.html

[Anacronos]

I've tried using this code
DateSerial(Year(Date()), Month(Date()), Day(Date())) & [Id_dia]
Id_dia represents the unique number asigned to a specific costumer that day.
When I use the form view and I instert a number in that spot I get this phrase
#¿Nombre?
Everything is in spanish..
Is it cuz the variable?

[June7]

Why do you need DateSerial? All you are doing is building the current date which can be captured by simply Date().

Is this expression in a textbox? Did you prefix with = sign?

=Format(Date(), "yyyymmdd") & "-" & [Id_Dia]

[Anacronos]

I've tried with the one you just post June7, it seems to work :3 tank you

[Anacronos]

First of all thanks June7 for that line of code.

I decided to start over the form but when writing again that piece of information it didn´t work.
Here is the full code.

Private Sub TxtId_AfterUpdate()
Me.Id = Format(Fecha(), "YYYYMMDD") & "-" & Me.Id_dia
Me.Caption = "Folio N°" & Me.Id
End Sub

The txtbox es called TxtId the field in the related table is called Id. I´m able to fill all other fields but this one is not generated . Of course I have a txtbox requesting the "Id_dia". I used the wizard to make the form. The Id is the main key for. I´m quite new at this, so anything I which you could help me I´ll be eternally grateful.

[June7]

"didn't work" means what - error message, wrong result, nothing happens?

Caption is a field in table?

[Anacronos]

No wrong result, the error message is that I must fill that field but I understand that´s because Is a key field. Then nothing happens with the field.

Caption just changes the Name of the form after it has gain the Id. I could get rid of that I just thought I would be nice XD.

[June7]

I don't understand the error message as you state it. What is the EXACT error message? Why field type is ID?

[Anacronos]

Well I clicked the error message in the Help button it lead me to this https://msdn.microsoft.com/es-es/lib...ffice.15).aspx

[June7]

Spanish web page doesn't help me.

The error message popup should have a message on it. What is that message (in English please).

Is the ID field a text type?

[Anacronos]

Well Something weird has happen I was copyng the tables and forms to another proyect so I could zip it and upload it here then just for curiosity I executed the form and it worked...
The Id field is short text. The pop up error doesn´t have a number on it. In the page I just link there is an option in the upper right corner where you can change it to English.

[RuralGuy]

Pardon me for jumping in but *why* does this field need to be a Primary Key (PK) field? Indexed field fine, but PK?

[Anacronos]

Is a personal proyect based on the needs of where I work. Im a Chemist by profesion but I used to study C++ and java in the past; there´s already a program but It lacks certain things.

By the way the it just worked on one time now even the copy started failing...

[Anacronos]

I've re thinking the question and I think the real reason for that field to be the pk is that every morning we start counting from the client one and so on; It will quickly get out of hand cuz we usually keep two types of database virtual and in paper.