Учёт время рабочего

@r1jn · Регистрация: 29.10.2015

Author24 — интернет-сервис помощи студентам

Добрый день, прошу помощи в решении задачи.
По нажатию кнопки "начало работы|конец работы" в таблицу "scan" должны заноситься данные из формы "scan". При этом поля "idFIO" и "№order" , будут заполняться в свободной форме, (в последствии должны будут вводиться со сканера QR кода с беджа сотрудника и чертежа) Поле "start_time" должно вносится время и дата нажатия кнопки "начало работы|конец работы" в поле "time_end" вносится время и дата при условии что заполнено поле "start_time"

@r1jn · 05.10.2016, 14:06 **[ТС]**

Понимаю, что не правильно, но не понимаю где.

Visual Basic

Option Compare Database
Option Explicit
 
Private Sub Кнопка26_Click()
 
    If Len("" & Me.start_time) = 0 Then
        Me.start_time = Time()
        Me.дата = Date
      If Len("" & Me.start_time) >= 1 Then
        Me.time_end = Time()
    
    
End Sub

@Бормалей · 05.10.2016, 15:22

Visual Basic

If Me.start_time = "" Then
Me.start_time = Time
Else
Me.time_end = Time
End If

@r1jn · 07.10.2016, 14:04 **[ТС]**

Спасибо, в итоге вышло так:

Visual Basic

Option Compare Database
Option Explicit
 
Private Sub Кнопка26_Click()
 Me.дата = Date
 If Len("" & Me.start_time) = 0 Then
 Me.start_time = Time()
 
Else
Me.time_end = Time
End If
  
End Sub

	07.10.2016, 14:04