Access交流中心

北京 | 上海 | 天津 | 重慶 | 廣州 | 深圳 | 珠海 | 汕頭 | 佛山 | 中山 | 東莞 | 南京 | 蘇州 | 無錫 | 常州 | 南通 | 揚州 | 徐州 | 杭州 | 溫州 | 寧波 | 臺州 | 福州 | 廈門 | 泉州 | 龍巖 | 合肥 | 蕪湖 | 成都 | 遂寧 | 長沙 | 株洲 | 湘潭 | 武漢 | 南昌 | 濟南 | 青島 | 煙臺 | 濰坊 | 淄博 | 濟寧 | 太原 | 鄭州 | 石家莊 | 保定 | 唐山 | 西安 | 大連 | 沈陽 | 長春 | 昆明 | 蘭州 | 哈爾濱 | 佳木斯 | 南寧 | 桂林 | ? | 貴陽 | 西寧 | 烏魯木齊 | 包頭 |

回復 加入收藏帖  復制
我要提問 帖子上移

數據表窗體顯示過濾后的數據表內容或ADO RecordSet內容后無法修改記錄

Aric 等級: 普通會員 積分:0 金幣:0 來自:上海Access交流中心 發表于:2020-05-04 20:55:08  
樓主

創建數據表窗體,顯示一個表的內容時,如果通過VBA在打開窗體時,過濾部分數據后,顯示的窗體中無法修改數據。


另外也嘗試通過ADO Recordset在窗體打開時,來設定窗體的顯示內容,在窗體打開后,也無法修改數據。以下是窗體打開時的代碼:


Private Sub Form_Load()
    Dim rs As ADODB.Recordset
    
    Me.AllowAdditions = True
    Me.AllowDeletions = True
    Me.AllowEdits = True
        
    Set rs = New ADODB.Recordset
    With rs
        .ActiveConnection = CurrentProject.Connection
        .Source = "Select * from SalesOrder where PM='Rob'"
        .LockType = adLockOptimistic
        .CursorType = adOpenKeyset
        .Open
    End With
    
    Set Me.Recordset = rs
    Set rs = Nothing


    Debug.Print "Opened"


End Sub

 

access培訓  誠聘access開發人員

    Aric
      獲得社區協助:請教問題(即發帖)1篇,其中獲得解決的0篇;
      協助社區成員:協助他人(即回帖)0篇,其中被設為【最佳答案】的0篇;
      協助我們社區:發布技術文章0篇,邀請了0名新會員注冊本社區(如何邀請會員注冊,詳見:http://www.542117.buzz/sitehelp.asp)。
Top

掃描下方工作人員的微信二維碼加微信,邀您加入Access課堂微信群,進入一個技術交際圈:

網站工作人員微信

總記錄:0篇  頁次:0/0 9 1 :
您還沒有在Access軟件網登錄不能回復帖子
  • 你沒有登錄,請點擊后面鏈接登錄:登錄
  • 如果你沒有注冊,請點擊后面鏈接注冊:注冊,注冊完成后,請再次訪問本頁功能。
 
手机龙王捕鱼技巧