狐狸爸爸:
如果要保存的话,每次只能加载一个表。
如果要加载多个表,则只能用2楼的方法,但不能保存。
建议你不要分月,全部一个表,根据需要加载,这样处理起来方便很多。
我现在想到的解决办法是:我现在在数据库里另建了个年表,结构跟月表一致,这样处理起来方便,查询和处理都方便。有没什么办法每日定时把月表中新增数据汇总(或则叫追加)到年表中,
我试过这个:
Dim f As New Filler
f.SourceTable = DataTables("Tab_P_ProductRecord201011") '指定数据来源
f.SourceCols = "ID,W_ID,Pos_ID1,Pos_ID2,A_Accounts,C_Number,ProductID,MachineID,WorkProcedureID,ProductRecordAmount,ProductRecordStep,
ProductRecordDebug,ProductRecordProcessDateTime,ProductRecordRemark,ProductRecordBrushCardStartDate,ProductRecordBrushCardEndDate,
ProductRecordSerialNumber,Accountday,adjustmentWage,MachineWage,WaitingWage"'指定数据来源列
f.DataTable = DataTables("_Tab_P_ProductRecord2010") '指定数据接收表
f.DataCols = "ID,W_ID,Pos_ID1,Pos_ID2,A_Accounts,C_Number,ProductID,MachineID,WorkProcedureID,ProductRecordAmount,ProductRecordStep,
ProductRecordDebug,ProductRecordProcessDateTime,ProductRecordRemark,ProductRecordBrushCardStartDate,ProductRecordBrushCardEndDate,
ProductRecordSerialNumber,Accountday,adjustmentWage,MachineWage,WaitingWage"'指定数据接收列
f.ExcludeExistValue=True '排除接收表中已经存在的内容(以接收列内容为判断标准)
f.Distinct=True
不行。同时还必须月表被设置过外部数据表。要不会出现没有改月表的提示。
我在想是不是SQL Server代理中的作业可以实现,但我又不知道如何实现。