主题：请教如何让狐表自动将日志表合并后供狐表调用

你需要系统学习一遍,而不是单独去看字符串拼接.

Dim lst As List(Of String) =Connections("nwnd").GetTableNames
Dim cmd As new sqlcommand
cmd.c
For Each nm As String In lst
    Dim dt As DataTable
    cmd.commandtext="select * form ["& nm & "]"
    dt=cmd.ExecuteReader
    For Each dr As DataRow In Dt.Datarows
        For Each dc As DataCol In Dt.DataCols
            Dim r As Row = Tables("xxx").AddNew
            r(dc.name)=dr(dc.name)
        Next
    Next
Next

谢谢~！

此主题相关图片如下：1.jpg

此主题相关图片如下：2.jpg

http://www.foxtable.com/help/topics/1943.htm

cmd.commandtext="select * form ["& nm & "]" 

from

Dim lst As List(Of String) =Connections("nine").GetTableNames
Dim cmd As new sqlcommand
cmd.C
For Each nm As String In lst
    Dim dt As DataTable
    cmd.commandtext="select * from ["& nm & "]"
    dt=cmd.ExecuteReader
    For Each dr As DataRow In Dt.Datarows
        For Each dc As DataCol In Dt.DataCols
            Dim r As Row = Tables("xxx").AddNew
            r(dc.name)=dr(dc.name)
        Next
    Next
Next

 

 

 

第一行的代码，我改了一下，不提示出错误了，但是，后面这句Dim r As Row = Tables("xxx").AddNew ，这里面的XXX 是什么意思呀？

你想把这些数据都汇总到哪个表，这个XXX就是那个表的表名。

上面的错误，明显是拼写错误了，你们要学会判断错误的类型，这么简单的错误，应该一下就判断出来了

 

或者用狐表的精灵功能，也可以轻松解决，cmd.connectionname 写错成 cmd.connextionname

 

 

谢谢老师的指点，但我出了新问题啊，程序的代码执行后，结果成下面的了

数据全部错位，而且，还间隔很多。上图说话

 

 

此主题相关图片如下：qq图片20130701110135.jpg


此主题相关图片如下：qq图片20130701110210.jpg