MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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]Emitir MsgBox para exibir um valor no Registro do Windows.

    avatar
    Convidado
    Convidado


    [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows. Empty Emitir MsgBox para exibir um valor no Registro do Windows.

    Mensagem  Convidado 12/2/2013, 01:10

    Amigos como exibir um valor do registro no Windows atraves de uma MsgBox

    Nesta linha:

    HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System /v EnableLUA /t REG_DWORD

    grato pela ajuda
    avatar
    Convidado
    Convidado


    [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows. Empty Re: [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows.

    Mensagem  Convidado 12/2/2013, 01:47

    Amigos, consegui ler o valor no registro

    Criei um VBS com as seguintes linhas:

    Código:

    Dim WshShell, bKey
    Set WshShell = WScript.CreateObject("WScript.Shell")

    bKey = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA")
    MsgBox bKey

    Cumprimentos.
    avatar
    Convidado
    Convidado


    [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows. Empty Re: [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows.

    Mensagem  Convidado 12/2/2013, 02:00

    Amigos.. agora como fazer isso no Access?

    Cumprimentos.
    avatar
    Convidado
    Convidado


    [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows. Empty Re: [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows.

    Mensagem  Convidado 12/2/2013, 02:03

    Cool

    Dim WshShell, bKey
    Set WshShell = CreateObject("WScript.Shell")

    bKey = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA")
    MsgBox bKey


    Cumprimentos.

    Conteúdo patrocinado


    [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows. Empty Re: [Resolvido]Emitir MsgBox para exibir um valor no Registro do Windows.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 11:23