发现2000以上的系统的foxpro驱动vfpodbc.dll(21K)是不能链接的,
然后我拷贝个支持的大概955K到SYSTEM32下覆盖原来的就可以了,
问题是,如果我要发布到购买的空间服务器器上,就不能自己注册支持这种方式的动态库了,
请问还有什么办法解决,通过OLEDB,也是说本地没有注册,(外面购买的空间不一定给你注册吧)
发现XP不可以,2003也不可以
还有什么其他的办法读取吗?有谁有第三方的免费控件吗?    Public Function DbfToDs(ByVal path As String, ByVal filename As String) As DataSet
        Dim my_conn As OdbcConnection
        Dim my_adapter As OdbcDataAdapter
        Me.my_TablePath = path
        Me.my_TableName = filename
        Try
            'Me.my_StrConnection = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & Me.my_TablePath
            'Me.my_StrConnection = "Driver={Microsoft FoxPro VFP Driver (*.dbf)};SourceType=DBF;SourceDB=" & Me.my_TablePath
            'Me.my_StrConnection = "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=" & Me.my_TablePath & ";"
            'Me.my_StrConnection = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & Me.my_TablePath & ";Exclusive=No;Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO"
            Me.my_StrConnection = "Provider=vfpoledb.1;Data Source=" & Me.my_TablePath & ";Collating Sequence=general"
            'Me.my_StrConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Me.my_TablePath & ";Extended Properties=dBASE IV;User ID=Admin;Password="            Me.my_StrSelect = "SELECT * FROM " & Me.my_TableName
            my_conn = New OdbcConnection(Me.my_StrConnection)
            my_conn.Open()
            my_adapter = New OdbcDataAdapter(Me.my_StrSelect, my_conn)
            Me.my_Ds = New DataSet            '填充数据
            my_adapter.Fill(Me.my_Ds, Me.my_TableName)
             Return Me.my_Ds
        Catch ex As Exception
            System.Web.HttpContext.Current.Response.Write(ex.Message & my_StrSelect)
            my_conn.Close()
            Return Nothing
        End Try    End Function