Humm

bom, se entendi.. então voce precisa do seguinte: criar uma tabela "funcionarios" pra armazenar os dados de cadastro dos funcionários -> registro, nome, funcao, endereco, tel, etc e tal criar outra tabela para a movimentação de horas do funcionário: -> registro, reg_funcionario(este campo é um campo filho, que fará referencia a tabela [funcionarios]), data, hora_entrada, hora_saida ai você cria então formulários.. um para cadastrar os funcionarios e seus dados.. se voce tiver esse cadastro já organizado em excel, voce pode importar os dados.. não vincule a tabela, apenas importe os dados. então voce cria outro formulario no access para dar entrada nos movimentos de horarios e datas.. quando voce quiser obter informações referentes aos horarios, voce cria consultas para resgatar essas informacoes. voce ate pode criar um formulario para chamar a consulta, onde o criterio voce define digitando no formulario para não ter que estar toda vez mexendo nas estruturas de tabelas e consultas. entenda que o access é uma ferramenta de banco de dados e aplicação, a ideia é automatizar o serviço o maximo possivel e criar uma interface amigavel para o uso. depois voce pode criar relatorios que possam imprimir essas informacoes.. como cadastro dos funcionarios, folha de ponto, etc e tal.. qualquer tipo de calculo, o access é capaz de realizar. para isso usa-se campos calculados em formularios, consultas e relatorios. para voce ter uma ideia de um resultado final feito em access, do que é possivel fazer.. baixe essa aplicação que eu desenvolvi. http://www.hardware.com.br/comunidade/prog...12/#post5346131

tem que usar os operadores ENTRE #data# E #data#

oi amigo, esse teu sistema de login ta muito rustico.. eu postei aqui nesse forum um exemplo em accdb de um sistema de login onde você cadastra usuarios, etc e tal.. e inclusive com exemplo de como criar regras para cada nivel de usuario ao abrir os forms.

então diga o que precisa, esquecendo de tabelas e tal.. diga como se fosse completamente leigo em informatica que ai tentamos te orientar em como montar um sistema dinamico.

bom eu não entendi bem o qu quer fazer mas acho q você ta confundindo access com excel com certeza não são necessarias todas estas tabelas, já que pra recuperar informações, você pode usar as consultas, criterizando as datas quando quiser. repense o que precisa, lembrando que no access, por se tratar de banco de dados, você so tem q armazenar dados de forma não redundante e com boa dinamica.

certamente você alterou as opcoes deste banco de dados em questao, mandando não exibir mais estes controles. pra desabilitar isso, abra o seu aqruivo com a tecla SHIFT apertada.. ou seja.. va no explorer, selecione o arquivo do seu BD, mantenha SHIFT apertada e tecle ENTER para abrir.

tambem pode colocar no banco, na tabela de vendas, os campos: produto valor_un qtde desconto ou seja, desconto por produto, pois você pode ter produtos q n tem desconto.. se usar um campo so de desconto para a venda toda, então você teria q fazer duas vendas.. tendo desconto por item de venda é melhor.

não entendi.. mas vou explicar melhor.. lembra aquele lance de compilar ACCDE por codigo? então.. meus aplicativos tem um form MENU PRINCIPAL nesse form, é exibida a versao atual da compilacao em um rotulo. digamos, 1.0 então como eu sempre vou adicionando recursos na aplicacao com o tempo, corrigindo bugs etc e tal, criei um form onde marco as opcoes do acces, defino o nome da aplicacao(app title) e tambem criei um campo onde eu digito o numero da versao da compilacao. assim que atualizo esse campo, roda uma rotina que muda o nome do rotulo q tem a versao no menu principal pela q eu digite.. e de fato muda, mas não persiste, sacou? assim q eu sair do access e voltar, volta o numero q defini manualmlente no form antes. eu n posso criar um tabela para tal, pois minhas aplicacoes tem front e back end. ou seja, o cliente atualiza a aplicacao, mas nem sempre o bd. então, como alterar essa propriedade NOME do rotulo de outro form por codigo vb de forma definitiva? Private Sub vs_AfterUpdate() Forms![Menu Principal]![ver].Caption = Me.vs End Sub

