A pesquisa encontrou 85 resultados

por silvio
11 Nov 2017, 11:58
Fórum: Tabelas
Tópico: [resolvido] Sumiram os dados do BD
Respostas: 7
Exibições: 74

Re: Sumiram os dados do BD

Bom dia...

Enviar somente a tabela com os dados não resolve nada, pode ser alguma coisa em um formulário, em uma consulta ou em alguma rotina.
por silvio
22 Ago 2017, 17:12
Fórum: Módulos VBA
Tópico: [resolvido] Evitar duplicidade com 2 tipos de critérios: Campo texto e chave estrangeira.
Respostas: 1
Exibições: 128

[RESOLVIDO ] Re: Evitar duplicidade com 2 tipos de critérios: Campo texto e chave estrangeira.

No evento antes de atualizar... Private Sub cbocodprod_BeforeUpdate(Cancel As Integer) Dim frm As Recordset Set frm = Me.RecordsetClone With frm .FindFirst "CodProdutoOculta='" & Me.CboCodProd & "' And CodSubPed=" & Me.CodSubped & "" If Not .NoMatch Then...
por silvio
22 Ago 2017, 12:54
Fórum: Módulos VBA
Tópico: [resolvido] Evitar duplicidade com 2 tipos de critérios: Campo texto e chave estrangeira.
Respostas: 1
Exibições: 128

[resolvido] Evitar duplicidade com 2 tipos de critérios: Campo texto e chave estrangeira.

