INSERT INTO EM ACCESS

JPAULO101 28/01/2011 11:20:46
#363682
Olá pessoal, alguém poderia mim ajudar como faço para fazer um insert into no próprio Access, criei um tabela no access e um formulário com algumas caixa de texto, quando preencher as caixas de texte e clicar no butão gravar as mesma fosse para tabela criada.

agradeço

abraços.
SAMUKA 28/01/2011 11:44:15
#363686
Olá JPAULO101

Dê uma olhada nesse artigo do Macoratti

http://www.macoratti.net/08/02/vb_cdcli.htm

Tem um exemplo completo usando VB6+Access
JPAULO101 28/01/2011 11:47:11
#363688
Olá amigo SAMUKA, olha com vb6 e sei fazer, pois estou fazendo esse pequeno projeto em VBA diretamento no access mesmo.
SAMUKA 28/01/2011 11:49:19
#363690
Ah blz, sobre VBA to por fora, faz mais de 10 anos que não mexo ....
ROBIU 31/01/2011 09:24:19
#363853
Qual a versão do seu access?
Tenta isso:
Dim Sql As String
Sql = [Ô]Insert Into ...[Ô] 

DoCmd.RunSQL Sql
CHARLESTON10 31/01/2011 09:34:06
#363855 Resposta escolhida
Eu adiciono como DAO
Funciona do mesmo jeito

Private Sub Gravar()
    SQL = [Ô]SELECT * FROM SAIDA[Ô]
    tbSaida.Open SQL, Conexao, adOpenDynamic, adLockOptimistic
    
    With tbSaida
        .AddNew
            !codigo = txtCod.Text
            !documento = txtDoc.Text
            !historico = txtHist.Text
            !dt_emissao = DTPicker1.Value
            !dt_vencimento = DTPicker2.Value
            !conta = Label7.Caption
            !situacao = Combo2.Text
            !Tipo = Combo1.Text
            !valor = txtValor.Text
        .Update
    End With
    
    tbSaida.Close
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar