您的位置:首页 > 其它

创建快捷方式

2007-05-24 12:10 190 查看
1。在桌面上空白点击右键/选择[新建]/[快捷方式],然后按照提示创建即可。

2。添加引用COM组件 :Windows Script Host Object Model 不要忘了using IWshRuntimeLibrary;

代码如下:

WshShell shell = new WshShell();
//这个快捷方式保存到了IE收藏夹中,或者自己指定
IWshShortcut shortcut = (IWshShortcut)shell.CreateShortcut(
System.Environment.GetFolderPath(System.Environment.SpecialFolder.Favorites) +
"/" + "快捷方式.lnk"
);

// System.Reflection.Assembly.GetExecutingAssembly().Location; 给本程序做一个快捷方式
shortcut.TargetPath = "http://www.sohu.com";
shortcut.WorkingDirectory = System.Environment.CurrentDirectory;
shortcut.WindowStyle = 1;
shortcut.Description = "快捷方式";

shortcut.IconLocation = @"D:快捷方式快捷方式zltz.ico";//System.Environment.SystemDirectory + "/" + "shell32.dll, 165";
shortcut.Save();

3。用写文件的文件创建一个url

private void CreateShortcut(string Title , string URL)
{
string strFavoriteFolder ;

// “收藏夹”中 创建 IE 快捷方式
strFavoriteFolder = System.Environment.GetFolderPath(Environment.SpecialFolder.Favorites);
CreateShortcutFile(Title,URL,strFavoriteFolder);

// “ 桌面 ”中 创建 IE 快捷方式
strFavoriteFolder = System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop);
CreateShortcutFile(Title,URL,strFavoriteFolder);

// “ 链接 ”中 创建 IE 快捷方式
strFavoriteFolder = System.Environment.GetFolderPath(Environment.SpecialFolder.Favorites)+"链接";
CreateShortcutFile(Title,URL,strFavoriteFolder);

//「开始」菜单中 创建 IE 快捷方式
strFavoriteFolder = System.Environment.GetFolderPath(Environment.SpecialFolder.StartMenu);
CreateShortcutFile(Title,URL,strFavoriteFolder);

}

private void CreateShortcutFile(string Title , string URL, string SpecialFolder)
{
// Create shortcut file, based on Title
System.IO.StreamWriter objWriter = System.IO.File.CreateText(SpecialFolder + "" + Title + ".url" );
// Write URL to file
objWriter.WriteLine("[InternetShortcut]");
objWriter.WriteLine("URL=" + URL);
// Close file
objWriter.Close();
}

private void button1_Click(object sender, System.EventArgs e)
{
CreateShortcut("TestIEShortCut",http://blog.csdn.net/);
}

感觉第2种方法最好。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: