通过程序生成快捷方式

Question

通过程序生成快捷方式 ，又不想看到小箭头 如何做

Answer 1

比如你复制一个可执行程序到桌面，它是一个可执行程序的图标，就没有那个小箭头，你看它属性会显示exe文件
而带箭头的是快捷方式，它的属性显示文件类型为快捷方式

Answer 2

楼上的错误理解我的意思了我并不是要你所说的那个效果你这样的话那么程序也是不能运行的，因为缺少支持的dll等文件

Answer 3

好像是修改什么IsShortCut，注册表里面的这个键值，修改以后，快捷方式就灭有箭头了

Answer 4

Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal _
        lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal _
        lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long      Sub Command1_Click()        Dim lReturn As Long        'Add to Desktop
        lReturn = fCreateShellLink("..\..\Desktop", _
        "Shortcut to Calculator", "c:\Winnt\system32\calc.exe", "")        'Add to Program Menu Group
        lReturn = fCreateShellLink("", "Shortcut to Calculator", _
        "c:\Winnt\system32\calc.exe", "")        'Add to Startup Group
        lReturn = fCreateShellLink("\Startup", "Shortcut to Calculator", _
        "c:\Winnt\system32\calc.exe", "")      End Sub

Answer 5

SORRY，上面发错了，那是VB的代码。调用STKIT432.DLL中的fCreateShellLink

Answer 6

小箭头是WINDOWS自已加上去的，修改注册表可以修改。
删除HKEY_CLASSES_ROOT\lnkfile\IsShortcut，重启动计算机