Ir para conteúdo
Fórum Script Brasil

hicarocastro

Veteranos
  • Total de itens

    579
  • Registro em

  • Última visita

Tudo que hicarocastro postou

  1. eu uso isso no meu site mas num sabia que era direto do banco central não? explica isso? é sério?
  2. hicarocastro

    Query Seletiva

    Cara, não deu para entender direito o que você quer. seria saber se o nº 223536659158 é par ou impar ou pegar apenas 0 1º caracter dos números 223536659158. me diz ai o que você quer que tento te ajudar! No aguardo...
  3. hicarocastro

    Auto Numerador

    Quando eu posteo eu ainda não era moderador!!! valeu!
  4. http://www.mvps.org/access/ http://www.ativoaccess.com.br/ http://www.macoratti.net/bau_1.htm (avançado) http://www.geocities.com/cantinhodemais/ http://gsdbsolutions.com/downloads.htm http://www.microsoft-accesssolutions.co.uk/ http://www26.brinkster.com/accessjr/default.asp http://access2000.webhostme.com/index3.asp
  5. hicarocastro

    Auto Numerador

    cara via asp não sei, mas poste no forum asp que eles podem te ajudar, posso fechar o tópico?
  6. Abrir formulário DoCmd.OpenForm NomeDoFormulario Abrir Formulário em caixa tipo diálogo DoCmd.OpenForm NomeDoFormulario, , , , , acDialog Abrir Formulário Oculto DoCmd.OpenForm NomeDoFormulario, , , , , acHidden Imprimir Relatório DoCmd.OpenReport NomeDoRelatorio, acViewNormal Visualizar relatório DoCmd.OpenReport NomeDoRelatorio, acViewPreview Maximizar Janela DoCmd.Maximize End Function Minimizar janela DoCmd.Minimize Restaurar Janela DoCmd.Restore Abrir Consulta DoCmd.OpenQuery NomeDaConsulta Abrir Tabela DoCmd.OpenTable NomeDaTabela Executar SQL DoCmd.RunSQL "suaSQL" Retirar Avisos DoCmd.SetWarnings False Colocar Avisos DoCmd.SetWarnings True Executar Macro DoCmd.RunMacro NomeDaMacro Ocultar Barra De Ferramentas DoCmd.ShowToolbar NomeDaBarra, acToolbarNo Exibir Barra De Ferramentas DoCmd.ShowToolbar NomeDaBarra, acToolbarYes Executar Aplicativo Dim Retorno Retorno = Shell(Caminho, vbNormalFocus) Fechar Um outro formulário DoCmd.Close acForm, "nome do form" | |___ Pode ser relatórios, etc Campo Vermelho ou verde a depender do valor >0 ou <0 Na propriedade formato coloque ##0,00[Preto];- #.##0,00[Vermelho];0;"Nulo" Mensagem de Bom dia, boa tarde ou boa noite If Time$ >= "00:00" And Time$ < "12:00" Then [Campo] = "Bom Dia!" End If If Time$ >= "12:00" And Time$ < "18:00" Then [Campo] = "Boa Tarde!" End If If Time$ >= "18:00" And Time$ <= "23:59" Then [Campo] = "Boa Noite!" End If Mensagem ao Alterar ou Incluir Colocar no evento Ao Atualizar BeforeUpdate Dim strMsg As String strMsg = strMsg & "O registro foi alterado ou incuído, você deseja salvar as alterações? " strMsg = strMsg & "Clique em sim para salvar ou não para cancelar." If MsgBox(strMsg, vbExclamation + vbYesNo, "Salvar Registro?") = vbYes Then 'do nothing Else DoCmd.RunCommand acCmdUndo 'For Access 95, use DoMenuItem instead 'DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70 End If Registrando uma dll entre em Iniciar / Executar regsvr32 c:\windows\system\nomearquivo.dll Desabilitar Botão atribuido a valor Me!nomedobotão.Enabled = Not (IsNull(Me.nome do campol)) 'Este comando vai habilitar um botão se um campo não for nulo!
  7. Este tópico de funções é para inserir e deixar disponível algumas funções. Podem ajudar postando uma função que você usa. Grato
  8. hicarocastro

    Código De Barras

    mande um e-mail pra mim q te envio o exemplo.
  9. ultilizo session quando o usuário faz login, sendo assim posso definir logado = sim mas tenho que fazer que defina como não quando expirar o tempo de sessão ou abandonar a sessão. Como faço isso?
  10. hicarocastro

    Auto Numerador

    Sim, Abra o arquivo mdb entre em ferramentas / ultilitários / compactar e reparar banco de dados.
  11. porque não instala o access? ou o runtime? o que mesmo você quer fazer?
  12. fiz sim, então o que tenho que fazer?
  13. Como verificar se esxiste alguma sessão aberta, bloqueando o acesso simultâneo?
  14. Favor postar dúvida no forum Drewave
  15. 'Cole em Um módulo Public Const SW_SHOW As Long = 5 Declare Function ShellExecute Lib "shell32.dll" Alias _ "ShellExecuteA" (ByVal hwnd As Long, ByVal _ lpOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory _ As String, ByVal nShowCmd As Long) As Long 'No evento do botão Dim i& i& = ShellExecute(0, "open", "C:\windows\desktop\db1.mdb", "", "", SW_SHOW)
  16. Cara trabalho com access a mais de 6 anos e não conheço nenhum banco de dados q ao mesmo tempo seja uma ferramenta de programação como é o access.
  17. hicarocastro

    Auto Numerador

    você deve compactar o banco de dados após excluir todos os dados para assim retornar zero
  18. Você deve compilar seu banco de dados. Para fazer isso você entra em um módulo no menu superior entre em debug/compile, corrija os erros que ele vai indicar, sendo assim feito feche o documento abra o access e em ferramentas encontre gerar mde, selecione o arquivo e salve como mde.
  19. hicarocastro

    Email No Access

    Ao meu conhecimento não há exemplos na internet que não use o outlook, pois, para fazer isso tera que configurar smtp, pop3 e efetuar os procedimentos de um software gerenciador de e-mail como o outlook
  20. cara está meio complicado de entender essa tua formula pra, poderia me enviar o teu exemplo em arquivo mdb?
  21. crie a variável junto com Option Explicit
  22. deixa pra lá imaginei que alguém já tivesse passado por isso. Desculpe!
  23. como assim eu posso criar quantas quise? quero criar uma sequencia de dados como um campo isso é possivel?
×
×
  • Criar Novo...