Func CKLnk($Path, $Description = 'au') Local $search = FileFindFirstFile($Path & "\*.lnk"), $File, $details While 1 $File = FileFindNextFile($search) $details = FileGetShortcut($Path & '\' & $File) If @error Then ExitLoop If $details[3] == $Description Then MsgBox(0, '', $File) WEnd FileClose($search) EndFunc
举报
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-7-28 11:25 , Processed in 0.177181 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.