2016-11-08 1 views
0

이것은 나를 괴롭 히고 있습니다.양식에서 표로 데이터 저장

나는 나의 테이블에 모든 것을 보여주는 목록 상자와 사용자 정의 폼을 (연결 사용하여 행 원본) 내 양식에

I 사용자가이를 업데이트 할 때 나는에 무슨 덮어 데이터를 원하는, 콤보 상자와 텍스트 상자를 표.

목록 상자에서 계정을 클릭하면 텍스트/콤보 상자가 데이터를 채 웁니다. 데이터가 변경되면 단순히 저장되지 않고 그 이유를 모르겠습니다.

RunCommand acCmdSaveRecord 
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 
Me.Refresh 
Me.Dirty = False 

어떤 생각을 왜 어떤 습관 저장 : 나는 테이블에 저장하려면 다음 코드를 텍스트/콤보 상자에

?

+0

아무것도 필요가없는 하나의 대안 코드입니다. 다른 레코드로 이동하거나 양식을 닫으면 바운드 양식이 자동으로 업데이트됩니다. – Gustav

+0

콤보 상자 및 텍스트 상자에서 rowsource를 채우지 만 컨트롤 소스에 테이블의 필드 중 하나를 배치했다고 말했습니까? – geeFlo

+0

텍스트 상자 등을 테이블에 바인딩 했습니까? 그렇다면, 나는 그 일을했다. – dmorgan20

답변

1

이 당신이

Dim db As Database 
Dim rec As Recordset 

Set db = CurrentDb 
Set rec = db.OpenRecordset("SELECT * FROM <<Insert Table Name>> WHERE <<TextBox>>= Primary Key") 

rec.Edit 

rec("<<Table Field Name>>") = Me.<<Form textbox etc>> 
rec("<<Table Field Name>>") = Me.<<Form textbox etc>> 

rec.AddNew 
관련 문제