对得到的数据 如何 指定列插入数据呢？在线等 ---- 急

Question

我动态生成了下面的SQL 代码select isnull(employee9_id,99999) employee9_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee8_id,99999) employee8_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee7_id,99999) employee7_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee6_id,99999) employee6_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee5_id,99999) employee5_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee4_id,99999) employee4_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee3_id,99999) employee3_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee2_id,99999) employee2_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001select isnull(employee1_id,99999) employee1_id from tb_work_arranged_list_ei_exchage where work_arranged_list_id=20030002 or work_arranged_list_id=20030001
我想把得到的结果指定插入 某一列
怎么做呢？
我本来想用下面的代码实现 但发现不可能只插入一列还有个小问题 假如我想对得到的数据进行 DISTINCT 怎么做呢/
是不是用            ds2.Tables(0).DefaultView.RowFilter = "distinct empolyee_id" 能实现呢？
 temp = 10
                Dim ds2 As New DataSet
                Dim odAdapt2 As OleDb.OleDbDataAdapter
                Do While temp >= 1
                    sql = "select isnull(employee" & temp & "_id,99999) employee" & temp & "_id from tb_work_arranged_list_ei_exchage where " & temp1
                    odAdapt2 = New OleDb.OleDbDataAdapter(sql, conn)
                    odAdapt2.Fill(ds2)
                    Response.Write(sql)
                    Response.Write("<br></br>")
                    temp -= 1
                Loop
                odAdapt2 = Nothing
                Response.End()