MrMALJ

Pra isso crie um campo para armazenar o valor unitário do produto na tabela detalhes do pedido, aqui vou chama-lo de vlrProdUnd Na propriedade "Após atualizar" do caixa Cod_Prod da tabela Detalhes do pedido insira um código assim: if me.vlrProdUnd=0 or isnull(me.vlrProdUnd) then me.vlrProdUnd=dlookup("[valorMaoObra]","Produtos","[codProd]="&me.Cod_Prod) end if No exemplo quando você terminar de atualizar o campo Cod_Prod da tabela Detalhes do pedido ele primeiro irá verificar se não há nenhum valor já inserido no campo vlrProdUnd, se não houver ele irá fazer uma busca na tabela produtos e pegará o valor lá informado (caso queira que ele faça sempre a busca retire a linha do IF e END IF). O problema e que pelo pude notar você centralizou os valores somente na tabela de produtos e os pedidos anteriores sofreram as mudanças e os que forem feitos apartir dessa mudança não, aconselho você a fazer uma cópia do seu sisteminha para uma eventualidade e fazer as alterações na cópia pois se necessário buscar dados anteriores a mudança basta você pegar do arquivo antigo. Acho que isso resolve, confirme depois!

no tópico endereço abaixo tem muitos sites com dicas e exemplos a ser vistos, penerados e utilizados... http://scriptbrasil.com.br/forum/index.php?showtopic=30730

Ter material didático nunca é ruim o preço me parece razoavel (diria barato até). Esse material talvez não consiga achar de graça mais tem muita coisa na net que pode complementar ou superar isso.

ummmmm... imaginei uma solução que não é muito elegante mais pode vir a funciona, veja bem cria uma caixa de texto do tipo data, no seu relatorio acho que pode deixa-la invisivel, essa caixa de texto irá guardar a data temporária inicial do período (vamos chama-la de ttData) então inicialmente vamos guardar a primeira data no periodo e no critério da consulta coloque algo assim: <= Relatórios![seuRelatorio]![Data] +15 então ao terminar esse processo repassar uma data na ttData 16 dias maior assim: me.ttData.value=me.ttData+16 e reexecutar a consulta ateh acabar os registros... bom acredito que deva funcionar, não testei só imaginei... se funcionar confirma ai!

Na propriedade da caixa de texto que deseja que amplie altere a propriedade "Pode ampliar" para sim isso resolve.

Roanldo existem diversas formas, no caso aconselho você a dar uma olhada nos exemplos do próprio (northwind), lá você verá como funciona e pode ateh utilizar alguma coisa!

Pra isso no seu pedido você tem que ter um campo pra receber o valor independente do campo valor da sua tabela produtos, assim quando você alterar o valor na tabela produtos os pedidos já preenchido não sofrerão alteração, quanto a busca você pode fazer um codigo assim: if me.pedVlrProd=0 or isnull(me.pedVlrProd) then me.pedVlrProd=dlookup("[valorTabelaProdutos]","tabelaProdutos","[codProdTabProdutos]="&me.codProdPedido) end if Note que esse é somente um exemplo, você deve colocar o nome e os campos qu você está usando... Se isso resolver seu problema por favor confirme ok!

Seguinte a um tempo atrás criei um Sistema em Access para controlar anuncios, contratos e outras particularidades de jornais, quando você trabalha em rede você irá necessitar guardar a base de dados principal num servidor e fazer o front end para rodar nas estações, notei que isso deixava o sistema muito lento, então pesquisei muito e encontrei uma solução que usei aqui e funcionou muito bem... trata-se simplesmente de criar um form com origem em uma das tabelas e deixar ele aberto (no meu caso deixo ele minimizado o tempo todo), não precisa colocar nada nele, isso resolveu comigo e o desempenho do sistema melhorou muito. Quanto a sua outra pergunta o access gerencia a inclusão dos registros e não tem perigo de você guardar dois lançamentos num só, só atente de que o campo que você utiliza como chave primária como um contador por exemplo seja do tipo autonumeração.

Tenta assim dim guarda as variant guarda=dlookup("[tab_ataulizaCod]","tab_atualiza","[tab_atualizaEmpresa]="&me.empresa) me.codigo.value=guarda guarda=dlookup("[tab_ataulizaEndereço]","tab_atualiza","[tab_atualizaEmpresa]="&me.empresa) me.ENDEREÇO.value=guarda .... e assim por diante, claro que fiz só um exemplo, você deve utilizar realmente a nomenclatura de seus campos. Se resolver seu problema confirme ok!

Fera se você puder mandar a parte de seu banco de dados (pelo menos a parte que tem isso) eu faço e mando de volta com as devidas alterações... mrmalj@yahoo.com.br

Bom não lembro do comando certo, mais você poderia tentar instalar só o runtime do access2000 já fiz ele rodar em maquinas meio antigas... mais vou dar uma procurada e se achar volto com o comando correto

