A pesquisa encontrou 364 resultados

por Damasceno Jr.
21 Set 2018, 15:07
Fórum: Módulos VBA
Tópico: BOLETO CAIXA - NOVA NORMA FEBRABAN
Respostas: 4
Exibições: 17

Re: BOLETO CAIXA - NOVA NORMA FEBRABAN

Onde tem a norma?
O que mudou em relação a antiga?
Onde fala sobre como gerar remessa?
por Damasceno Jr.
21 Set 2018, 02:35
Fórum: Macros
Tópico: Importar planilha
Respostas: 1
Exibições: 5

Re: Importar planilha

por Damasceno Jr.
15 Set 2018, 20:39
Fórum: Formulários
Tópico: Conecta back end
Respostas: 1
Exibições: 9

Re: Conecta back end

Tente adicionando o trecho abaixo
Código:
DoCmd.OpenForm "FLogar", acNormal
DoCmd.Close acForm, Me.Name

Se não resolver experimente fazer uma marcação no evento ao abrir do seu formulário FLogar e ir acompanhando a execução do código com F8
por Damasceno Jr.
14 Set 2018, 00:48
Fórum: Formulários
Tópico: Cadastro de processos
Respostas: 1
Exibições: 12

Re: Cadastro de processos

Você está falando de buscar dados da mesma forma que este artigo faz ou está falando de buscar as informações direto na base de dados do DataSUS?
por Damasceno Jr.
03 Set 2018, 22:02
Fórum: Ribbons
Tópico: [resolvido] Bloquer botao Fechar do access
Respostas: 2
Exibições: 34

Re: Bloquer botao Fechar do access

Eu segui a risca o que diz no site e consegui
http://www.usandoaccess.com.br/dicas/fe ... ificos.asp
por Damasceno Jr.
31 Ago 2018, 20:57
Fórum: Módulos VBA
Tópico: [resolvido] Adicionar mais de uma condição no IF
Respostas: 3
Exibições: 61

Re: Adicionar mais de uma condição no IF

if txtlogin = "joao" then isso isso e aquilo elseif txtlogin = "claudio" then isso isso e aquilo elseif txtlogin = "jose" then isso isso e aquilo else isso isso e aquilo end if como vc está avaliando um mesmo campo/controle (também vale para variavel), sugiro usar o se...
por Damasceno Jr.
28 Ago 2018, 15:43
Fórum: Biblioteca de exemplos Ms Access
Tópico: Utilitário de backup MS Access/VBA/Mysql
Respostas: 0
Exibições: 35

Utilitário de backup MS Access/VBA/Mysql

Boa tarde... Deixo em anexo exemplo que uso atualmente para backup de minhas bases de dados em MySQL. Trechos principais do código estão comentados. Feito em MS Access 2010 32 bits - SP2. Fiz com base no modelo Manutenção e Sistema de Backup com Barra de Progresso do site UsandoAccess que recomendo ...
por Damasceno Jr.
27 Ago 2018, 01:31
Fórum: Consultas
Tópico: Sistema de Agendamento
Respostas: 1
Exibições: 66

Re: Sistema de Agendamento

Deixo em anexo um exemplo de como pode ser feito.

Técnica retirada deste artigo

Abraços
por Damasceno Jr.
24 Ago 2018, 02:49
Fórum: Consultas
Tópico: Ao Cancelar/Fechar caixa de consulta parametrizada, abrir outro formulário
Respostas: 3
Exibições: 72

Re: Ao Cancelar/Fechar caixa de consulta parametrizada, abrir outro formulário

Veja se o exemplo anexado na mensagem ajuda Código usado no formulário personalizado Private Sub btCancelar_Click() DoCmd.Close acForm, Me.Name 'feche o formulário que contém o botão End Sub Private Sub btOK_Click() If Nz(Me!txtCNPJ) = "" Then 'se não digito...
por Damasceno Jr.
17 Ago 2018, 22:48
Fórum: Access x MySql
Tópico: [resolvido] ODBC
Respostas: 8
Exibições: 161

Re: ODBC

Não entendo o motivo do erro apontar para o localhost já que você está apontando para um servidor online. Aguardemos outras opiniões aqui.
por Damasceno Jr.
16 Ago 2018, 18:31
Fórum: Access x MySql
Tópico: [resolvido] ODBC
Respostas: 8
Exibições: 161

Re: ODBC

Então tente colocar os dados diretamente ao invés de tentar variáveis. Assim saberemos se a string de conexão tem algum erro Public Sub Conexao_Open(csql) 'Call MySQL_Server 'Carrega parametros do servidor cn.Open "Driver={MariaDB ODBC 3.0 Driver};Server= EnderecoServidor ;UID= ...
por Damasceno Jr.
15 Ago 2018, 23:11
Fórum: Access x MySql
Tópico: [resolvido] ODBC
Respostas: 8
Exibições: 161

Re: ODBC

o erro indica que o banco de dados não está rodando no servidor indicado. o banco de dados tá instalado na sua máquina (localhost)? Ou online?
por Damasceno Jr.
15 Ago 2018, 18:00
Fórum: Consultas
Tópico: Criar Tabela Unica
Respostas: 2
Exibições: 80

Re: Criar Tabela Unica

Faltou apenas relacionar as tabelas. Para isso, arraste um campo até o outro.

