那位能够帮我看看这段程序错在那里？
调试的时候说是磁盘或网络错误！一直没有搞明白！
       Dim RecordCount As Integer
        Adodc1.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0  ;Data source = & *.dat"
        Adodc1.RecordSource = "select * from " & Txtfile.Text
        Adodc1.Refresh

不行，显示的还是硬盘或网络错误！