感謝 Andy Lin 提供答案~~謝謝 !!
但我程式中並沒有move 的動作
adodc控制項的屬性
1.使用連線字串 有選但是空白
2.資料庫來源 中 命令類型 =＞ 8.adCmdUnKnow
strPdir = App.Path + "\Main.mdb"
strPcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &strPdir _
& ";Persist Security Info=False"
Adodc1.ConnectionString = strPcon
Adodc1.RecordSource = "select * from [訂購客戶檔]"
Adodc1.Refresh
Adodc1.Recordset.AddNew