用VB解析網域名稱

2021-04-06 21:30:31 字數 598 閱讀 3430

private sub command1_click()

msgbox getip("

www.sina.com")

end sub

function getip(url as string) as string

shell "command.com  /c  ping  " & url & "  -n  1  >  c:/ping", vbhide

dim fn   as integer

fn = freefile

retry:

open "c:/ping" for binary access read as #fn

getip = space(filelen("c:/ping"))

get #fn, , getip

close #fn

if len(getip) = 0 then goto retry

getip = left$(getip, instr(getip, "]") - 1)

getip = mid$(getip, instr(getip, "[") + 1)

kill "c:/ping"

end function

用DNSpod解析網域名稱

網域名稱註冊的地方 比如阿里巴巴的萬網 有dns記錄 dns記錄分為一下幾種 1.ns記錄 將網域名稱與網域名稱伺服器相關聯 2.a記錄 最簡單粗暴的記錄,直接將網域名稱和主機ip相關聯 3.cname記錄 一般的網域名稱比如www.baidu.com。當直接用ping時,首先,解析到www.a.s...

網域名稱解析過程 網域名稱解析過程

0x01相關資訊 閘道器 閘道器實質上是乙個網路通向其他網路的ip位址。要實現兩個網路之間的通訊,則必須通過閘道器。如果網路a中的主機發現資料報的目的主機不在本地網路中,就把資料報 給它自己的閘道器,自己的閘道器通過尋找路由指向,再由閘道器 給網路b的閘道器,網路b的閘道器再 給網路b的某個主機。i...

解析不了網域名稱

今天工作中隨到的問題 描述問題的郵件 在測試 使用網域名稱解析公升級位址 的時候出現問題 在使用網域名稱解析公升級位址的方式進行公升級時,公升級程式在編碼板通過nsf啟動可以正常公升級,但在編碼板通過flash啟動時,出現網域名稱不可解析的問題,測試的方法是 1.更改cat etc resolv.c...