[quote]发了一个邮件到您的邮箱，您看能不能解决您问题，如果能解决，吱一声，我也算是多了一个知识。[/quote]

  郵件有收到,但附件被防火牆給擋住了!

N多天过去了，再把这个贴拿出来SHOW一下，请有能力者出出手，谢谢！

我是真不懂，因为我试来试去，就没有成功过。（虽然那已经是N年前的事情了。）

今天翻了翻书，看见了ODBC字样，然后又翻了翻我的电脑，
我的书是张洪举的《Visual FoxPro 6.0~9.0解决方案与范例大全》（人民邮电出版社）P448
引用如下：
[quote]PARAMETER lODBCType
#DEFINE ERROR_SUCCESS 0 
#DEFINE C_EXTNOFOUND_LOC "No information available for selected application."
#DEFINE C_NOREGFILE_LOC "The REGISTRY.PRG file needed for this sample could not be found in \Samples\Classes."

LOCAL oReg,regfile,nErrNum,lDrivers
PUBLIC aODBCData
lDrivers = .F.

IF PARAMETERS()=1 AND TYPE("m.lODBCType")="L" AND m.lODBCType
    m.lDrivers = .T.
ENDIF

regfile = HOME()+"samples\classes\registry.prg"
IF !FILE(m.regfile)
    MESSAGEBOX(C_NOREGFILE_LOC )
    RETURN
ENDIF

SET PROCEDURE TO (m.regfile) ADDITIVE
oReg = CreateObject("ODBCReg")

DIMENSION aODBCData[1]
IF m.lDrivers
    m.nErrNum = oReg.GetODBCDrvrs(@aODBCData)
ELSE
    m.nErrNum = oReg.GetODBCDrvrs(@aODBCData,.T.)
ENDIF

thisform.lstODBCData.rowsource = "aODBCData"

RELEASE PROC (m.regfile)[/quote]

我运行了一下例程，它是计算ODBC的注册表值，分为两项，
一样是驱动程序：其中包括有VFP的驱动。
一样是数据源信息：和你的截图是一样的，只有三项。

下载VFPODBC.MSI安装一下即可

楼上的兄弟,具体一点可以吗?谢谢!