ADO・Join結合レコードセット更新

こんにちわ  VB6.0SP6＆Access2002で作成しております。
ADO・Inner Joinで作成したレコードセットを更新したいと思っております。
テーブル名 仕入金額データ＆仕入先名に主キーは設定しておりません。

    rs.CursorLocation = adUseClient
    rs.Open strSQL, cn, adOpenKeyset, adLockOptimistic
    
rs.Properties("Unique Catalog") = "請求書照合"
rs.Properties("Unique Schema") = ""    ←何を設定したらわかりません。
rs.Properties("Unique Table") = "仕入金額データ"

With rs

        Me.imNumber1 = .Fields("仕入先ＣＤ")
        Me.imText1 = .Fields("仕入先名")
              （省略）
end with

としましたらフォームに表示されるのですが

    With rs
            
        .Fields("仕入先ＣＤ") = Me.imNumber1
        .Fields("正味金額") = Me.imNumber2
        .Fields("消費税") = Me.imNumber4
        .Fields("請求書〆日") = Me.imDate1
        .Fields("支払日") = Me.imDate2
        
     End With

    rs.UpdateBatch adAffectCurrent

を実行しますと 存在しないか、または完全に指定されていない一意テーブルです。  とエラーが出てしまいます。
どのようなコードにしたら宜しいでしょうか？
ご教授の程何卒宜しくお願いいたします。