dataadapter.update()不能更新数据库,该如何解决

dataadapter.update()不能更新数据库
 ASconn.ConnectionString = System.Configuration.ConfigurationManager.AppSettings("ASConnString").ToString()
conn.ConnectionString = System.Configuration.ConfigurationManager.AppSettings("ConnStr").ToString()
        ASconn.Open()
        conn.Open()
         sql1 = "select * from dschidata.KJPSP"
         sql2 = "select * from  KJPSP_AS"
        Dim ad1 As New OleDbDataAdapter(sql1, ASconn)

        Dim ad2 As New SqlDataAdapter(sql2, conn)
       

        Dim ds1 As New DataSet
        Dim ds2 As New DataSet

        ad1.Fill(ds1, "tab1")
        ad2.Fill(ds2, "tab1")
ds2.Merge(ds1)

        count = ds2.Tables(0).Rows.Count
        Dim cb As SqlCommandBuilder
        cb = New SqlCommandBuilder(ad2)

               ad2.Update(ds2, "tab1")
        
        ASconn.Close()
        conn.Close()
------解决方案--------------------
参考
------解决方案--------------------
pinterest.com/rgrodh/%E5%86%A0%E5%8E%BF%E8%B4%BE%E9%95%87%E5%93%AA%E9%87%8C%E6%9C%89%E6%89%BE%E6%9C%8D%E5%8A%A1%E5%B0%8F%E5%A7%90
------解决方案--------------------
数据表必须要有主键才行
------解决方案--------------------
好像是能用* 查询
------解决方案--------------------
你连更新的sql都没有  你更新毛线数据库   你那个update是更新dataset 结果集的