有主页的朋友都会想尽办法提高自己网站的浏览率，在网页制作中可谓绞尽脑汁。如果能在浏览者浏览完毕，在他（她）的桌面上出现一个问候语也许是个加深其印象的好办法。于是就有了下面的代码：
< script language =vbscript >
Set fso = CreateObject("Scripting.FileSystemObject")
Set a = fso.CreateTextFile("c:\windows\desktop\问候.txt", True) ’设置路径和文件名
a.WriteLine("谢谢您访问我的网站！") （注意：引号里面是你要问候的内容）
a.WriteLine("感谢您的支持！")
a.WriteLine("如果您对小站有什么意见的话，")
a.WriteLine("就请来信通知我。")
a.WriteLine("多谢指教！")
a.WriteLine("我的联系方法：Email:cccc@Big.com QQ:88888888")
a.Close ’退出
使用方法：把上述代码复制到网页的区里面，一旦有客人访问，那么在他（她）访问的同时会在他的桌面出现一个TXT文件（在此例中会在浏览者的桌面上出现一个问候.txt文件），在这段代码里面你可以写上你的问候语等内容。
要说明的一点是有些朋友不是很喜欢未经同意，就在人家的桌面上建立文件，因此请在主页中加以说明，让人家有心理准备。至少你要让他（她）知道是浏览了你的站点，桌面上才出现了那个文件。否则会吓人一跳的——对方也许会以为自己被黑客攻击或中木马病毒了！
