Dim wshshell As Object Dim strDesktop Set wshshell = CreateObject("wscript.shell") strDesktop = wshshell.regread("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\desktop") |
|站长邮箱|小黑屋|手机版|Office中国/Access中国
( 粤ICP备10043721号-1 )
GMT+8, 2025-4-4 05:17 , Processed in 0.063386 second(s), 17 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.