請問如何建立一個mdb檔並建立欄位為OLE型態(編號:2799)

請問如何建立一個mdb檔並建立欄位為OLE型態
這樣的做法好像無法建立OLE的type..
Set objCat = New ADOX.Catalog
Set objconn = objCat.Create("Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & CommonDialog4.FileName)
objTbl.name = "Sample"
objTbl.Columns.Append "Picture", adBinary
objCat.Tables.Append objTbl
Set objCat = Nothing
objconn.Close
Set objconn = Nothing