액세스 예제 | 독립을 통해 레코드 필드를 입력

독립을 통해 레코드 필드를 입력

2008년 2월 20일 (수요일)에 게시 - 13시 22분 | 관리자에 의한 |

이 레코드를 입력하는 방법에는 여러 가지가 있으며, 가장 일반적인이 테이블에 바인딩된 양식을 통해 얻을 것입니다. 이 작업을 수행하는 다른 방법은 테이블에 독립적으로 관련이없는 분야로 양식을 사용하여 즉, 관련없는 필드를 통해서입니다. 에
우리가 다음과 같이이 예제의 경우에 코드에 의해 즉 '레코드'를, 사용하는 데이터를 입력 :

데이터베이스와 같은 희미한 dB
레코드 집합으로 희미한 RS

MsgBox은 ( "당신이 쓰고 싶으세요?"VbYesNoCancel를, "옵션") = 그렇다면 vbYes 경우
"누르면 코드가 끝날 때까지 계속 이렇게하면 레코드를 저장하거나하지 여부를 묻는다
세트 dB = CurrentDb ()
세트 RS = db.OpenRecordset ( "데이터", dbOpenTable)
'데이터 등록 삽입하는 테이블을 엽니다

rs.AddNew
RS ( "이름") = 저요! INome
RS ( "주소") = 저요! Imorada
RS ( "세") = 저요! Iidade
rs.Update '는 테이블에 데이터를 보냅니다
rs.Close '지우기 데이터 및이 레코드를 닫습니다
RS = 아무것도 설정하지
dB = 아무것도 설정하지

Me.INome = NULL을 '은 형태로 필드를 지웁니다
Me.Imorada = NULL을
Me.Iidade = NULL을
MsgBox "저장된 기록", vbInformation는 '표시 확인 메시지가 "완료"를
Me.INome.SetFocus '은 첫 번째 필드로 커서를 이동
다른 사람 : 출구 서브
END IF