Montei uma relação qualquer para exemplificar.
Sem título111.jpg
por Damasceno Jr.
15 Ago 2018, 17:40
Fórum: Formulários
Tópico: [resolvido] Abrir relatorio de acordo o selecionados na list box
Respostas: 2
Exibições: 84

Re: Abrir relatorio de acordo o selecionados na list box

Para o tipo texto, basta fazer o laço for each montar o filtro colocando os valores selecionados entre apóstrofos ... For Each Sel In Me!ListaSG.ItemsSelected filtro = filtro & "'" & Me!ListaSG.Column(0, Sel) & " ' ," j = True Next ... Para abrir de ac...
por Damasceno Jr.
15 Ago 2018, 17:25
Fórum: Access x MySql
Tópico: [resolvido] ODBC
Respostas: 8
Exibições: 161

Re: ODBC

Experimente testar a conexão informando a senha diretamente Public Sub Conexao_Open(csql) Call MySQL_Server 'Carrega parametros do servidor cn.Open "Driver={MariaDB ODBC 3.0 Driver};Server=" & MyslqServidor & ";UID=" & MyslqUsuario & ";PWD= AquiSu...
por Damasceno Jr.
14 Ago 2018, 13:06
Fórum: Biblioteca de exemplos Ms Access
Tópico: SySCND - Sistema para Controle de Número de Documentos
Respostas: 19
Exibições: 4575

Re: SySCND - Sistema para Controle de Número de Documentos

Versão melhorada. Desabilitei o bloqueio de uso do aplicativo pois não uso mais o método de controle pela numeração do HD. O botão de tipo de documento é desabilitado dependendo do usuário ativo na máquina. O controle é feito no evento "ao Abrir" do menu. O fundo do MS Access está desabili...
por Damasceno Jr.
11 Ago 2018, 01:06
Fórum: Formulários
Tópico: [resolvido] Pesquisar em Listbox e imprimir.
Respostas: 3
Exibições: 184

Re: Pesquisar em Listbox e imprimir.

grande Carvalho... que tal criar uma outra listbox para receber os dados a serem filtrados? Tipo, uma com todos os itens e outra com os itens que serão usados como filtro. Assim, a medida que vai clicando duas vezes em um item ele vai passando pra outra listbox. No final, é só usar a listbox dos ite...
por Damasceno Jr.
02 Abr 2018, 10:47
Fórum: Módulos VBA
Tópico: [resolvido] Loop sem Do
Respostas: 2
Exibições: 298

Re: Loop sem Do

Vejo dois inícios de loop mas só um final: Private Sub Comando16_Click() Dim Rs As DAO.Recordset Dim N As Double Set Rs = CurrentDb.OpenRecordset("SELECT * FROM Lembrete_Calendario") Do While Not Rs.EOF Dim Mens As Object Dim Config As Object Set Mens = CreateObject("CDO.Message"...
por Damasceno Jr.
14 Mar 2018, 15:02
Fórum: Módulos VBA
Tópico: [resolvido] porcentagem
Respostas: 2
Exibições: 288

Re: porcentagem

Numa textBox desacoplada coloque:

Código: Selecionar todos

=( ( [CampoValorComTotalDeAulas] - [CampoValorComTotalDeAulasQueJáFez]) * 100) / [CampoValorComTotalDeAulas]
por Damasceno Jr.
19 Fev 2018, 17:34
Fórum: Access x MySql
Tópico: [Resolvido] Connection.Execute ou Command.Execute
Respostas: 2
Exibições: 458

Re: Connection.Execute ou Command.Execute

Resolvido! Com o objeto Command do ADO, você pode executar consultas da mesma maneira que as executa com os objetos Connection e Recordset, exceto pelo fato de que, com o objeto Command, você pode preparar ou compilar a consulta na origem do banco de dados e, em seguida, reemitir repetidas vezes a c...
por Damasceno Jr.
19 Fev 2018, 16:18
Fórum: Access x MySql
Tópico: [Resolvido] Connection.Execute ou Command.Execute
Respostas: 2
Exibições: 458

[Resolvido] Connection.Execute ou Command.Execute

Bom dia... já estou utilizando o básico do MySQL há um tempo e então decidi me aprofundar e melhorar a forma de funcionamento dos aplicativos que desenvolvo com base na "regra de ouro de acessar às tabelas somente quando necessário". Além das tabelas estou descobrindo também Storeds Prodec...
por Damasceno Jr.
17 Fev 2018, 22:15
Fórum: Off- Assuntos variados
Tópico: [resolvido] Ícone do aplicativo
Respostas: 25
Exibições: 8317

Re: [resolvido] Ícone do aplicativo

As possibilidades são: "C:\Program Files\Microsoft Office\Office14\MSACCESS.exe" c:\Prometeus\Prometeus.accdb "C:\Program Files(x86)\Microsoft Office\Office14\MSACCESS.exe" c:\Prometeus\Prometeus.accdb "C:\Arquivos de Programas\Microsoft Office\Office14\MSACCESS.exe" c:...
por Damasceno Jr.
11 Fev 2018, 11:33
Fórum: Formulários
Tópico: [resolvido] Quebrar linha no código
Respostas: 4
Exibições: 508

Re: Quebrar linha no código

Código:
If 1 = 1 Or _
2 = 2 Or _
3 = 3 Or _
... = ... Then ...

Pesquisa avançada