Prezados colegas bom dia. Já quebrei a cabeça aqui desde domingo. Vamos aos fatos. Tenho um formulário com sub formulário,ambos funcionando perfeitamente. No Sub formulário há o campo filho CodSubPed ( chave estrangeira ). Nesse mesmo sub formulário tenho uma combobox ( formato texto devido a mistur...
por silvio
08 Ago 2017, 17:49
Fórum: Formulários
Tópico: [resolvido] Filtrar combobox tendo origem uma caixa de texto
Respostas: 1
Exibições: 166

Resovido Filtrar combobox tendo origem uma caixa de texto

Resolvido da seguinte forma.

Em Critérios de consulta, no campo especifico

Como Esquerda([Forms]![SeuFormulário]![seu campo de origem];2) & "*"
por silvio
08 Ago 2017, 12:05
Fórum: Formulários
Tópico: [resolvido] Filtrar combobox tendo origem uma caixa de texto
Respostas: 1
Exibições: 166

[resolvido] Filtrar combobox tendo origem uma caixa de texto

Prezados bom dia. Tenho uma caixa de texto ( formato texto ) e nessa caixa de texto vai o nome de um fornecedor qualquer. Vamos chamá-la de caixa1. No mesmo formulário tenho uma combobox com diversos valores, no formato de texto. Essa combobox tem os seguintes valores cadastrados: Alto 10DD/20DD/30D...
por silvio
20 Mar 2017, 18:11
Fórum: Tabelas
Tópico: [resolvido] Campo memorando truncado em 255 caracteres
Respostas: 1
Exibições: 299

Resolvido: Campo memorando truncado em 255 caracteres

Solução:
Criação de uma consulta baseada na tabela em questão
Fonte de registro do formulário é a tabela criada.

Não entendi até agora o por que disso. Mas está resolvido.
por silvio
20 Mar 2017, 14:45
Fórum: Tabelas
Tópico: [resolvido] Campo memorando truncado em 255 caracteres
Respostas: 1
Exibições: 299

[resolvido] Campo memorando truncado em 255 caracteres

Bom dia. Tenho um tabela feita em Ac2007 com um campo memorando. No Ac2013 está como texto longo. O que me intriga e ainda não achei a solução para isso. 1- Não passa de 255 caracteres sendo que o help dos Ac´s 2007/13 dizem que passa de 65.000 caracteres. 2- Incluindo ( digitando ou copiando ) dire...
por silvio
12 Jan 2017, 20:09
Fórum: Formulários
Tópico: [resolvido] Botão Novo Cliente!
Respostas: 5
Exibições: 474

Re: [resolvido] Botão Novo Cliente!

Beleza então, mas não se esqueça de dar o tópico por resolvido.
[]'s
por silvio
12 Jan 2017, 16:37
Fórum: Formulários
Tópico: [resolvido] Botão Novo Cliente!
Respostas: 5
Exibições: 474

Re: Botão Novo Cliente!

Dando um pitaquinho...
Se o campo "numero" for chave primária ele não poderá ser novamente reutilizado.

Veja a definição
http://juliobattisti.com.br/accbasico/modulo1/licao3.asp
por silvio
13 Dez 2016, 16:17
Fórum: Formulários
Tópico: [resolvido] Preenchimento do telefone no formulário com o 9 a mais na frente
Respostas: 3
Exibições: 369

Re: Preenchimento do telefone no formulário com o 9 a mais na frente

Experimento isso...na mascara de entrada: !\(99\)9\-9900\-0000;0;_ Ou se preferir, no evento após atualizar do campo telefone: Private Sub Telefone_AfterUpdate() If Len(Telefone) <> "" Then Select Case Len(Telefone) Case 10 Me.Telefone.Format = "(@@)- @@@@-@@@@" Case 11 Me.Telefo...
por silvio
05 Dez 2016, 16:34
Fórum: Formulários
Tópico: [resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.
Respostas: 4
Exibições: 444

Re: [resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.

No código anterior, tive um problema com nomes compostos ( maria do rosario ) ou seja, nomes com espaços. Mas eis uma solução alternativa. Private Sub Pesquisa_Change() On Error Resume Next Me.KeyPreview = True If VarTecla = 1 Then VarTecla = 0 Else Me.Form.RecordSource = "SELECT * FROM TblAcer...
por silvio
05 Dez 2016, 15:09
Fórum: Formulários
Tópico: [resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.
Respostas: 4
Exibições: 444

RESOLVIDO Re: Caixa de texto desacoplada não mantém o foco ao digitar.

Avelino e demais usuários... Ficou assim.. Private Sub pesquisa_Change() Dim C As String Dim X As String X = Me.pesquisa.Text C = " where NomeCliente like '*" & X & "*' " Me.Form.RecordSource = " SELECT * FROM Tbl_CadCli " & C Me.pesquisa.Set...
por silvio
05 Dez 2016, 13:48
Fórum: Formulários
Tópico: [resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.
Respostas: 4
Exibições: 444

Re: Caixa de texto desacoplada não mantém o foco ao digitar.

Avelino...bom dia.

Erro 2185....nessa linha
me!pesquisa.selStart = Len(x & "")
por silvio
05 Dez 2016, 13:37
Fórum: Formulários
Tópico: [resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.
Respostas: 4
Exibições: 444

[resolvido] Caixa de texto desacoplada não mantém o foco ao digitar.

Prezados bom dia. Tenho um formulário continuo com alguns dados, nele eu coloquei uma caixa de texto desacoplada para realizar uma busca nesse referido formulário. Porém eu não consigo digitar mais que um caractere que o mesmo salta para o próximo campo, tenho que ficar clicando com o mouse para pod...
por silvio
08 Nov 2016, 12:36
Fórum: Formulários
Tópico: [resolvido] Como retirar mensagem em formulário após verificação de registro existente
Respostas: 7
Exibições: 796

Re: Como retirar mensagem em formulário após verificação de registro existente

Bom dia, se me permitem um pitaco. Eu, particularmente, não gosto muito de ter os campos de CPF e CNPJ juntos. Prefiro separados, pois deixa a busca mais rápida. Outra coisa que eu notei na imagem. Quando se colocam juntos CPF e CNPJ tem que tratar os mesmos com " input mask" para fazer o ...
por silvio
03 Nov 2016, 16:11
Fórum: Relatórios
Tópico: [resolvido] Impressão de Cupom não Fiscal
Respostas: 7
Exibições: 927

Re: Impressão de Cupom não Fiscal

Boa tarde.

Que bom que deu certo a si.
Normalmente é apenas uma via, mas aqui, quando precisa o usuário após a primeira impressão, pressiona novamente o botão imprimir.
por silvio
29 Out 2016, 17:01
Fórum: Relatórios
Tópico: [resolvido] Impressão de Cupom não Fiscal
Respostas: 7
Exibições: 927

Re: Impressão de Cupom não Fiscal

Tardesss

Eu uso o código que lhe passei numa Bematech não fiscal e não tenho problema algum com ele.
Dá certo sim. Adapte ele as tuas necessidades, vai dar certo sim.

Abraços.
por silvio
28 Out 2016, 16:42
Fórum: Relatórios
Tópico: [resolvido] Impressão de Cupom não Fiscal
Respostas: 7
Exibições: 927

Re: Impressão de Cupom não Fiscal

Se me permitem, segue o código que eu uso para impressora não fiscal. Private Sub bt_bematech_Click() If MsgBox("Deseja imprimir o Cupom ?", vbInformation + vbYesNoCancel, Me.Caption) = vbYes Then Dim DB As DAO.Database Dim RSP As DAO.Recordset ' Ordem de Serviço Dim RSD As DAO.Recordset '...
por silvio
21 Out 2016, 13:02
Fórum: Biblioteca de códigos VBA, API e VbScript
Tópico: Deletando todas as tabelas
Respostas: 1
Exibições: 602

Deletando todas as tabelas

Por vezes, fornecemos alguma versão de demonstração para futuros clientes. E por vezes, tentam quebrar a segurança do ( e em alguns casos conseguem ) prazo de validade. Criado em Access 2007, testado com sucesso em duas versões de demonstração ! Esse código abaixo coloque o mesmo no primeiro formulá...
por silvio
08 Set 2016, 19:13
Fórum: Módulos VBA
Tópico: [resolvido] Combobox filtra listbox em formulario desacoplado
Respostas: 8
Exibições: 552

Re: [resolvido] Combobox filtra listbox em formulario desacoplado

Avelino, somente um duvida... veja a sintaxe abaixo Private Sub LstCor_DblClick(Cancel As Integer) Forms!FrmPedido!SFDpedido!CboCodProd = Me.LstCor.Column(1) Forms!FrmPedido!SFDpedido!Cor = Me.LstCor.Column(2) DoCmd.Close End Sub A referencia na combobox some...mas a cor é inserida. Tem ideia do que...
por silvio
08 Set 2016, 18:47
Fórum: Módulos VBA
Tópico: [resolvido] Combobox filtra listbox em formulario desacoplado
Respostas: 8
Exibições: 552

Re: Combobox filtra listbox em formulario desacoplado

Avelino...show de bola mesmo.

Muito obrigado mesmo. Estava a um bom tempo com isso parado aqui, quebrando a cabeça.

Gratidão !
por silvio
08 Set 2016, 18:35
Fórum: Módulos VBA
Tópico: [resolvido] Combobox filtra listbox em formulario desacoplado
Respostas: 8
Exibições: 552

Re: Combobox filtra listbox em formulario desacoplado

Avelino, já vou testá-los...

Um instante, por gentileza.
por silvio
08 Set 2016, 18:05
Fórum: Módulos VBA
Tópico: [resolvido] Combobox filtra listbox em formulario desacoplado
Respostas: 8
Exibições: 552

Re: Combobox filtra listbox em formulario desacoplado

Avelino, lhe passei o sistema completo via e-mail.
por silvio
08 Set 2016, 17:14
Fórum: Módulos VBA
Tópico: [resolvido] Combobox filtra listbox em formulario desacoplado
Respostas: 8
Exibições: 552

Re: Combobox filtra listbox em formulario desacoplado

Boa tarde Avelino...

Retorna apenas a referência, nesse caso testado.....34501

Pesquisa avançada