Jump to content

Need small help to get Ip address and Asset id .

Andy2520
 Share

Recommended Posts

Andy2520 Seeker

Andy2520

Posted
Posted (edited)

Dear Team,

I am trying to develop small application to show system ip address and asset id once user click on Show button .Please help me .

I have gone few forum but got different input and unable to go further please suggest .

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>

$hGUI = GUICreate( "New Window", 366, 249, -1, -1)
$hLabel = GUICtrlCreateLabel( "Asset ID ", 35, 42, 112, 23)
GUICtrlSetFont( -1, 12, 400, 0, "Tahoma")
$hLabel2 = GUICtrlCreateLabel( "Ip address ", 34, 80, 84, 21)
GUICtrlSetFont( -1, 12, 400, 0, "Tahoma")
$hInput = GUICtrlCreateInput( "", 124, 45, 136, 23)
$hInput2 = GUICtrlCreateInput( "", 126, 85, 135, 20)
$hButton = GUICtrlCreateButton( "Show", 30, 158, 117, 39)
GUICtrlSetFont( -1, 10, 800, 0, "Tahoma")
$hButton2 = GUICtrlCreateButton( "Cancel", 204, 161, 101, 34)
GUICtrlSetFont( -1, 10, 800, 0, "Tahoma")
GUISetState()

While 1
    $hMsg = GUIGetMsg()
    Switch $hMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
    
WEnd
Edited by Andy2520
Link to comment
Share on other sites
Gianni Universalist

Gianni

Posted
Posted (edited)

also, have a look to the TCPNameToIP function:

example

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>

#include <Inet.au3>

TCPStartup()

$hGUI = GUICreate("New Window", 366, 249, -1, -1)
$hLabel = GUICtrlCreateLabel("Asset ID ", 35, 42, 112, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Tahoma")
$hLabel2 = GUICtrlCreateLabel("Ip address ", 34, 80, 84, 21)
GUICtrlSetFont(-1, 12, 400, 0, "Tahoma")
$hInput = GUICtrlCreateInput(@ComputerName, 124, 45, 136, 23)
$hInput2 = GUICtrlCreateInput("", 126, 85, 135, 20)
$hButton = GUICtrlCreateButton("Show", 30, 158, 117, 39)
GUICtrlSetFont(-1, 10, 800, 0, "Tahoma")
$hButton2 = GUICtrlCreateButton("Cancel", 204, 161, 101, 34)
GUICtrlSetFont(-1, 10, 800, 0, "Tahoma")
GUISetState()

While 1
    $hMsg = GUIGetMsg()
    Switch $hMsg
        Case $GUI_EVENT_CLOSE
            TCPShutdown()
            Exit
        Case $hButton2
            GUICtrlSetData($hInput, "")
            GUICtrlSetData($hInput2, "")
        Case $hButton
            GUICtrlSetData($hInput2, TCPNameToIP(GUICtrlRead($hInput)))
    EndSwitch

WEnd

try to input hostnames (or internet addresses as well) in Asset ID field

edit:

also have a look to _TCPIpToName for reverse lookup

(>here another simple example for both directions lookup)

Edited by PincoPanco

 

image.jpeg.9f1a974c98e9f77d824b358729b089b0.jpeg Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Link to comment
Share on other sites
guinness Universalist

guinness

Posted
Posted

Don't forget TCPShutdown().

UDF List:

 
_AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples...

Updated: 22/04/2018

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...