Opa na minha opinião o Access é uma otima ferramenta e até onde usei ele nunca tive problemas, desde que haja um bom equipamento acho que dificilmente pode ocorrer um erro interno no BD,... erros todos os BDs estão expostos de uma forma ou outra, talvez o que posso pesar um pouco contra é que ele roda interpretado...

você pode criar um campo data que receba como padrão a data atual, e faça uma consulta contar com esse campo com critério a data atual quando chegar a 15 faça um código que não permita mais adições!

bom você pode criar uma consulta pra fazer a verificação e retornar se foi encontrado, algo mais ou menos assim dim tstFone,msg as variant tstFone=dlookup("[seuCampoDaTabelaTelefone]","suaTabelaTelefone","[seuCampoDaTabelaTelefone]="&me.seuCampoTelefoneDoFom) if tstFone<>null or tstFone<>"" then msg=msgbox("sua mensagem",vbokonly) end if bom acredito que era isso ai! se der certo confirme pra nós.

Bom isso me parece facilmente resolvido com as duas linhas abaixo DoCmd.GoToRecord , , acNewRec Me.seuCampo.SetFocus Acho que isso resolve, dê um retorno se foi resolvido

na sua consulta você pode criar um criterio tendo com base o que foi digitado, por exemplo quando se quer somente nomes iniciados com "paulo" você faria algo assim no criterio da consulta do campo Nome como "paulo"* Dessa forma ele pegaria tudo que começasse com paulo então você pode utilizar em vez do nome um referencia ao campo que você digita algo assim como [forms]![seuForm]![seuCampo]* isso deve resolver!

Você pode tentar fazer com que as caixas de texto fiquem juntas e com as bordas solidas

Ferramentas/Inicializar Lá você escolhe qual formulário o Access deve abrir sempre quando um determinado BD for aberto, ou você poderia criar uma macro autoexec, mais o metodo do menu ferramentas e bem mais facil

Fera pesquisei e achei alguém com um problema semelhante ao seu ele resolveu e postou em outra comunidade da forma abaixo: O problema é que uma arquivo da "Biblioteca de Objetos (DAO 3.5)" não esta sendo registrado automaticamente tendo que ser feito manual mente. Existe 2 formas para resolver esse problema, uma para Windows 98 e Windows ME e a outra para Windows NT, 2000 e XP. O que vou mostrar agora é para NT, 2000 e XP se alguém tiver alguns dos outros sistema me avisem que mostro como fazer nos outros. Para NT, 2000 e XP Iniciar, executar, digite cmd, ok, No propt de comando digite regsvr32 dao350.dll pressione enter digite exit e pressione enter reinicie o computardor e tente novamente. Se tudo de certo ao digitar o comando acima citado vai apresentar uma mensagem de confirmação. Qualquer duvida me avisem. OBS. o arquivo "dao350.dll" pode estar em uma pasta diferente ou com uma versao diferente, recomendo de execute o comando na mesma pasta onde ele estiver e com a versao que você tive, no meu caso era o "dao360.dll". Espero ter ajudado. retornem para dizer se conseguiram Bom essa foi a dica do colega estou deixando abaixo o nome e a comunidade do fera, afinal os creditos são dele!!! (Usuário wildcorreia Baboo)

Fera sinceramente não entendi bem ao certo o que você quer, mais você pode usar relacionamentos ou mesmo um código que atualize esses campos apartir de outro subform... dai pra dizer algo teria que ter mais detalhes ou quem sabe me enviar uma parte do que quer fazer para que posso avaliar, qualquer me add no MSN mrmalj@hotmail.com

Fera é seguinte você não passou informações tão significativas para quem pretende ajudar, mais pelo pouco que entendi, você pode utilizar o assitente de formularios do próprio access ou não para fazer isso, alterando a propriedade "Modo padrão" do formulário para "formulário continuo" ou folha de dados"... acho que era isso!

Fera na parte superior dessa seção tem um tópico fixo só com sites onde você encontra apostilas dicas e outros sobre access, mais se você está começando sugiro primeiro aprender um pouco de logica de programação!

Tenta importar a planilha do excel, algo mais ou menos assim Docmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel5, "TabelaDestino", "CaminhoDoExcel.xls", True Daí acredito que talvez você possa interagir, o problema é que ao fazer isso os dados da planilhas não sofrerão alterações, então se surtir efeito faça uma exportação dos dados da interação para uma planilha... bom faça os teste espero ter ajudado apesar de que não conhço muito deste recurso!

Jú você pode usar simplesmente o IF em código em tempo de execução, vamos supor quando seu o produto for selecionado na propriedade "Ao atualizar" do campo produtos você poderia fazer umas instrução semelhante a essa: if tableSalesProducts.idLicense = 7 then <faça executar uma query aqui> else <faça outra query aqui> end if isso me parece ser uma saída simples para sua questão, espero ter ajudado!!!

Pelo que pude ver o erro está no uso critério que está dentro das aspas isso pode ser resolvido assim =DSoma("[banc_Valor]";"Bancos Relatórios";"[banc_DC] ="&'1') e assim por diante, caso não resolva tente retirar o apostrofo do número.. Espero ter ajudado