Dim WshShell, bKey
Set WshShell = CreateObject("Wscript.Shell")
bKey = WshShell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cache")
MsgBox bKey
Set WshShell = CreateObject("Wscript.Shell")
bKey = WshShell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cache")
MsgBox bKey

2818

被折叠的 条评论
为什么被折叠?



