액세스 VBA 강좌_ADO_레코드의 편집

■ Contents     １　Update 방법     １.Update 방법 최신 레코드의 내용을 편집하는 데는 Update방법을 이용한다．편집 대상의 레코드는 최신 레코드이다． 【서식】recordset.Update Fields,Values recordset：열려 있는 Recordset 오브젝트 Fields：편집하는 필드 이름 Values：필드에 대입 하는 값 Update 방법은 편집한 내용을 Recordset 오브젝트에 보존 처리한다．Values인수는 필드의 데이터 형태가 텍스트 형태의 경우는 대입 하는 값을 Double Quatation（"）이고 ，날짜 시각형의 경우는 샾기호（＃）으로 묶어야 한다．수치형의 필드에 대입 하는 경우에는 그대로 값을 기술한다． 【예】 RS.Update "성명", "홍길동　이치로" RS.Update "점수", 100 RS.Update "입학 일", #04/05/21# 모든 레코드를 편집 【사용 예】 Public Sub Exsample() Dim CN As ADODB.Connection Dim RS As ADODB.Recordset '접속 Set CN = CurrentProject.Connection '레코드셋을 취득 Set RS = New ADODB.Recordset RS.Open "학생 명부", CN, adOpenKeyset, adLockOptimistic '편집 Do Until RS.EOF RS.Update "보호자 성명", RS!보호자 성명 & " 모양" RS.MoveNext Loop '종료 RS.Close: Set RS = Nothing CN.Close: Set CN = Nothing End Sub 특정의 레코드만을 편집 【사용 예】 Public Sub Exsamplet() Dim CN As ADODB.Connection Dim RS As ADODB.Recordset '접속 Set CN = CurrentProject.Connection '레코드셋을 취득 Set RS = New ADODB.Recordset RS.Open "학생 명부", CN, adOpenKeyset, adLockOptimistic '편집 Do Until RS.EOF If RS!클래스 = "TS" Then RS.Update "보호자 성명", RS!보호자 성명 & " 모양" Else ' End If RS.MoveNext Loop '종료 RS.Close: Set RS = Nothing CN.Close: Set CN = Nothing End Sub 복수의 필드를 편집한다 복수의 필드를 편집하는 데는 다음의 두 방법이 있다． ■편집하는 필드의 수만 Update 방법을 실행 【예】３의 필드를 편집한다 RS.Update "성명", "홍길동　이치로" RS.Update "클래스", "TS" RS.Update "입학 일", #04/05/12# ■필드에 값을 대입 한 뒤에 Update 방법을 실행 【예】３의 필드를 편집한다 RS!성명 = "홍길동　이치로" RS!클래스 = "TS" RS!입학 일 = #04/05/12# RS.Update

   

<http://www.msaccess.co.kr/onlinele/list/basic/recordeset/ado/ado_3.htm>에서 삽입