oi amigo.. eu tambem desenvolvo sistemas pra comercios e vendas. eu adoto uma metodologia diferente, que é: no cadastro de produtos, crio uma nova tabela pra cadastrar preços e a data desse preço. ou seja, cada produto pode ter varios preços, pois com o passar do tempo os preços mudam e assim mantem-se tambem um historico deles. na tabela de vendas, o campo de preço é selecionavel, mas por padrão ele preenche o preço da ultima data. uma observacao q venho te fazer é.. na verdade um produto n pode ter 2 preços.. um pra a vista e outro pra a prazo.. isso é contra lei. se eu por exemplo comprar com você um produto A q custa 10 reais a vista, e amanha comprar novamente esse produto e na nota vir dizendo q é mais caro por ser a prazo, eu posso exigir que seja do valor menor. ou seja, não pode haver discriminação por causa da forma de pagamento. neste caso, há duas opcoes amparadas pela lei. ou usa-se juros pra aumentar o valor de a vista quando for vender a prazo, sendo que tem q vir discriminado a porcentagem de juros. ou usa-se um valor mais caro, e da-se desconto nos pagamentos a vista, isso pode. te falo isso pois já tive clientes que tiveram problemas com isso, e perderam grana. já em relacao a forma de pagamento, crie um tabela separada so pra esse fim, ela ficara vinculada a tabela venda e registrará as entradas de pagamento.. pois o cliente pode querer pagar um tanto em dinheiro e outro no debito por exemplo, sacou? vlw

Segue um sistema de login proprio com sistema de segurança a nivel de usuario pra incrementar a sua aplicação. Download prints primeira janela ao abrir a aplicação.

coloquei prints

boas.. Forms![seu form]![rotulo].Caption = valorDesejado altera o valor do rotulo. legal. mas.. se você fechar esse form, e reabrir.. ele vem com o valor anterior, que você setou diretamente nas propriedades do form em design.. como fazer pra mudar permanentemente um rotulo de outro form que está aberto?

Segue ai um exemplo de um form cheio de rotinas uteis pra que precisa ficar gerando toda hora um accde, onde você seta as opcoes do access num form so, bem pratico! vlw gerador de ACCDE.rar opcoes antes de compilar para ACCDE apos compilar você pode retornas todas as opcoes para ativadas novamente com 1 click

salve. como checar via codigo vba se uma determinada macro existe?

Private Sub BT_COMPILA_Click() Dim app As New Access.Application Dim CodigoFonte As String Dim Temp As String Dim Compilacao As String CodigoFonte = CurrentDb.Name Temp = CurrentProject.PATH & "\temp.accdb" Compilacao = Left(CurrentDb.Name, (Len(CurrentDb.Name) - 5)) & "accde" FileCopy CodigoFonte, Temp app.AutomationSecurity = msoAutomationSecurityLow app.SysCmd 603, Temp, Compilacao ta dando erro no filecopy erro em tempo de execução 70 permissão negada ou seja, ele não me deixa copiar o currentbd pois alega que está em uso e assim, bloqueado. mas isso so no entendimento do access, pois mesmo aberto eu consigo dar um copiar/colar pelo windows explorer sem problemas. se eu testar com outro arquivo q n seja o currentdb, funciona. RESOLVIDO: Private Sub BT_COMPILA_Click() 'declarações Dim app As New Access.Application Dim CodigoFonte As String Dim Temp As String Dim Compilacao As String Dim objfs As Object CodigoFonte = CurrentDb.Name Temp = CurrentProject.PATH & "\temp.accdb" Compilacao = Left(CurrentDb.Name, (Len(CurrentDb.Name) - 5)) & "accde" 'copiando projeto em temp Set objfs = CreateObject("Scripting.FileSystemObject") objfs.CopyFile CodigoFonte, Temp 'transformando temp em accde app.AutomationSecurity = msoAutomationSecurityLow app.SysCmd 603, Temp, Compilacao 'deletando temp Kill Temp End Sub

