提供高分，就看你想不想拿了！！！

拿例子来，能运行300分都是你的
[email protected]

解决方案 »

  1.   

    如果可以用sql还要数据库干吗？
      

  2.   

    不能用SQL来查，那为什么要用ADO呢？直接打开文件访问不就可以，就是直接访问不灵活，特别是涉及到分组统计的时候，所以要用SQL语句的功能。
      

  3.   

    我也要看看。 [email protected] 
      

  4.   

    不可能。那就麻烦了，原来这些数据是通过访问XML文件，然后写到EXCEL中，利用EXCEL的数据透视表的功能来统计的，但是EXCEL的数据透视表的行有限制(小于65535行)。这现在如何是好？这分组统计太麻烦了。
      

  5.   

    将EXCEL格式导入Access或SQL,再用ADO
      

  6.   

    斑竹！！！，下班了吗？dbcontrols,uguess,bardo...都来看一看呀！
      

  7.   

    难道就没有 OLE DB provider For Text file的驱动吗。
      

  8.   


    如果你给3000块，我帮你写一个OLEDB提供程序！
      

  9.   

    谁说没有for text file的驱动。
    等会。
      

  10.   

    在控制面板--(数据源)ODBC，可以建一个DSN，选打开*.txt文件的驱动就可以了。
    我建了一个名字中元件的DSN，指向一个名字为元件.txt文件.
    下面是使用方法。Const cnstr = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=元件;Initial Catalog=C:\DOCUMENTS AND SETTINGS\ADMINISTRATOR\MY DOCUMENTS\文档"Dim cn As ADODB.Connection
    Dim rs As ADODB.RecordsetPrivate Sub Command1_Click()
        Set cn = New ADODB.Connection
        cn.Open cnstr
        Set rs = New ADODB.Recordset
        Set rs.ActiveConnection = cn
        rs.LockType = adLockOptimistic
        rs.Open "select * from 元件.txt "
        rs.AddNew
        rs.Fields!ID = 1
        rs.Fields!Name = "lizhi"
        rs.Update
        rs.Close
        cn.Close
        
    End Sub
      

  11.   

    下面是把上面的代码执行了几遍后的结果。
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
    1,"lizhi"
      

  12.   

    我这里有源代码,来信要
    [email protected]
      

  13.   

    回复fling_boy：
    能不能不通过ODBC，而直接用OLEDB驱动，也就是说，我不能建ODBC数据源
      

  14.   

    OLEDB应该也可以，我想想吧。
      

  15.   

    dbcontrols:
     你的代码呢？
      

  16.   

    我试了所有的OLEDB驱动，但都不能用在txt文件，不好意思。
      

  17.   

    没关系，谢谢你，至少通过ODBC可以查询。如果没有别的方法，分到时都给你
      

  18.   

    分到是不很重要，不过我想追上那个jjjwltcs(叶子)女菜鸟，先在这里谢了。
      

  19.   

    fling_boy(男孩)：
    兄弟：这CSDN上有美女吗？jjjwltcs(叶子)是谁？漂亮吗 ？