当前所在位置: 首页 > 网站购买

中英域名后面的英文分别代表什么意思?如何把域名翻译为IP地址?

2021-10-12 本站作者 【 字体:

在DOS窗口中   PING   名

以一个常见的域名为例说明,baidu网址是由二部分组成,标号“baidu”是这个域名的主域名体,而最后的标号“com”则是该域名的后缀,代表的这是一个com国际域名,是顶级域名。而前面的www.是网络名, 为www的域名。DNS规定,域名中的标号都由英文字母和数字组成,每一个标号不超过63个字符,也不区分大小写字母。标号中除连字符(-)外不能使用其他的标点符号。级别最低的域名写在最左边,而级别最高的域名写在最右边。由多个标号组成的完整域名总共不超过255个字符。一些国家也纷纷开发使用采用本民族语言构成的域名,如德语,法语等。中国也开始使用中文域名,但可以预计的是,在中国国内今后相当长的时期内,以英语为基础的域名(即英文域名)仍然是主流。语法域名系统是分层的,允许定义的子域。域组成的至少一个字,标签。如果有多个标签,标签必须用点分开。在一个域名中,最右边的标签,必须选择从列表中的名称的顶级域名,也被称为顶级域(中英文顶级域名或TLD)。前极右翼组成的标签,标签上有一些限制。

modFunction中:
Option   Explicit

Public   Declare   Function   RegCloseKey   Lib   "advapi32.dll "   (ByVal   hKey   As   Long)   As   Long
Public   Declare   Function   RegOpenKey   Lib   "advapi32.dll "   Alias   "RegOpenKeyA "   _
        (ByVal   hKey   As   Long,   ByVal   lpSubKey   As   String,   phkResult   As   Long)   As   Long
Public   Declare   Function   RegQueryValueEx   Lib   "advapi32.dll "   Alias   "RegQueryValueExA "   _
        (ByVal   hKey   As   Long,   ByVal   lpValueName   As   String,   ByVal   lpReserved   As   Long,   lpType   As   Long,   _
        lpData   As   Any,   lpcbData   As   Long)   As   Long
Public   Const   ERROR_SUCCESS   =   0&
Public   Const   APINULL   =   0&
Public   Const   HKEY_LOCAL_MACHINE   =   &H80000002
Public   Declare   Function   InternetGetConnectedStateEx   Lib   "wininet.dll "   Alias   _
        "InternetGetConnectedStateExA "   (ByRef   lpdwFlags   As   Long,   ByVal   lpszConnectionName   As   String,   _
        ByVal   dwNameLen   As   Long,   ByVal   dwReserved   As   Long)   As   Long

Public   Const   INTERNET_CONNECTION_MODEM   =   &H1&
Public   Const   INTERNET_CONNECTION_LAN   =   &H2&
Public   Const   INTERNET_CONNECTION_PROXY   =   &H4&
Public   Const   INTERNET_RAS_INSTALLED   =   &H10&
Public   Const   INTERNET_CONNECTION_OFFLINE   =   &H20&
Public   Const   INTERNET_CONNECTION_CONFIGURED   =   &H40&
Public   Declare   Function   InternetOpen   Lib   "wininet.dll "   Alias   "InternetOpenA "   _
        (ByVal   lpszAgent   As   String,   ByVal   dwAccessType   As   Long,   ByVal   lpszProxyName   As   String,   _
        ByVal   lpszProxyBypass   As   String,   ByVal   dwFlags   As   Long)   As   Long
Public   Declare   Function   InternetOpenUrl   Lib   "wininet.dll "   Alias   "InternetOpenUrlA "   _
        (ByVal   hInet   As   Long,   ByVal   lpszUrl   As   String,   ByVal   lpszHeaders   As   String,   _
        ByVal   dwHeadersLength   As   Long,   ByVal   dwFlags   As   Long,   ByVal   dwContext   As   Long)   As   Long
Public   Declare   Function   InternetCloseHandle   Lib   "wininet.dll "   (ByVal   hInet   As   Long)   As   Long
Public   Const   INTERNET_OPEN_TYPE_PRECONFIG   =   0
Public   Const   INTERNET_FLAG_RELOAD   =   &H80000000
Public   Const   INTERNET_FLAG_KEEP_CONNECTION   =   &H400000
Public   Const   INTERNET_FLAG_NO_CACHE_WRITE   =   &H400000

窗体中代码:
Option   Explicit

Private   Sub   Form_Load()

        Frame1.Caption   =   "探测方式 "
        opt1.Caption   =   "Modem "
        opt2.Caption   =   "LAN/Modem "
        opt3.Caption   =   "Ping "
       
End   Sub

Private   Sub   cmdCheck_Click()
       
        If   opt1.Value   Then
                CheckConnection1
        ElseIf   opt2.Value   Then
                CheckConnection2
        ElseIf   opt3.Value   Then
                CheckConnection3
        Else
                MsgBox   "您尚未选择探测方式 ",   vbCritical,   "出错 "
                Exit   Sub
        End   If
       
End   Sub

Private   Sub   cmdExit_Click()

        Unload   Me
       
End   Sub

