Jump to content

Search the Community

Showing results for tags 'obter informação remoto na mesma gui'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Administração
    • Regras do fórum
    • Anúncios e Noticias
    • Moderação de Usuário
  • Geral
    • Chat (Offline)
    • Chat de Desenvolvedores
    • Diretivas de Segurança
    • Board Test
  • Autoit v3
    • Ajuda e Suporte geral
    • Ajuda e Suporte à GUI (Interface Gráfica de Usuário)
    • Exemplos de Scripts
    • UDFs (Função Definida pelo Usuário)
    • Tutoriais & VideoAulas
    • Microcódigos

Calendars

There are no results to display.

There are no results to display.


Found 1 result

  1. Boa noite Galera, tudo bem com vocês? Sou novo aqui no Fórum e na liguagem de Autoit, tentei aprender algumas ocoisas por conta e até consegui, porem como trabalho com T.I, estou tentando desenvolver um programinha que busca informações de outros computadores remoto. Porem estou tentando obter informações porem não consigo enviar o nome do computador quando aperto o botão para o comando $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2"). Por favor, peço muito a ajuda de vocês, pois estou fritando minha cabeça a dois dias e não consigo fazer outra coisa com Autoit sem antes passar por esse problema. Esse é o codigo que deveria pegar o numero de serie do computador remoto. #include <Constants.au3> #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <ColorConstants.au3> #include <FontConstants.au3> #include <MsgBoxConstants.au3> #include <GUIListView.au3> Const $wbemFlagReturnImmediately = 0x10 Const $wbemFlagForwardOnly = 0x20 Local $strComputer = @ComputerName $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2") Local $colItems = "" $colItems = $objWMIService.ExecQuery("Select * from Win32_BIOS") For $objItem In $colItems    Local $item = $objItem.SerialNumber Next exemplo() Func exemplo()    Local $Form1 = GUICreate("Janela", 360, 190, 192, 124)    Local $infoset = GUICtrlCreateLabel("Insira o IP ou Hostname", 10, 10, 140, 100)    Local $infsn = GUICtrlCreateLabel("Resultado da Busca", 10, 31, 140, 100)    Local $inserir = GUICtrlCreateInput("Insira o hostname ou IP", 200, 10, 150, 20, 0x00020000)    Local $result = GUICtrlCreateInput("", 200, 31, 150, 20, 0x00020000)    Local $botao = GUICtrlCreateButton("ENVIAR", 200, 100, -1, -1)    GUISetState(@SW_SHOW)    While 1       $saida = GUIGetMsg()       Switch $saida          Case $GUI_EVENT_CLOSE ;$botao_1, $botao_2             ExitLoop          Case $botao             $ler = GUICtrlRead($inserir)             GUICtrlSetData($strComputer, $ler)       EndSwitch    WEnd EndFunc
×