OneManPen Posted February 9, 2012 Share Posted February 9, 2012 Hey all, I'm working on a IP blocker, and I'm using the windows filewall to do this... and I want to make a way to add URL's but since windows firewall only allows IP's I need a way to convert the URL address into a IP Address. I tried searching the forum but it's kind of hard searching with the terms "URL" "TO" "IP". Thanks in advance. Link to comment Share on other sites More sharing options...
somdcomputerguy Posted February 9, 2012 Share Posted February 9, 2012 The Windows ping command will do this. - Bruce /*somdcomputerguy */ If you change the way you look at things, the things you look at change. Link to comment Share on other sites More sharing options...
OneManPen Posted February 9, 2012 Author Share Posted February 9, 2012 Yeah... But how to make it invisible to the user... my current knowledge doesn't quite know how to do this yet... Link to comment Share on other sites More sharing options...
golfinhu Posted February 9, 2012 Share Posted February 9, 2012 (edited) try it: Report if have error, because i can't test now! Local $ip = UrlToIP('www.autoitscript.com') MsgBox(0, '', $ip) Func UrlToIP($sHost) Local $read, $ip, $foo $foo = Run("ping.exe " & $sHost, @SystemDir, @SW_HIDE, 3) While True $read = StdoutRead($foo) If @error Then ExitLoop $ip = StringRegExp($read, "[(d{1,3}.d{1,3}.d{1,3}.d{1,3})]", 3) If IsArray($ip) Then Return $ip[0] Sleep(25) WEnd Return SetError(1, 0, "0.0.0.0") EndFunc ;==>UrlToIP Edited February 9, 2012 by golfinhu Link to comment Share on other sites More sharing options...
hannes08 Posted February 9, 2012 Share Posted February 9, 2012 Maybe you want to look at TCPNameToIP() which will convert a name to an IP without the need to call ping. (Anyway for this it would have been better to call nslookup instead of ping...) Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler] Link to comment Share on other sites More sharing options...
kokoilie Posted August 27, 2012 Share Posted August 27, 2012 fixed it Local $ip = UrlToIP('www.autoitscript.com') MsgBox(0, '', $ip) Func UrlToIP($sHost) Local $read, $ip, $foo $foo = Run("ping.exe " & $sHost, @SystemDir, @SW_HIDE, 3) While True $read = StdoutRead($foo) If @error Then ExitLoop $ip = StringRegExp($read, "ddd.ddd.ddd.ddd", 3);the pattern war wrong If IsArray($ip) Then Return $ip[0] Sleep(25) WEnd Return SetError(1, 0, "0.0.0.0") EndFunc ;==>UrlToIP should work properly thx golfinhu for the idea Link to comment Share on other sites More sharing options...
hannes08 Posted August 28, 2012 Share Posted August 28, 2012 TCPStartup() ConsoleWrite( TCPNameToIP("www.google.com") & @CRLF) Exit Less and easier code, isn't it? Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler] Link to comment Share on other sites More sharing options...
guinness Posted August 28, 2012 Share Posted August 28, 2012 (edited) TCPStartup() ConsoleWrite( TCPNameToIP("www.google.com") & @CRLF) Exit Less and easier code, isn't it? Don't forget TCPShutdown. Edited August 28, 2012 by guinness 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 More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now