VERIFICA?ÃO DE HORAS

ELMO01 29/07/2016 08:52:35
#465262

Bom dia pessoal,

Estou fazendo um sistema de ponto eletrônico, mas tenho que ler uma arquivo TXT e salvar em banco de dados, até ai tudo bem, mas quando chega na parte do sistema que tenho que verificar o horário para salva no banco de dados ai é que mora a minha dúvida, por exemplo. na estrutura do banco de dados tenho as seguintes variáveis:

CodEmp_Horas, Código da Empresa
CodFun_Horas, Código do Funcionário
Data_Horas, Data do ponto
Primeira_Entrada_Hora_Manha, Entrada Manhã -> 08:00
Primeira_Saida_Hora_Manha, Saída Manhã ----> 12:00
Segunda_Entrada_Hora_Tarde, Entrada Tarde ---> 13:00
Segunda_Saida_Hora_Tarde, Saída Tarde ------> 18:00

Onde:

Se bato o ponto as 08:00 o sistema tem que salvar este horário na variável Primeira_Entrada_Hora_Manha,
se saio para o almoço e bato as 12:00 tem que salvar este horário na variável Primeira_Saida_Hora_Manha, e assim por diante como está exemplificado acima.

O meu problema é quando tenho que verificar o horário do ponto batido e escolher a variável certa para salvar.

Achei na net o seguinte:

Select Case DateTime.Now.TimeOfDay
Case New TimeSpan(5, 0, 0) To New TimeSpan(9, 59, 0)
Debug.Print([Ô]Turno 1 - Entrada Manhã[Ô])
Case New TimeSpan(10, 0, 0) To New TimeSpan(11, 59, 0)
Debug.Print([Ô]Turno 1 - Saída Manhã[Ô])
Case New TimeSpan(12, 0, 0) To New TimeSpan(17, 59, 0)
Debug.Print([Ô]Turno 2[Ô])
[ô] [...]
End Select

Neste exemplo que achei não aceita a variável que contém a hora do(s) ponto(s) que extraio do arquivo TXT, então fico perdido.

Alguém ai tem alguma sugestão que possa me passar, ficarei grato pela ajuda.

Obrigado