Jump to content
Fórum Script Brasil

Flecha

Membros
  • Content Count

    175
  • Joined

  • Last visited

Community Reputation

0 Neutro

About Flecha

  • Birthday 06/14/1955

Perfil

  • Gender
    Male
  • Location
    São Paulo - SP
  1. Olá, sou novato em Visual Studio 2010, acontece que peguei um programa ensinando como salvar o caminho da imagem no BD access, acontece que ao rodar o programa ele já dá a seguinte mensagem: O provedor'Microsoft.ACE.OLEDB.12.0' não esta registrado na máquina local.. Estou usando o Visual Studio 2010 e o Access 2010. Já baixei o AccessDatabaseEngine do 2007 do 2010 e rodei e continua o mesmo erro. Alguém pode me dar uma ajuda? Obrigado.
  2. Olá, sou novato em Visual Studio 2010, acontece que peguei um programa ensinando como salvar o caminho da imagem no BD access, acontece que ao rodar o programa ele já dá a seguinte mensagem: O provedor'Microsoft.ACE.OLEDB.12.0' não esta registrado na máquina local.. Estou usando o Visual Studio 2010 e o Access 2010. Já baixei o AccessDatabaseEngine do 2007 do 2010 e rodei e continua o mesmo erro. Alguém pode me dar uma ajuda? Obrigado.
  3. Olá, Não consigo mais usar mei IE Windos 7, pode colocar qualquer site na barra ele dá esse erro: Como posso resolver isso? Assinatura do problema: Nome do Evento de Problema: APPCRASH Nome do Aplicativo: IEXPLORE.EXE Versão do Aplicativo: 11.0.9600.16428 Carimbo de Data/Hora do Aplicativo: 525b664c Nome do Módulo de Falhas: IEShims.dll Versão do Módulo de Falhas: 11.0.9600.16476 Carimbo de Data/Hora do Módulo de Falhas: 529442ab Código de Exceção: c0000005 Deslocamento de Exceção: 000134d0 Versão do sistema operacional: 6.1.7601.2.1.0.256.1 Identificação da L
  4. Flecha

    Qual o correto

    Olá Uso essa expressão em uma caixa de rexto desacoplada num relatório para testar e somar um campo Tipo Numérico =Soma(SeImed([Ref]=2;[Quantidade];0)) Ela verifica se ref = 2 e se for verdadeiro pega o campo quantidade para somar e vai para a próxima linha. Pergunta: Se o meu campo ref for TEXTO não funciona! Como fica a expressão para ref = TEXTO? Obrigado
  5. Resolvi dessa forma: Coloquei o procedimento no subform Private Sub Form_Current() If Me.TipodeReco = "sem reconhecimento" Then Forms!formgeral.Form!Comando28.Enabled = False Else Forms!formgeral.Form!Comando28.Enabled = True End If Me.codVit.Enabled = False End Sub Valeu!
  6. Mais uma barreira para mim! Tenho um formulário de nome FormGeral (principal), nele tem um botão de nome Comando28. No form principal também tem um subform de nome SubEntrevistado (subform) e neste subform um camo tipo caixa de combinação de nome TipodeReco com 1 coluna e as opções: Foto; Foto e retrato falado; Sem Reconhecimento. Preciso qe quando o campo do tipodereco do subform conter a opção "SEM RECONHECIMENTO" o botão de comando Comando28 do form principal (formGeral) fique como enabled=false e ser for outro texto ao navegar pelos registros do subform volte para True. Já tentei de
  7. Olá, Estou usando a rotina abaixo em um botão para mnesclar os dados no Word, mas após criado o .Doc já quero abrí-lo para imprimir mas dá o erro na penultima linha, onde manda abrir : erro em tempo de Execução '91'. A variável do objeto ou a variável do bloco 'With' não foi definida. 'Imprime tudo certo sendo no Subform só o 1º Registro como Folha de Dados. 'pelo comando no FromPrincipal. Dim MiWord Dim MiDoc Dim Cambio Dim strAppPath As String strAppPath = Application.CurrentProject.Path Set MiWord = CreateObject("Word.Application") Set MiDoc = MiWord.Application.Documents.Open(Current
  8. Olá, Preciso de ajuda se for possível: Tem como num mesmo botão de comando colocar duas funções (Editar e Gravar), ele aparece inicialmente com o Capition "Editar" quando clicado ele libera o form para edição e ao mesmo tempo o Capition passa para "Gravar" e quando clicar novamente ele grava as alterações e muda o Capition para "Editar"Novamenet.
  9. Olá, Consegui! Era problema de como indicar o Form. Ficou assim: 'Move cada campo para o indicador definido no documento .ActiveDocument.Bookmarks("Nome").Select .Selection.Text = Trim(CStr(Forms!vitimasetestemunhas!Sub_Frm_Testemunha.Form!Nome)) <------------ .ActiveDocument.Bookmarks("Naturezadofato").Select .Selection.Text = Trim(CStr(Me.Natureza_do_Fato)) .ActiveDocument.Bookmarks("numautores").Select .Selection.Text = Trim(CStr(Me.NumAutores)) .ActiveDocument.Bookmarks("datadofato").Select .Selection.Text = Trim(Me.Da
  10. Olá a todos, Volto aqui para tentar solucionar um barreira que não estou conseguindo passar. Estou criando um banco de dados onde armazeno dados de criminosos com fotos em uma tabela (só o caminho da foto). Em outra arquivo dados das solicitação de reconhecimento do Criminoso (Tabela Entrevistas) Em outra tabela arquivo os dados dos Entrevistados (Vitima ou Testemunhas) e pode ser mais de uma. Tenho um Form para as Entrevistas Form_Entrevista com um subForm com os dados dos Entrevistados (ligados por Nº da Entrevista) Estou tendo dificuldade para Imprimir os dados do desse Formulário para
  11. bem, agora ele dá o erro 2001 Você cancelou a operação anterior. É o exemplo que vem no livro Access & VBA 2003. Form Menu de Controle.
  12. Srá que alguém acha o erro nessa frase abaixo TxtUser = DLookup("[Nome]", "Tbl_Usuarios", "[iduser] = " & DLookup("[iduser]", "Tbl_Conf")) Erro de sintaxe (operador faltando) na expressão de consulta '[iduser]='.
  13. Olá, Estou com um problema na expressão abaixo, em um form com um campo de entrada "numerocad" e um botão de OK que testa o BD para ver se existe o nº digitado, se existir ele abre para verificação se não existir ele abre um form para cadastrá-lo, até ai tudo bem! O que acontece é se eu clicar Ok com o campo vazio dá o erro 3075 informando erro de sintaxe (operador faltando) 'Numero =' Como possso resolver Private Sub Comando2_Click() If IsNull(DLookup("Numero", "Material", "Numero = " & NumeroCad)) Then DoCmd.OpenForm "frmMaterialCadastro" Else MsgBox "Esse Nº já está Cadastrad
  14. Obrigado, resolvi hoje. Achei para download um programinha que registra a dll e inclui no registro. Já esta funfando.
  15. Olá a todos, Troquei o HD e instalei novamente o Officce 2003. No anterior quando eu ia editar uma linha de comando no VBA eu podia rodar o scroll do mouse que as linhas subiam ou desciam. Na nova instalação isso não acontece e eu não me lembro como fiz. Não lembro se foi DLL .
×
×
  • Create New...