<<< 返回 access911.net 编程静态资料库索引页

如何实现windows的搜索功能(查找指定文件/文件夹)?(一)

 

作者:Dev Ashish  摘自:  录入:cg1  时间:2002-11-21  浏览人次:1218


专题地址:http://access911.net/fixhtm/73FAB41E.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何实现windows的搜索功能(查找指定文件/文件夹)?《VBA》

 


查找你所需要的文件的绝对路径 

 
如果你使用以下代码请先在VBA中引用"Microsoft Office 8.0 Object Library"以上的版本.

粘贴以下代码到新的模块中:

'***************** Code Start ***************
'This code was originally written by Dev Ashish.
'It is not to be altered or distributed,
'except as part of an application.
'You are free to use it in any application,
'provided the copyright notice is left unchanged.
'
'Code Courtesy of
'Dev Ashish
'
Function fReturnFilePath(strFilename As String, _
    strDrive As String) As String

Dim varItm As Variant
Dim strFiles As String
Dim strTmp As String
    
    If InStr(strFilename.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/73FAB41E.htm

 


上一篇:如何保存子窗体的动态查询结果(保存子窗体数据)?

下一篇:如何隐藏/显示某个表或者其他数据库对象?

2017年2月22日生成静态资料