找回密码
 加入
搜索
查看: 4305|回复: 10

怎样打开快捷方式

[复制链接]
发表于 2008-7-6 19:37:22 | 显示全部楼层 |阅读模式
如题,请问怎样用Run或其它函数打开lnk快捷方式?

[ 本帖最后由 雨滴的孤独 于 2008-7-11 21:20 编辑 ]
发表于 2008-7-6 21:52:25 | 显示全部楼层
没明白你到底要干什么
发表于 2008-7-6 22:15:20 | 显示全部楼层
可能就是要执行快捷方式下的软件.
 楼主| 发表于 2008-7-6 22:28:07 | 显示全部楼层
是啊,就是3楼的意思
发表于 2008-7-6 22:33:30 | 显示全部楼层
RunDll32.exe shell32.dll,ShellExec_RunDLL qq.lnk
发表于 2008-7-7 01:52:52 | 显示全部楼层
用ShellExecute可调用。
 楼主| 发表于 2008-7-7 12:53:35 | 显示全部楼层
ShellExecute这个函数是在哪的,我怎么没有见过
发表于 2008-7-7 13:09:50 | 显示全部楼层
ShellExecute这个函数是在哪的,我怎么没有见过  汗``  看帮助`或者 搜索下帮助的索引
发表于 2008-7-7 17:04:02 | 显示全部楼层

之前写的东西,看对你有用不

Func target()

$search = FileFindFirstFile(@DesktopDir & "*")  

If $search = -1 Then
        MsgBox(0, "Error", "No files/directories matched the search pattern")
EndIf


While 1
        $file = FileFindNextFile($search)
         If @error Then ExitLoop

    $attrib = FileGetAttrib (@DesktopDir & "" & $file)

        If $attrib = "A" Then

                $Target= exten($file)

        Else
      
           $Target = @DesktopDir & "" & $file

    EndIf

    MsgBox(0, @DesktopDir & "" & $file & "指向", $Target )
  
WEnd

MsgBox(4096, "File:", @DesktopDir &"遍历结束")

; Close the search handle
FileClose($search)

EndFunc


Func exten($file)

                $Split = StringSplit($file,".")

        $exten = $Split[$Split[0]]

                If $exten = "lnk" Then

                                $var = FileGetShortcut (@DesktopDir & "" & $file)
                               
                                $Target = $var[0]

                return $Target
        Else

                $Target = @DesktopDir & "" & $file
                               
                                return $Target
                EndIf
EndFunc
发表于 2008-7-7 21:57:11 | 显示全部楼层
楼上这个似乎不太合适吧,@desktopdir只能针对当前用户,如果是all userr文件夹中的快捷方式怎么办
 楼主| 发表于 2008-7-11 18:52:54 | 显示全部楼层
谢谢大家哈,我看的帮助文档版本可能太低了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-17 18:10 , Processed in 0.076893 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表