Ir para conteúdo
Fórum Script Brasil
  • 0

Cálculo de horas no VBA e gravando em Mysql


Luis_Gustavo

Pergunta

E ai pessoal, tudo bem?

Preciso de um super help com o meu projeto, estou inserindo dados de uma Form do Excel no Mysql , preciso inserir o horario que uma form abre e outro horário que ela fecha e o intervalo entre elas, Assim:

Tabela:

horario1 DATETIME,

horario2 DATETIME,

Diferenca DATETIME

 

Form1:

Private Sub UserForm_Initialize()
inicio = Now()
End Sub

Private Sub UserForm_Terminate()

fim = Now()

diferenca = DateDiff("n", inicio, fim) 'Não sei se essa é a forma correta 
Conectar_BD

End Sub

 

Módulo do VBA:

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim fld As ADODB.Field
Dim sql As String
Dim inicio As Date
Dim fim As Date
Dim diferenca As Date


Sub Conectar_BD()

'connect to MySQL server using Connector/ODBC
Set conn = New ADODB.Connection
conn.ConnectionString = "DRIVER=MySQL ODBC 5.3 Unicode Driver;" _
& "SERVER=localhost;" _
& " DATABASE=horario;" _
& "UID=root;PWD=senha;" & "OPTION=3;"
conn.Open

conn.Execute "insert into horario (horario1, horario2, diferenca) values ('" & horario1 & "', '" &horario2& "', '" & diferenca & "')"
End Sub

 

 

Neste caso eu preciso que grave no Mysql em formato de data em uma única linha os dados, ex: 

horario1                                            horario2                                              diferenca                                                                                                                                                                     23/02/2016 10:30:10                        23/02/2016 10:35:10                           23/02/2016 00:05:00

Obrigado fico no aguardo.

Pessoal, me desculpem não sei como apareceu um tópico repetido esse é o tópico com a revisão.

Link para o comentário
Compartilhar em outros sites

0 respostass a esta questão

Posts Recomendados

Até agora não há respostas para essa pergunta

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...