銷貨單與銷貨單明細這樣連接可以嗎??(編號:4475)

Dim WithEvents adoPrimaryRS As Recordset
Dim adoPlexRS As ADODB.Recordset
Private Sub Form_Load()
Dim db As Connection
 Set db = New Connection
 db.CursorLocation = adUseClient
 db.Open "PROVIDER=MSDataShape;Data PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\CY\Cy.mdb;"

Set adoPrimaryRS = New Recordset
 adoPrimaryRS.Open "select 合計,收款方式,折讓,客戶編號,訂單號碼,送貨方式,現金銷貨,異動說明,發票開立,稅金,結帳月份,業務員,實收,銷貨日期,銷貨單號,應收 from 銷貨單 Order by 銷貨單號", db, adOpenStatic, adLockOptimistic

 Set adoPlexRS = New ADODB.Recordset
 adoPlexRS.Open "select 銷貨單細目.折數,銷貨單細目.金額,銷貨單細目.品名,銷貨單細目.規格,銷貨單細目.單位,銷貨單細目.單價,銷貨單細目.詳細序號,銷貨單細目.廠牌,銷貨單細目.數量,銷貨單細目.編號,銷貨單細目.銷貨單號 from 銷貨單細目,銷貨單 where 銷貨單細目.銷貨單號 = 銷貨單.銷貨單號 Order by 編號", db, adOpenStatic, adLockOptimistic
End Sub