Private   Sub   CheckConnection1()

        Dim   ReturnCode   As   Long
        Dim   hKey   As   Long
        Dim   lpSubKey   As   String
        Dim   phkResult   As   Long
        Dim   lpValueName   As   String
        Dim   lpReserved   As   Long
        Dim   lpType   As   Long
        Dim   lpData   As   Long
        Dim   lpcbData   As   Long
       
        lpSubKey   =   "System\CurrentControlSet\Services\RemoteAccess "   &   Chr$(0)
        ReturnCode   =   RegOpenKey(HKEY_LOCAL_MACHINE,   lpSubKey,   phkResult)
        If   ReturnCode   =   ERROR_SUCCESS   Then
                hKey   =   phkResult
                lpValueName   =   "Remote   Connection "
                lpReserved   =   APINULL
                lpType   =   APINULL
                lpData   =   APINULL
                lpcbData   =   APINULL
                ReturnCode   =   RegQueryValueEx(hKey,   lpValueName,   lpReserved,   lpType,   lpData,   lpcbData)
                If   ReturnCode   =   ERROR_SUCCESS   Then
                        If   lpData   =   0   Then
                                MsgBox   "你的计算机未通过Modem连接 ",中英域名后面的英文分别代表什么意思?如何把域名翻译为IP地址?(图1)   vbInformation,   "连接检测 "
                        Else
                                MsgBox   "你的计算机通过Modem接通 ",   vbInformation,   "连接检测 "
                        End   If
                Else
                        MsgBox   "你的计算机未通过Modem连接,但可能通过LAN连接 ",   vbInformation,   "连接检测 "
                End   If
        End   If
        RegCloseKey   (hKey)

End   Sub

Private   Sub   CheckConnection2(Optional   ByRef   ConnectionInfo   As   Long,   Optional   ByRef   sConnectionName   As   String)

        Dim   lFlags   As   Long
        Dim   sNameBuf   As   String,   msg   As   String
        Dim   lPos   As   Long
        sNameBuf   =   String$(513,   0)
        If   InternetGetConnectedStateEx(lFlags,   sNameBuf,   512,   0&)   Then
                lPos   =   InStr(sNameBuf,   vbNullChar)
                If   lPos   >   0   Then
                        sConnectionName   =   Left$(sNameBuf,   lPos   -   1)
                Else
                        sConnectionName   =   " "
                End   If
                msg   =   "你的计算机已经接入Internet "   &  

阅读全文
id_1广告位-300*300
相关推荐

注册一个域名的流程是什么?网站域名注册的流程是什么?

注册一个域名的流程是什么?网站域名注册的流程是什么?
总共有三个步骤(本站所有的域名注册步骤是一样的,这里以英文域名为例)。 一...

哈尔滨1地升级为高风险地区、5地升级为中风险地区五一从重庆去广州回来需要隔离吗?

哈尔滨1地升级为高风险地区、5地升级为中风险地区五一从重庆去广州回来需要隔离吗?
关于将利民开发区裕田街道等地区风险等级调整为中高风险地区的通告根据国务院联防联控...

绥芬河、满洲里、哈尔滨全为低风险区,明起全国已无中风险区域疫情当前我的担当是什么?

绥芬河、满洲里、哈尔滨全为低风险区,明起全国已无中风险区域疫情当前我的担当是什么?
不畏关山千里路,冰心一片付征鞍。据央视***客户端,黑龙江省应对新型冠状病毒感染...

黑龙江哈尔滨8地区升为中风险广东到呼伦贝尔用隔离吗?

黑龙江哈尔滨8地区升为中风险广东到呼伦贝尔用隔离吗?
内蒙古自治区新冠肺炎疫情防控指挥部关于进一步加强管控严防新冠肺炎疫情输入传播扩散...

什么是网关、DNS、子网掩码、MAC地址DNS服务器:小黑屋中的“翻译官”大神

什么是网关、DNS、子网掩码、MAC地址DNS服务器:小黑屋中的“翻译官”大神
什么是网关 DNS服务器是一个外行听起来比较专业的词汇,大部分只是听说过DNS,...

中英域名后面的英文分别代表什么意思?如何把域名翻译为IP地址?

中英域名后面的英文分别代表什么意思?如何把域名翻译为IP地址?
在DOS窗口中 PING 名以一个常见的域名为例说明,baidu网址是由...

上海现在属于什么风险地区?本土确诊+16,哈尔滨两地升中风险

上海现在属于什么风险地区?本土确诊+16,哈尔滨两地升中风险
9月21日0时至24时,31个省(自治区、直辖市)和新疆生产建设兵团报告新增确诊...

风险等级几级才算是重大危险源本土确诊+3!哈尔滨公告:非必要不离哈,两地调整为中风险,国家卫健委派工作组赴哈丨一财早知道

风险等级几级才算是重大危险源本土确诊+3!哈尔滨公告:非必要不离哈,两地调整为中风险,国家卫健委派工作组赴哈丨一财早知道
上班路上10分钟,时事财富样样通【隔夜关注】据哈尔滨市政府***办召开的疫情防控...

中国疫情重灾区是哪里?昨日本土新增28例,哈尔滨多地调为中风险

中国疫情重灾区是哪里?昨日本土新增28例,哈尔滨多地调为中风险
没有重灾区了。9月22日0—24时,31个省(自治区、直辖市)和新疆生产建设兵团...

阿里云买可以一个域名,我做解析,需要什么设备?域名出售平台哪家好?

阿里云买可以一个域名,我做解析,需要什么设备?域名出售平台哪家好?
前提:网站做好想上线,需要域名和空间(服务器)备案通过。解析:一般只需要拿到服务...