《网站桌面快捷方式》下载源码

一段桌面快捷方式源码，这个是用vb.net for asp来写的，就是客户在打开网站，下载这个段代码，可以存为桌面，就可以以后方便打开了，可以根据自已的需要进行修改哈

          Dim Html As String = "[InternetShortcut]" & vbCrLf,
            Html &= "URL=http://www.cqwsc.com/login.html" & vbCrLf
          Html &= "IconFile=(http://www.cqwsc.com/favicon.ico)" & vbCrLf
          Html &= "IconIndex=1" & vbCrLf
          Html &= "IDList=[{000214A0-0000-0000-C000-000000000046}]" & vbCrLf
          Html &= "Prop3=19,2" & vbCrLf
          Html &= "[DEFAULT]" & vbCrLf
          Html &= "BASEURL=http://www.cqwsc.com/" & vbCrLf
         Response .ContentType = "application/octet-stream"
          Response.AddHeader("Content-Disposition", "attachment;filename=" & HttpUtility.UrlEncode("重庆微商城") & ".url")
          Response.Write(Html)