USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  cartao ponto.
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 30/08/2010 20:18 hs            
Private Sub cmdregistrar_Click()
Dim DataSistema As Date
Dim HoraSistema As Date
Dim Nome As String
DataSistema = Format(Date, "mm/dd/yyyy")
HoraSistema = Format(Time, "hh:nn:ss")
Nome = "Marcelo"
Data1.RecordSource = "Insert into funcionario(data,entrada,nome)values(#" & DataSistema & "#,#" & HoraSistema & "#,'" & Nome & "')"
End Sub
 
TÓPICO EDITADO
 
Fausto
não registrado
ENUNCIADA !
Postada em 30/08/2010 20:23 hs   
Envio amanhã.
   
Página(s): 2/2     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página