下载了的朋友请重新下载，因为我的一时疏忽，造成了任意文件都可以设置为登录界面的问题，现在改正并重新上传。

已经两三年没用过XP了，没想到却被T61逼得用上了XP——T61在Windows Server 2003下大多数设备的驱动都装不上，无奈之下只好换了XP。

换了XP之后自然很多时候都很不方便，像是装SQL Server 2005时，告诉我只有部分组件可以安装，查看详情才发现原来这“部分组件”只是用户手册$^&^*@!#!%&*$%^…… 不过，正好趁此机会用一下以前朋友们发给我的一些只有XP下才好用的软件：D

拿出来的第一个是改换XP登录界面的小工具，可以把XP默认的登录界面（快速用户切换界面）换得非常华丽。一时好奇，分析了一下其原理，原来只是改了注册表中的一个键值而已。于是想到，能不能写个小工具让系统每次自动更换登录界面呢？

第一想法当然是用C#写，但想起上次因为用.net写小东西被批评，所以干脆还是用WSH吧。不过这样一来因为没有界面，所以就不能让使用者自行设置一些参数了，但从另一方面来说，这样用起来也就更简单了 ：）

[Code=VBScript]‘**************************************************************************
‘** 脚本功能:    更换Windows开机界面
‘** 脚本版本:    1.1
‘** 插件制作:    软件兔 (http://www.SoftBuny.net/ SoftBunny+Soft@Gmail.com)
‘** 备　　注:    将此脚本的快捷方式放到“开始->所有程序->启动”文件夹中可实现
‘**                每次登陆自动更换开机界面
‘**
‘** 变更记录:
‘** 2008-03-04    基线版本
‘** 2008-03-05    更正可能会设置任意文件为开机界面的严重问题
‘**************************************************************************
Sub ChangUIhost()
Dim fso, f, f1, fc, s, p
Set fso = CreateObject(“Scripting.FileSystemObject”)
Set f = fso.GetFolder(“.”)
Set fc = f.Files
For Each f1 in fc
If LCase(Right(f1.Name,3))=”exe” Then
s = s & f1.name & “|”
End If
Next

p = f.path
If Right(p,1)<>”\” Then p = p & “\”
fs = Split(s,”|”)
Randomize Timer
Set Sh = CreateObject(“WScript.Shell”)
Sh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\UIHost”, p & fs(Fix(Rnd()*UBound(fs)))
End Sub
Call ChangUIhost()[/Code]

用起来也简单，把这个脚本跟从网上下的Windows 登录界面放到同一个文件夹中运行一下就随机换了一个界面。如果把这个脚本的快捷方式放到开机自动运行中，那就可以实现每次开机都用一个随机的界面了。

把我下载的19个登录界面跟这个脚本打包到一起了，所以下载后解压到一个单独的文件夹中就可以直接试用了。不想玩了时把“还原Windows登录界面.reg“导入到注册表中就可以了。

点此下载19个登录界面+自动更换脚本

想要更多更漂亮的登录界面的话可以自己去themexp下载

你也可以自己制作自己的个性登录界面

如果你的登录界面是Windows经典登录界面，想还原成快速用户切换页面，只需要到控制面板的“帐户－>更改用户登录或注销的方式”在“使用欢迎屏幕”跟“使用快速用户切换”前打上勾就可以搞定了。