📄 如何实现windows 95 的shell link .htm
字号:
<HTML><HEAD><TITLE>亦多EastDoor</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="MSHTML 5.00.2919.6307" name=GENERATOR><link rel="stylesheet" href="../eastdoor.css"></HEAD>
<BODY bgColor=#ffffff text=#000066 vLink=#e0e0e0>
<TABLE align=center border=0 borderColorLight=#90 cellPadding=0 cellSpacing=0
width=753>
<TBODY>
<TR align=middle>
<TD width=200 valign="top"><img src="../image/logo.gif" width="200" height="70"></TD>
<TD align=left height=56 vAlign=top width=603 colspan="2">
<div align="right">
<a href="http://202.113.29.120/">
<img src="../image/titlesoft.gif" height="72" border="0" alt="亦多下载中心"></a>
</div>
</TD>
</TR>
</TBODY>
</TABLE>
<div align="center"></div>
<TABLE align=center border=0 cellPadding=0 cellSpacing=1 width=755>
<TBODY>
<TR>
<TD align=middle height=292 vAlign=top width="100%">
<TABLE align=center border=0 cellPadding=0 cellSpacing=1
width="100%" bgcolor="#6699CC">
<TBODY>
<TR align=left bgcolor="#FFFFFF">
<TD colSpan=4 vAlign=top height=2>
<div align="left">
<table width="100%" border=" 0" cellspacing="1">
<tr bgcolor="#C1D6EA">
<td>
<div align="center">-=<font color="#FFFF33">-</font> 编程中心
<font color="#FFFF33">-</font>=-</div>
</td>
</tr>
</table>
</div>
</TD>
</TR>
<TR vAlign=middle bgcolor="#6699CC">
<TD colSpan=4 height="325">
<TABLE border=0 cellSpacing=0 height=100% width="100%" align="center">
<TBODY>
<TR vAlign=top>
<TD width="67%" rowspan="2" bgcolor="#FFFFFF">
<p align="center"><font size="3">如何实现WINDOWS 95 的SHELL LINK </font><br>
</p>
<p >1. 怎么搞定 Windows 95 的 Shell Link? <br>
<br>
一个很偶然的机会我看了看 VB5 的光盘,发现在 \tools\Unsupport\Shelllink 目录下发现了一个还算有用的例子
ShellLink. <br>
<br>
.简述 <br>
<br>
ShellLink 是什么呢? 应该是指快捷方式吧。很多安装程序安装后都会自动地建立一些快捷方式,包括主应用程序,帮助文件,自述文件等。有了这些快捷方式就能够很快的访问到对应的文件了。
<br>
<br>
.VB中的实现方案 <br>
<br>
大家可以去看看例子。只简单说说。 <br>
<br>
API函数集有这么几个有用的函数声明: <br>
<br>
Declare Function SHGetPathFromIDList Lib "Shell32.dll" Alias
<br>
<br>
"SHGetPathFromIDListA" (ByVal pidl As Long, ByVal szPath As
long) <br>
<br>
As Long <br>
<br>
Declare Function SHGetSpecialFolderLocation Lib "Shell32.dll"
<br>
<br>
(Byval hwndOwner as long, ByVal nFolder As long, ppidl As
long) As long <br>
<br>
这两个函数在 win32api.txt中并没有; 相对应的写信息的函数 我没有见到, 例子中提供了一个编译好的类型库文件
IShellLinkA Interface(ANSI),将对应的操作封装好了。 </p>
<p></p>
<p > </p>
</TD>
</TR>
<TR vAlign=top> </TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
<TABLE align=center border=0 cellPadding=0 cellSpacing=1 width=755>
<TBODY>
<TR bgColor=#000000>
<TD align=middle colSpan=4 height=2 vAlign=top></TD>
</TR>
</TBODY>
</TABLE>
<script src="../footnote.js" class="Small" ></script>
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -