先進們:我的電腦不知道怎了,本來可以用的 ADOX 物件,現在只要一執行就會顯是 "Active 元件無法產生物件" err.code=429 但是同樣的程式只要拿到別台電腦就好了,請問是哪出問題呢?
Dim AdoCtl As New ADOX.Catalog
AdoCtl.ActiveConnection "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & MDBfilename & ";Jet OLEDB:Database password=" & MDBpw
AdoCtl.Tables(tablename).Name = NewTableName
上方程式會偵錯在第二行。
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(2) 人氣()