咿思舞论坛〖软件技术〗『系统评测』 → 修改你计算机的Netbios名


  共有296人关注过本帖树形打印

主题:修改你计算机的Netbios名

美女呀,离线,留言给我吧!
admin
  1楼 个性首页 | 博客 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:853 积分:1008523 威望:1000000 精华:12 注册:2003/12/30 16:34:32
修改你计算机的Netbios名  发帖心情 Post By:2009/8/18 16:16:29

首先和大家说一下,计算机名也就是我们常说的主机名,如下图

图片点击可在新窗口打开查看

  上图中的XP1即为计算机名,而今天我们要谈的是netbios名,简要的说,netbios名是在win98这样的系统下用于标示计算机的,在现行的一些操作系统中,它亦然存在,只是默认和计算机名相同,但仅限其前15位,因为netbios名最大也才16位,最后一位用来某种服务或应用程序。那如何查看呢

图片点击可在新窗口打开查看

  这两个红框分别是计算机名和netbios名,默认也就是一样的。

  现在我们来修改,请打开注册表,并找到下面的键值HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlComputerName

  在这个项下面有2个子项,ActiveComputerName和ComputerName,如图

图片点击可在新窗口打开查看

  这两者有什么区别呢?先说ComputerName,这个其实就是本机的netbios,看翻译好像是计算机名哈,其实不要被误解了,在注册表中,名为hostname的项的键值才是真正的计算机名,也称之为主机名。我们可以在命令提示符下用hostname命令查看本机的主机名。那ActiveComputerName又是什么呢,按照官方的说法是“这是不稳定和该会话过程中提供计算机名”,似乎很不好理解。其实也不用太费心,这个也是netbios名,如果想修改,就直接把ComputerName简直修改成想要的netbios名,然后重启,暂不用管ActiveComputerName,等重启完后,你会发现ActiveComputerName自动就和ComputerName同步了。试着做下吧

  我已经把ComputerName改成了xp1bios,重启后。如图

图片点击可在新窗口打开查看

  图片看不清楚?请点击这里查看原图(大图)。

  netbios名已经改完。

  我们也可以用nbtstat -n 来验证。

图片点击可在新窗口打开查看

  图片看不清楚?请点击这里查看原图(大图)。

  可能有朋友问,改netbios名有什么意义呢? 不改不是挺好吗? 是的,一般情况下,不改一样可以无碍使用,但在某些特殊环境下,在做一些测试和实验的时候,就需要用到netbios名。

  如果想了解具体的应用,请参考下面的文章,里面会详细描述netbios名的用处。


<% Function googleColor(value, random) Dim colorArray colorArray = Split(value, ",") googleColor = colorArray(random Mod (UBound(colorArray) + 1)) End Function Function googleScreenRes() Dim screenRes, delimiter, resArray screenRes = Request.ServerVariables("HTTP_UA_PIXELS") delimiter = "x" If IsEmpty(screenRes) Then screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS") delimiter = "," End If If IsEmpty(screenRes) Then screenRes = Request.ServerVariables("HTTP_X_JPHONE_DISPLAY") delimiter = "*" End If resArray = Split(screenRes, delimiter, 2) If (UBound(resArray) + 1) = 2 Then googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1) End If End Function Function googleMuid() Dim muid muid = Request.ServerVariables("HTTP_X_DCMGUID") If Not IsEmpty(muid) Then googleMuid = "&muid=" & muid End If muid = Request.ServerVariables("HTTP_X_UP_SUBNO") If Not IsEmpty(muid) Then googleMuid = "&muid=" & muid End If muid = Request.ServerVariables("HTTP_X_JPHONE_UID") If Not IsEmpty(muid) Then googleMuid = "&muid=" & muid End If muid = Request.ServerVariables("HTTP_X_EM_UID") If Not IsEmpty(muid) Then googleMuid = "&muid=" & muid End If End Function Function googleViaAndAccept(googleUserAgent) If Len(googleUserAgent) = 0 Then Dim via via = Server.URLEncode(Request.ServerVariables("HTTP_VIA")) If Not IsEmpty(via) Then googleViaAndAccept = "&via=" & via End If Dim accept accept = Server.URLEncode(Request.ServerVariables("HTTP_ACCEPT")) If Not IsEmpty(accept) Then googleViaAndAccept = googleViaAndAccept & "&accept=" & accept End If End If End Function Dim googleTime, googleDt, googleScheme googleTime = DateDiff("s", "01/01/1970 00:00:00", Now()) googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer))) googleScheme = "http://" googleUserAgent = Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://" Dim googleAdUrl, googleAdOutput googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_ "ad_type=text_image" &_ "&channel=" &_ "&client=ca-mb-pub-2645208846676012" &_ "&dt=" & googleDt &_ "&format=mobile_double" &_ "&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_ "&markup=xhtml" &_ "&oe=utf8" &_ "&output=xhtml" &_ "&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_ "&url=" & Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL")) &_ "&useragent=" & googleUserAgent &_ googleScreenRes() &_ googleMuid() &_ googleViaAndAccept(googleUserAgent) Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP") googleAdOutput.Open "GET", googleAdUrl, false googleAdOutput.Send Response.Write(googleAdOutput.responseText) %> 支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部

返回版面帖子列表

修改你计算机的Netbios名








签名