ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Cadastro Produtos VBA com Data Base File (.DB)

Esclarecimentos e dúvidas sob o Modelo de Aplicativo de Cadastro em VBA no Microsoft Excel publicado no site e blog http://www.tomasvasquez.com.br
ACGuedelha
Acabou de chegar
Acabou de chegar
Mensagens: 2
Registrado em: Sáb Fev 01, 2020 12:15 pm
Localização: Belo Horizonte

Cadastro Produtos VBA com Data Base File (.DB)

Mensagem por ACGuedelha » Dom Fev 02, 2020 5:07 pm

Boa tarde
a Todos.

Estou criando projeto vba para conexão com arquivo Data Base File (.DB o login e senha possuo).
Contudo não estou conseguindo o código correto para conexão, carregar, excluir, editar, incluir
no banco de dados. Alguém poderia me ajudar como resolver.
Segue em anexo arquivo (banco SqL e projeto Vba) para analises.

Desde já agradeço qualquer ajuda.
Deus acima de tudo e todos.
Anexos
Downloads.rar
(2.12 MiB) Baixado 132 vezes



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 2816
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Cadastro Produtos VBA com Data Base File (.DB)

Mensagem por webmaster » Seg Fev 03, 2020 10:55 pm

ACGuedelha,

A dúvida é um pouco ampla demais para um só tópico. Uma explicação de até onde conseguiu chegar. O modelo é seu?

A connection string parece estar no caminho certo. Dê uma olhada neste link: http://www.macoratti.net/12/04/vb_pbd1.htm


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.


Avatar do usuário
Guedelha
Acabou de chegar
Acabou de chegar
Mensagens: 5
Registrado em: Dom Jul 08, 2018 5:02 pm

Re: Cadastro Produtos VBA com Data Base File (.DB)

Mensagem por Guedelha » Dom Mar 01, 2020 9:51 am

Boa tarde
a Todos.

Criei projeto vba com banco Data Base File, e fiz o código abaixo com pesquisas e indicações
do forum. Contudo o código de conexão não carrega para editar, excluir, ou incluir.
Estou quebrando a cabeça. Alguém poderia me ajudar como resolver.

Código: Selecionar todos

Public Total As Long

Public Function ID()
On Error Resume Next
Dim cx As New ClasseConexao
Dim banco As ADODB.Recordset
Dim sqlite3 As String
Dim i As Long

sqlite3 = "SELECT * FROM t_produtos"
Set banco = New ADODB.Recordset
cx.Conectar
' ABRE CONEXAO
banco.Open sqlite3, cx.conn
sqlite3 = "DRIVER=SQLite3 ODBC Driver; Database=NotizCaixa.DB; LongNames=0; Timeout=100000; NoTXN=0; SyncPragma=NORMAL; StepAPI=0;UserID=A*****; Password=***********;"
Total = banco.RecordCount
' ABRE GRAVAÇAO
banco.Open sqlite3, cx.conn, adOpenKeyset, adLockOptimistic
banco.Close

' ENCERRAMENTO
Set rst = Nothing: Set conn = Nothing
    
End Function

Código: Selecionar todos

Public conn As New ADODB.Connection

Public Sub Conectar()

    Dim nConectar As String
    nConectar = "DRIVER=SQLite3 ODBC Driver; Database=NotizCaixa.DB; LongNames=0; Timeout=100000; NoTXN=0; SyncPragma=NORMAL; StepAPI=0;UserID=A*****; Password=***********;"
    conn.ConnectionString = nConectar
    conn.Open
    
End Sub

Public Sub Desconectar()
    conn.Close
End Sub
Grato por qualquer ajuda.

"O impossível existe até que alguém duvide
dele e prove o contrário."
(Albert Einstein)



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder