用VB在桌面建立快捷方式

下面的代码向你演示在VB中如何创建一个快捷方式。

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

添加到桌面

lReturn = fCreateShellLink("..\..\Desktop", "Shortcut to Calculator", "c:\windows\calc.exe", "")

添加到程序组

lReturn = fCreateShellLink("", "Shortcut to Calculator", "c:\windows\calc.exe", "")

添加到启动组

lReturn = fCreateShellLink("\Startup", "Shortcut to Calculator", "c:\windows\calc.exe", "")

End Sub

时间: 2024-10-29 18:41:37

用VB在桌面建立快捷方式的相关文章

如何在桌面建立360极速浏览器无痕浏览快捷方式

桌面建立360极速浏览器无痕浏览快捷方式的小技巧 第一步,首先复制一份快捷方式 第二步,把新建的改个名,随便改一个,可以不改,改不改都可以,随便啦,第二步可以忽略 第三步,鼠标右击这个快捷方式,点属性 第四步:点快捷方式选项,找到目标栏 第五步:加上 --Incognito,注意前面有一个空格,然后点确认 第六步:可以从桌面上直接进入无痕浏览窗口了         注:更多精彩教程请关注三联电脑教程栏目

Delphi中用于建立快捷方式的函数: CreateShortcut

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton; procedure Button1Click(Sender:

桌面IE快捷方式不小心被删除了如何恢复

如果桌面 IE 图标被误删除,但是又想恢复,而不是建立快捷方式(到 C:Program FilesInternet Explorer 下发送一个快捷方式到桌面),该怎么办呢? 网上有很多改注册表的办法,很麻烦,有的也不一定生效,这里有一个小诀窍: 1.右击桌面空白处,弹出的菜单选"属性" 2.弹出的窗口,切换到"桌面",再点击"自定义桌面": 3."桌面图标"里面没有 Internet Explorer,这时按一下字母键 i

win7窗口模式怎么样建立快捷方式

通常我们调用win7立体窗口,都是按下快捷键Ctrl+视窗键+Tab键,按住Ctrl+视窗键然后按Tab键来找到自己想要的,但是有的时候不想要用快捷,可以建立了快捷方式,来方便你使用win7立体窗口. 1 键盘那个键是视窗键: 视窗键也叫做win键,位于Ctrl和Alt中间,图标像桌面上开始的那个键就是了. 2 在桌面上建个快捷方式 右击桌面空白处 - 新建 - 快捷方式 3 在快捷方式里面输入:X:/Windows/System32/rundll32.exe DwmApi #105.x是系统盘

如何在桌面增加快捷方式

问题描述 我想在网页上设置一个按钮,用户点击后无须提醒即在桌面建立一个指向某个地址的快捷方式,请各位大大指教! 解决方案 解决方案二:好像有个shortcut的jar包,你试试.好像不是这个我记不得了解决方案三:弱弱的问,感觉一般这样的情况,浏览器的安全设置会阻止网页这么做,如何处理这种情况呢?解决方案四:自顶一下,确实需要帮助啊,请大神帮忙...解决方案五:你是不是可以先写个创建快捷方式的bat,然后通过action执行这个bat啊解决方案六:JAR包的方式试过了,不行啊,有请大神帮忙!

win7系统将Google浏览器收藏夹拉到桌面成快捷方式的方法

  win7系统将Google浏览器收藏夹拉到桌面成快捷方式的方法 具体方法如下: 1.在进行演示之后,需要在浏览器中进行添加的是收藏的夹的内容,进行点击地址栏中点击收藏夹按钮; 2.可以看到的网页地址被收藏夹收藏起来了; 3.然后点击点击浏览器中的地址中的更多的菜单中,弹出了下拉菜单中进行选择为"书签"; 4.就会弹出了下一级菜单中进行选择为了刚才你收藏的收藏夹的地址; 5.把收藏夹地址进行拖动到自己桌面中当中; 6.可以看到的是百度一下的收藏夹快捷方式创建成功了.下次就可以直接双击

android-Android桌面的快捷方式图标不显示

问题描述 Android桌面的快捷方式图标不显示 我想在安卓桌面的某一位置通过代码添加了一个快捷方式,我从远程服务器上下载了图标,然后把这个图标设置成桌面的快捷方式图标. String url = "http://www.the-brights.net/images/icons/brights_icon_50x50.gif"; InputStream ins = null; try { ins = new java.net.URL(url).openStream(); } catch

实战ASP(7):使用ASP、VB和XML建立运行于互联网上的应用程序(上)

xml|程序|互联网|xml|互联网 使用ASP.VB和XML建立运行于互联网上的应用程序(1)     在个人电脑上使用单机版应用软件的时代很快就要过去了,现在大部分的应用程序都开发出网络版或大都需要共享网络上丰富的数据资源.我们虽然写了很长时间基于客户端/服务器的应用程序,但是这些程序大部分只是运行在小型的局域网内部.然而,有很多客观的原因要求我们要修改这些程序以使它们能够运行在一个企业的内部网甚至是国际互联网. 是什么原因迫使我们做呢?首先,随着一个企业的规模逐渐扩大,公司可能会跨地区甚至

实战ASP(8):使用ASP、VB和XML建立运行于互联网上的应用程序(下)

xml|程序|互联网|xml|互联网 使用ASP.VB和XML建立运行于互联网上的应用程序(2)     在实际的编程过程中,你们应当使用一些方法使应用程序更加有高效性.你可以把ASP中的关于取得数据的代码端搬到一个COM应用程序中去然后创建一个XSLT变换来显示返回的数据.好,我不多说了,现在你所要做的就是试一试吧! Option Explicit Private RCommands As Recordset Private RCustomers As Recordset Private RC