'目的 更新資料庫某欄位
Private Sub Command2_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = " update bp581 set 註記 = 'Y' "
Adodc1.Refresh '如果加入這一行 會出現物件關閉不許操作
'如果沒這一行 好像資料不會更新 因為我到access看了沒更新
'但是這行敘述 放入access 2000 的查詢裡卻又正確
'請問vb該如何寫?
Label1.Caption = "完成"
End Sub
我只簡單測試到此 還未加入 where 條件就卡在這裡請高手幫忙
另外請教 若該更新欄位值 Y 要以文字方塊 Text1 帶入又該如何寫 謝謝
Private Sub Command2_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = " update bp581 set 註記 = 'Y' "
Adodc1.Refresh '如果加入這一行 會出現物件關閉不許操作
'如果沒這一行 好像資料不會更新 因為我到access看了沒更新
'但是這行敘述 放入access 2000 的查詢裡卻又正確
'請問vb該如何寫?
Label1.Caption = "完成"
End Sub
我只簡單測試到此 還未加入 where 條件就卡在這裡請高手幫忙
另外請教 若該更新欄位值 Y 要以文字方塊 Text1 帶入又該如何寫 謝謝
全站熱搜
留言列表