MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona.

    avatar
    ismaelpd
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 10/01/2014

    [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona. Empty [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona.

    Mensagem  ismaelpd em 26/2/2020, 14:00

    Amigos,

    Bom dia.

    Estou tendo problems com o bd que eu mesmo criei seguindo exemplos aqui do forum, não tenho experiencia na area, mas consegui fazer o que queria.

    vamos ao problema. O meu formulario contava com um botão que me levava para a caixa de opções inserir imagem do windows e ao atualizar o sistema para o Win 10 64 bits utilizando a declaração PtrSafe Function, o botão não esta funcionando mais, alguem pode me ajudar.


    Private Sub btnLocalizar_Click()
    Dim strCaminho As String, strPastaInicial As String
    strPastaInicial = "C:\Caminho da foto"
    strCaminho = Buscar(Me.hWnd, "Inserir foto", strPastaInicial, _
    "Arquivos gráficos (*.jpeg; *.jpg)" & vbNullChar & "*.jpeg; *.jpg")
    If Len(strCaminho) > 0 Then
    Me.LocalFoto = strCaminho
    Me.FOTO.Picture = Me.LocalFoto
    Me.FOTO.Visible = True

    End If

    End Sub
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona. Empty Re: [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona.

    Mensagem  DamascenoJr. em 26/2/2020, 21:41



    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    ismaelpd
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 10/01/2014

    [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona. Empty Resolvido

    Mensagem  ismaelpd em 9/3/2020, 16:25

    Boa tarde. Pessoal, na verdade tentei de tudo e a unica coisa que funcionou foi voltar para a versão de 32 bits do Office. mas tem que se acrescentar a declaração de função o PtrSafe.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona. Empty Re: [Resolvido]win 32(windows 7) para win64(windows 10) inserção de imagem não funciona.

    Mensagem  DamascenoJr. em 10/3/2020, 00:27

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 11/8/2020, 13:27