boa ideia.. tentarei

sera q n tem outro caminho pra fazer a função do CRIAR ACCDE ? talvez com send keys

Criei um codigo que primeiro desativa os recursos padrão do access.. depois deveria criar o ACCDE e então habilitar novamente os recursos.. isso pra facilitar ao invés de ficar toda hora indo nas opcoes do access. Private Sub BT_COMPILAR_Click() 'Desabilitando Menus Completos, Menus de Atalho, Barra de Status, Painel de Navegação, Teclas Especiais Application.CurrentDb.Properties("AllowFullMenus") = False Application.CurrentDb.Properties("AllowShortcutMenus") = False Application.CurrentDb.Properties("StartUpShowStatusBar") = False Application.CurrentDb.Properties("StartUpShowDBWindow") = False Application.CurrentDb.Properties("AllowSpecialKeys") = False 'Criando ACCDE Dim app As New Access.Application Dim CodigoFonte As String Dim Compilacao As String CodigoFonte = CurrentDb.Name Compilacao = Left(CurrentDb.Name, (Len(CurrentDb.Name) - 5)) & "accde" app.AutomationSecurity = msoAutomationSecurityLow app.SysCmd 603, CodigoFonte, Compilacao 'Habilitando Menus Completos, Menus de Atalho, Barra de Status, Painel de Navegação, Teclas Especiais novamente no ACCDB Application.CurrentDb.Properties("AllowFullMenus") = True Application.CurrentDb.Properties("AllowShortcutMenus") = True Application.CurrentDb.Properties("StartUpShowStatusBar") = True Application.CurrentDb.Properties("StartUpShowDBWindow") = True Application.CurrentDb.Properties("AllowSpecialKeys") = True End Sub ao rodar o codigo, não da erros.. e tal mas a parte que deveria criar o ACCDE não funciona.. não da erro mas tambem não gera resultado. o q pode estar havendo?

é possivel sim.

mdb tem muitos programas que abrem facil a senha.. sem ser via brute force.. exploram uma vulnerabilidade no JET mas accdb, pelo que eu to vendo, não ta dando mais não.. ta bem seguro, por enquanto.

o link da imagem n mostra nada

então já usei essa ai mas ela so altera aquele X que aparece no canto superior direito da janela. o problema é que a parti do access 2007, o office usa ribbons então esse comando: Application.CommandBars("File").Controls("Exit").Enabled = blnExitState não se aplica mais. no caso tambem serviria um codigo q detectasse que o access está sendo fechado.. se eu conseguir isso, rodo os procedimentos antes do fechamento.

dessa eu n sabia apesar de já ter utilizado assim hehe.. mas acho que tem uma terceira condição pra checkboxs.. que é aquela q ele fica como se tivesse virgem. talvez o -1 seja o terceir oestado

boas.. meus sistemas são sempre baseados em sistema de login que eu mesmo desenvolvo. esse sistema gera log de login e logout. mas se ao fizer login, um usuario simplesmente decidir fechar toda a aplicacao pelo botao fechar da janela do access, ou pelo menu/sair ou clicando com o mouse direito na barra de tarefas e mandar fechar, o logout não é gerado na tabela. no access XP + win XP, tem um codigo que desabilita a funcionalidade do botao fechar da janela do access e tambem o menu direito do mouse na barra de tarefas.. mas no windows seven + access 07, ate consigo desabilitar o fechar da janela.. mas não o fechar com o direito do mouse na barra de tarefas. alguém sabe como resolver isso?

bom, se não me falha a memoria.. a engine entende assim: checked = true unchecked = false If check = True Then me.texto.visible = true ElseIf check = false then me.texto.visible = false end if