Elber Carretoni

cara...perfeito...supimpa... funcionou certinhooo...vlw o help mais uma vez malj!!!

Salve salve rapaziada... a dúvida agora é a seguinte: tenho uma tabela que possui um campo caixa de seleção que determina se o respectivo registro está ativo ou não... estou fazendo um relatório destes registros, porém não gostaria que aparecesse neste relatório a caixa de seleção do campo que determina se o registro esta ativo ou não...portanto, coloquei essa caixa de seleção como invisível no relatório e inseri uma programação que faz uma condicional no evento AO ABRIR do relatório: -> caso a caixa de seleção esteja habilitada, a legenda de um rótulo visível é alterada e sua cor também é modificada... porém, quando mando executar o relatório, o access me envia o erro 2427 indicando que a determinada expressão que verifica se a caixa de seleção está checada, não tem valor... ( IF me.CAIXA_DE_SELEÇÃO = -1 THEN ) o relatório possui na verdade como fonte de controle uma Consulta, e não necessariamente a tabela... alguém sabe porque acontece isso e, teria alguma outra forma pra empregar essa condicional e me proporcionar os mesmos resultados? PROGRAMAÇÃO: If Me.Inativo = -1 Then 'quer dizer que está inativo Me.RotuloInativo.Caption = "INATIVO!" Me.RotuloInativo.ForeColor = 15132415 Else 'quer dizer que está ativo Me.RotuloInativo.Caption = "ATIVO!" Me.RotuloInativo.ForeColor = 14680031 End If vlw a atenção, abraços!!!

crie uma consulta que traga os valores da sua tabela através dos critérios que você digitou no formulário... a partir de então, como fonte de controle do seu relatório, indique esta consulta.. dessa forma, só vai ser gerado o relatório dos dados que estiver na consulta... se você quiser fazer um relatório sem nenhuma consulta e sem nenhuma fonte de dados, retire a fonte de controle do seu relatório e em cada campo, individualmente, indique como fonte o caminho do seu formulário e respectivamente o campo que vem do seu formulário...sendo assim, os dados que estiver no seu formulário vão ser transferidos automaticamente...nunca necessitei fazer isso e não tenho completamente certeza que dê certo, mas acredito que sim... indique os caminhos dessa forma: [Formulários]![Nome_Do_Seu_Formulário]![Campo_Do_Seu_Formulário] deu pra entender? se não, tento explicar de forma melhor ou fazer algum exemplo.. abraços,

Fiz os testes...funcionou certinhu! criei um formulário, determinei um timer e efetuei a programação assim que acabasse o tempo... Evento "No Timer" = programação Intervalo de Cronômetro = tempo desejado

Malj, tem realmente certeza que esse anexo não é somente para administradores e moderadores? não to axando essa caixa pra procurar o arquivo aqui não fera! Acácio, to enviando o exemplo pelo seu e-mail agora... Abraços, Boa noite!

verifiquei os dois modos de acesso, e com os dois o erro ainda permanece... kiki eu faço? verifiquei os dois modos de acesso, e com os dois o erro ainda permanece... kiki eu faço? ahhh, graças a Deus acho que consegui...fucei aqui e acho que encontrei a solução... vou estar fazendo testes e assim que tiver uma garantia perfeita envio a solução.... vlw a força! Nas Propriedades do meu Formulário, retirei a Proteção dos Registros e Permiti a Edição dos registros também... depois dessa cagada que fiquei fuçando, prosseguiu o funcionamento... não tenho garantias corretas de que essa é a solução perfeita, porém, acredito que seja... vlw a atenção leitis! abraços!

galera...acabei descobrindo como faz para abaixar o nível das macros e o postei a solução num outro tópico mais recente que tratava do mesmo assunto: http://scriptbrasil.com.br/forum/index.php?showtopic=101722 abraços,

Acácio, estou com o tempo apertado...Ainda não deu pra arrumar aquele exemplo pra você.. Malj, como faço pra anexar arquivos na mensagem? Acácio, estou com o tempo apertado...Ainda não deu pra arrumar aquele exemplo pra você.. Malj, como faço pra anexar arquivos na mensagem? O EXEMPLO JÁ ESTÀ PRONTO! Só PRECISO ARRANJAR UMA MANEIRA DE TE ENVIAR, ACÁCIO! AQUI NO SERVIÇO O SERVIDOR PROXY BLOQUEIA SERVIDORES DE E-MAIL... SE TIVESSE COMO ANEXAR O EXEMPLO AQUI, EU já COLOCARIA AGORA PRA você.. CASO CONTRÁRIO, DENTRE HJ DE NOITE (A PARTIR DAS 23:30) OU AMANHÃ DE MANHÃZINHA TE ENVIO PELO E-MAIL DE CASA!!! ABRAÇÃO!

