訪 問 sql建 立 主 從 表 的 存 取 應 該 用 MsDataShape作 為 數 據 提 供 者 ， 這 時 從 表 將 作 為 主 表 的 一 個 字 段 ， 該 字 的 值 是 個 Recordset， 指 向 子 表 . 
    Dim cn as New ADODB.Connection 
    dim rs as adodb.recordset,childrs as adodb.recordset 
    cn.Open "Provider=MSDataShape;Data Provider=MSDASQL 
    rs.open ..... 
    set childrs=rs.fields("rsChildTable").value 
<END>    
設 立 一 ado控 件 ， 數 據 源 為 ： 
    provider=msdatashape;data provider=msdasql;uid=;pwd=;database=; 
    shape {select * from 主 表 } as parentcmd append ({select * from 子 表 } as childcmd relate to 連 接 字 段 )as childcmd 
<END>