河东软件站

电脑版
提示:原网页已由神马搜索转码, 内容由www.pc0359.cn提供.
所在位置:首页 > 网吧软件 > 网吧工具> 按指定位置排列桌面图标

按指定位置排列桌面图标

 
  • 软件大小:12 KB
  • 更新日期:2009-07-05
  • 软件语言:简体中文
  • 软件类别:网吧工具
  • 软件授权:共享软件
  • 软件官网:未知
  • 适用平台:Win2003, WinXP, Win2000, NT, WinME
  • 软件厂商:
10.0
软件评分

本地下载

软件介绍人气软件相关文章网友评论下载地址

为您推荐:网吧工具

因需要,今天弄了个小玩意。自动排列图标

程序说明:
如果:当前目录下有seticon.ini配置文件
那么:按配置文件排列图标
否则:记录当前桌面图标的排列信息,生成配置文件seticon.ini


小提示:生成记录文件的时候最好别把程序放在桌面运行。

请把‘自动排列图标去掉’做盘的朋友没去掉可以用以下这个VBS搞定,网上找来的,方法比较笨

  1. '''DisktopIcon_AutoArrange.VBS by baomaboy
  2. Dim WshSHell,FSO
  3. On Error Resume Next
  4. Set WshSHell = WScript.CreateObject("WScript.Shell")
  5. Set FSO = CreateObject("Scripting.FileSystemObject")
  6. Set OF = FSO.OpenTextFile(FSO.BuildPath(FSO.GetSpecialFolder(1),"ShowDisktop.SCF"),2,True)
  7. OF.Write("[Shell]"&vbcrlf&"Command=2"&vbcrlf&"IconFile=explorer.exe,3"&vbcrlf&"[Taskbar]"&vbcrlf&"command=ToggleDesktop")
  8. OF.Close
  9. if (WshShell.CurrentDirectory = WshShell.SpecialFolders("Desktop")) = "False" then
  10. WshSHell.Run("ShowDisktop.SCF")
  11. end if
  12. WScript.Sleep 500
  13. WshSHell.SendKeys "{F5}+{F10}e"
  14. WshSHell.SendKeys "+{F10}IA"
  15. Set WshSHell = Nothing
  16. Set FSO = Nothing
  17. WScript.Quit

网友评论0

您的评论需要经过审核才能显示