主题：两个数据源 如何实现数据库表之间的高效率导入

如题的功能需求  需要把外网数据库1行政区域的数据导入到 内网数据库2行政区域表内  请教如何处理效率最优！

数据库1
Dim cmd As New SQLCommand
cmd.ConnectionName = "数据库1"
Dim dt As DataTable

cmd.CommandText = "S  ELECT DISTINCT 省,市县,区号,邮编 From {行政区域}"
dt = cmd.ExecuteReader()

数据库2

Dim cmd As New SQLCommand
cmd.ConnectionName = "数据库2"
Dim dt As DataTable

cmd.CommandText = "S  ELECT DISTINCT 省,市县,区号,邮编 From {行政区域}"
dt = cmd.ExecuteReader()