Esses avisos sempre vão aparecer devido porque macros ou instruções vba podem conter informações com a intenção de danificar seu computador...vírus! Esses avisos também são delimitados conforme o nível de segurança de suas macros/vba...se for um nível baixo, essa mensagem não vai aparecer...se for um nível médio, haverá a possibilidade de escolha para habilitar ou não as macros/vba...se for um nível alto, só macros com assinaturas digitais e em locais corretos podem ser executadas (nesse último caso nem mensagem aparece). porém, ao tornar o nível das macros/vba como baixo, não só o seu arquivo atual mdb fica configurado dessa maneira, mas sim o access todo...deu pra entender? Vale a pena pensar também nessa vulnerabilidade... Para mudar o nível de segurança de uma Macro/VBA, vá no menu Ferramentas<>Macro<>Segurança.

verifiquei os dois modos de acesso, e com os dois o erro ainda permanece... kiki eu faço? verifiquei os dois modos de acesso, e com os dois o erro ainda permanece... kiki eu faço? ahhh, graças a Deus acho que consegui...fucei aqui e acho que encontrei a solução... vou estar fazendo testes e assim que tiver uma garantia perfeita envio a solução.... vlw a força!

ninguém SABE MESMO SOBRE ESTE ERRO, Número '3008'? :( to dependendo disso pra continuar a viver!!!

use uma função VBA chamada DLOOKUP que, a partir do código do cliente selecinoado na caixa de listagem, traz da sua tabela os outros valores... No evento "Ao Clicar" da sua listbox, faça a programação através da síntaxe abaixo: meSeu_Campo_NãoAcoplado_Cliente = DLookup("[Nome_Cliente]", "TabelaCliente", "[Codigo_Cliente] = " & me.Seu_Objeto_Listbox.Column(0)) ou seja, seu campo não acoplado nome cliente vai receber o valor do campo Nome_Cliente que vem da TabelaCliente, fazendo como critério desta pesquisa quando o Codigo_Cliente da TabelaCliente for igual ao Codigo do cliente selecionado na listbox (Coluna zero da listbox). Os nomes dos campos aqui nessa fórmula tem que ser idênticos aos nomes dos campos na sua tabela, inclusive o nome da tabela! Deu pra entender? caso a coluna da listbox não seja 0, tente 1... faça os testes e não esquece de retornar o resultado. abraços,

ixi cara...deve ter como fazer isso sim, eu só não conheco a propriedade vba que mexe com o estilo de aparência do objeto imagem... vo tentar dar uma fuçada aqui e se eu encontrar alguma coisa, te passo os canais... mas, me diz uma coisa..se você tornou o fundo da imagem como transparente, no botão também não fica com o fundo transparente? Do jeito anterior não ficava não =/ Do jeito que você me explicou .. em inserir/objeto/ imagem do microsoft word > esse funcionou certinho ^^ Thanks []´s deu certo então fera?

li a um tempo atrás informações sobre programas, tipo instalshield, que gerava o executável de arquivos access... pra ser bem sincero faz tempo e nem me recordo direito se realmente é isso, ou se funciona, já que nunca fiz isso também...

maximizando o formulário todas as barras de menu já ficam ocultas, mas caso queira não maximizar o formulário na tela e somente retirar todas as barras de menus, utilize a função docmd.ShowToolbar DoCmd.ShowToolbar "Banco de Dados", acToolbarNo DoCmd.ShowToolbar "Barra de Menus", acToolbarNo Acredito que essas duas barras sendo retiradas já é o suficiente!

que pena que não deu certo cara... se você está usando uma scanner de mão ou não, é indiferente no resultado da programação... por exemplo, você pode digitar o número serial e retirar o produto do estoque ou você pode utilizar a scanner de mão pra trazer o número serial para depois retirá-lo do estoque...de qualquer forma, inevitavelmente você vai necessitar do número serial, podendo este ser considerado como quase uma chava primária das suas tabelas de estoque. A programação que eu optei por te proporcionar acredito que vá ficar inalterada...a única diferença da utilização do scanner de mão é em qual evento você vai utilizar esta programação: se é logo após escanear o serial ou logo após clicar em algum botão...entendeu? Tenho um exemplo aqui sim, e bem básico...na verdade, fiz um protótipo que executa a mesma função que você pretende, porém, com algumas diferenças de implementação do sistema...independente disto, o resultado é o mesmo e a baixa no estoque é a mesma (utilizando um valor único para cada registro na tabela que, ao ser digitado e clicado num botão, exclui o registro de uma tabela e insere-o em outra tabela) vou ajustar este protótipo para deixá-lo mais explicativo e te envio por e-mail...vou tentar te enviar amanhã de manhã, se der tempo... até lá, não desiste de tentar... Amén, abraços, Deus te abençõe também fera!

ixi cara...deve ter como fazer isso sim, eu só não conheco a propriedade vba que mexe com o estilo de aparência do objeto imagem... vo tentar dar uma fuçada aqui e se eu encontrar alguma coisa, te passo os canais... mas, me diz uma coisa..se você tornou o fundo da imagem como transparente, no botão também não fica com o fundo transparente?

ixi, pra mim você está falando Japonês também...rs

Rodrigo, se você está utilizando um form e um subform, é porque os registros que estão no subform são relacionados com a tabela do form principal...certo? Neste caso, se você criou um subformulário da "maneira correta", o access automaticamente vincula os registros do subform ao registro do form principal, fazendo a atualização do subform também toda vez que você navegar pelos registros do form principal. deu pra entender? Caso, de maneira mais "manual", você tenha criado o subformulário através de uma consulta que filtra todos os registros a partir do registro principal do formulário, é bem provável que o access não atualize automaticamente o subformulário, já que isso é vinculado a uma consulta... (não tenho completamente certeza). Então, você terá que atualizar o subformulário via programação e a consulta também será atualizada...se este for o seu caso, no evento "NO ATUAL" do seu FORMULÁRIO PRINCIPAL, insira a programação: Me.Nome_Do_Objeto_Subformulário.Requery. Assim, toda vez que você navegar pelos registros do form principal, o subformulário também será atualizado. Pra criar um subformulário vinculando registros ao formulário principal automaticamente, no modo Assistente, aparecerá uma janela pedindo pra você vincular dois campos principais que façam referencia às duas tabelas. Portanto, referencie o campo TabelaPrincipal_ID da sua tabela principal, e na sua 'subtabela' referencie o campo SubTabela_ID_da_TabelaPrincipal, ficando dessa forma: TabelaPrincipal_ID <-> SubTabela_ID_da_TabelaPrincipal faça os testes e nos retorne o resultado, abraços!

pra deixar o fundo da imagem transparente você precisa converter o arquivo da imagem pra .png... mesmo estando png e não ficando transparente, no objeto da imagem verifique se o mesmo esta com cor de preenchimento..se estiver, deixe transparente e deixa a linha de contorno transparente também! você pode executar uma ação não necessariamente por um objeto botão...qualquer objeto do formulário possui eventos que permitem ação. claro que os objetos botões proporcionam uma gama maior de eventos a serem utilizados, porém nada impede de que você utilize uma imagem por exemplo para, no envento "Ao Clicar", executar a mesma ação que seria executada pelo botão...a única diferença é que a imagem não apresenta a simulação 3D automática do botão se "afundando" com o clique do mouse. para utilizar uma imagem no seu formulário, você pode ir no menu "INSERIR > IMAGEM..." e selecionar a imagem no arquivo, ou inserindo um objeto (na barra de ferramentas) "QUADRO DE OBJETO NÃO-ACOPLADO, CRIAR NOVO, TIPO DO OBJETO: Imagem do Microsoft Word e, através do MSWord, inserir a imagem a qual será vinculada com seu formulário. A segunda opção, QUADRO DE OBJETO NÃO-ACOPLADO, proporciona maior diversidade de eventos. Porém, em ocasiões simples, acredito que como a sua, não seja necessário tanto evento assim. Esta opção também permite você aumentar o diminuir a imagem através do word (apesar da perda de resolução ao aumentar ou diminuir a mesma). A primeira opção, INSERIR>IMAGEM..., não permite você alterar o tamanho da imagem, sendo possível apenas inseri-la no formulário no tamanho que a mesma foi criado. nos retorne o resultado. abraço,

me desculpe se expressei mal, mas obtive outra impressão em relação a sua dica... talvez por que não encontrei o seu link indicado, e quando cliquei começou a desencadear várias outras janelas da internet me direcionando para páginas que o servidor proxy bloqueou...portanto, acreditando que fosse vírus, alertei o pessoal sobre essa hipótese... realmente, mil desculpas se de alguma forma me enganei e acabei te ofendendo... de qualquer maneira, fiz os dois procedimentos que você aconselhou mas não obtive resultado... poderia retornar o link para podermos conferir sua fonte de dados? por favor... perdão, abraços,

baixar o nível de segurança das macros...ok, mas como faço isso? e se eu não estiver usando nenhuma macro, apenas aplicação vba? como faço pra baixar o nível destas também? o post da tela de splash do fernando é furada...perca de tempo!

ótimo esqueleto do sistema mr.acacio...acredito que realmente a maneira mais correta de gerar esses dados é armazenando em 4 tabela (2 relacionamentos '1 para muitos') com 2 formulários (que incluem 2 subformulários representando os relacionamentos)... em relação aos subformulários, aconselho você a utilizar objetos LISTBOX...não sei, impressão minha...rs...uma vez fiz um sistema muito parecido com o seu, que utilizou a mesma estrutura, e o subformulário no modo folha de dados deu alguns paus...além de que a LISTBOX apresenta um design bem mais razoável é a implementação da mesma é bem mais fácil, já que vai ser considerada um campo não-acoplado do seu formulário principal... bom, o que temos que fazer agora é, consecutivamente à exclusão dos registros na tabela estoque, a inserção dos registros na tabela saída... fiz os testes aqui antes de te enviar esta resposta, e utilizei parâmetros SQL para fazer essa inserção (não consegui fazer por consulta adição...também to aprendendo junto com você...rs)... caso você tenha alguma dúvida em sql, achei um site bem supimpa que dá vários tutoriais sobre síntaxes em sql: http://www.criarweb.com/sql/ no evento que você pretende utilizar para efetuar a saída de estoque, coloque a seguinte programação: 'declara uma varíavel string para determinar o parâmetro sql Dim vsql As String 'síntaxe sql para inserção de um registro em uma tabela: 'Insert Into clientes (nome, sobrenomes, endereço, cidade, código postal, e-mail, pedidos) Values ('Pedro', 'Palotes', 'Percebe n°13', 'Londrina', '123456', 'pedro@criarweb.com', 33) 'CONSTRUÇÃO DO PARÂMETRO DE INSERÇÃO EM SQL vsql = "Insert Into TABELA_ESTOQUE_SAIDA (Campo1, Campo2) Values ('" 'inicia a base do parâmetro sql, definindo qual tabela, quais campos e inicia o parênteses de valores... obs.: observe que no final da linha há uma ASPA simples a ASPAS duplas!!! Aspas duplas determinam o comprimento total da string, e aspas simples fazem, simplesmente, parte do valor da string vsql = vsql & Me.CampoFormulario1 & "', '" & Me.CampoFormulario2 & "')" 'continua à construção do parâmetro sql, definindo quais os valores que serão enviados para os campos indicados da tabela! 'EXECUTA A SQL DoCmd.RunSQL vsql 'ATUALIZA O SEU SUBFORMULÁRIO PARA FAZER MOSTRAR O REGISTRO QUE ACABOU DE SER INSERIDO Me.Seu_Objeto_Subformulário.Requery ***** - as indicações em negrito são variáveis, conforme as nomeações que você deu! o que foi feito aí em cima foi a inserção do registro na tabela saida com valores que vêm do seu formulário e posteriormente a visualização do registro inserido num subformulário... a parte que reinclui o registro na tabela estoque verificando várias condicionais de estado do produto agente pensa um pokinhu mais pra frente, ok? faça os testes aí e retorna o resultado...espero que consiga! abraços,

salve salve galera... ao abrir algum sistema em access é enviado uma mensagem de 'Aviso de Segurança' perguntando se você deseja realmente abrir o arquivo e informando que pode haver programações as quais possam danificar o computador... gostaria de saber se tem como retirar esse aviso padrão do access? alguém sabe também como criar uma tela de splash? aquelas telas que, por exemplo, todos os aplicativos da microsoft office abrem como carregamento antes do programa começar a funcionar? abração! gracias!!!

você pode ciar um formulário com um campo não-acoplado que receba o determinado critério que você queira digitar, e em todos os campos critérios de sua consulta você indica esse mesmo campo do formulário... seria o necessário?