没明白什么意思啊！是在VFP程序中吗？

想要打开文件，可以从桌面开始，也可以从某盘符开始，
不应该从我的电脑开始，在我的电脑里是不能保存文件的。

我做的是一个图片浏览软件 就是顾客拿来u盘 或者sd卡，显示打开的时候我希望首先看到的是我的电脑的界面，否则还要每次都按按钮返回上一级很麻烦，不行么，我不是要存取文件 是要找盘副，并且每次都不一样，读卡器 就有4个盘符

VBscript里有驱动器对象，
可以拿来挡一挡用一用。
不过还是有点麻烦。

在VFP里也是有驱动器选择的，
只是不能定位我的电脑，
但在左侧栏可以选我的电脑，
在上侧查找范围也可以选其他盘符。

暂时没有发现可以直接打开我的电脑的办法。

用 Visual FoxPro 地 Common Dialogs 控件：

使用：ShowOpen() 方法，显示打开文件对话框！

[img]http://p13.freep.cn/p.aspx?u=v20_p13_p_0812070901357710_0.jpg[/img]

**** 返回当前Windows的设置路径
**** 部分参数列表
**** 1=Internet Explorer
**** 2=程序
**** 3=控制面板
**** 4=打印机和传真
**** 5=我的文档
**** 6=收藏夹
**** 7=启动
**** 8=我最近的文档
**** 9=Send To
**** 10=回收站
**** 11=[开始]菜单
**** 13=我的音乐
**** 16=桌面
**** 17=我的电脑
**** 18=网上邻居
**** 19=NetHood
**** 20=Fonts
**** 21=Templates
**** 22=[开始]菜单(All Users)
**** 23=程序(All Users)
**** 24=启动(All Users)
**** 25=桌面(All Users)
**** 26=Applicatin Data
**** 27=PrintHood
**** 28=Applicatin Data(Local Settings)
**** 31=Favorites
**** 32=Temporary Internet Files(Local Settings)
**** 33=Cookies(Local Settings)
**** 34=History
**** 35=Applicatin Data(All Users)
**** 36=WINDOWS
**** 37=system32
**** 38=Program Files
**** 39=图片收藏(Local Settings)
**** 40=当前用户
**** 41=system32
**** 43=Common Files
**** 45=Templates(All Users)
**** 46=Documents(All Users)

PARAMETERS nSYSINFOR_INDEX
SET TALK OFF
LOCAL oShell , cResult , oObject

IF VARTYPE(m.nSYSINFOR_INDEX)<>"N"
    RETURN ""
ENDIF

oShell = CREATEOBJECT("shell.application")
m.cResult = ""
IF !ISNULL(oShell)
    oObject = oShell.NameSpace(m.nSYSINFOR_INDEX)
        IF !ISNULL(oObject)
            m.cResult = oObject.Self.Path
        ENDIF
ENDIF
RELEASE oShell

RETURN m.cResult

ok 我研究研究

我现在有foxer.dll打开多个文件，想在打开的时候显示我的电脑，因为都是移动磁盘来着。
foxer源代码是：
Foxer.dll SDK

[65]QFGetFile2( cFileExtensions, cInitPath [, nFlag] )
显示“打开文件对话框”， 支持多选和初始路径。
返回值
String. 得到用户选择的文件名

参数
cFileExtensions
扩展名列表

cInitPath
初始目录

nFlag
标记. 1: 支持多选
default: 0

示例
local lcFileNames, lcStrFilter
local lcPath, lcFileName

*--lcStrFilter 应以 "||" 结尾。
lcStrFilter = "form (*.scx)|*.scx|class lib (*.vcx)|*.vcx|All files(*.*)|*.*||"
lcFileNames = QFGetFile2(lcStrFilter, "", 1)

if( empty(lcFileNames) )
    return
endif

if( file(lcFileNames) ) && 只打开了一个文件.
    ?lcFileName
else
    PSSetStringLine(lcFileNames) 
    lcPath = addbs(PSGetItem()) && 第一个字符串是路径名.
    do while ( not PSIsEnd() )
        lcFileName = PSGetItem()
        ?(lcPath + lcFileName)
    enddo
endif