主题：外部数据源

Dim cmd As New SQLCommand
cmd.CommandText = "SELECT * From {新IP地址表} WHERE IP地址 NOT IN (SELECT DISTINCT IP地址 From {原IP地址表})"
Dim dt As DataTable = cmd.ExecuteReader()

'导入所有数据
Dim f As New Filler
f.SourceTable = dt '指定数据来源
f.SourceCols = "IP地址,使用人" '指定数据来源列
f.DataTable = DataTables("原IP地址表") '指定数据接收表
f.DataCols = "IP地址,使用人" '指定数据接收列
f.Fill() '填充数据

参考以上代码