ADO AddNew, 업데이트, 삭제, 찾기 및 필터 데모 방법

기술 자료 번역 기술 자료 번역
기술 자료: 193946 - 이 문서가 적용되는 제품 보기.
모두 확대 | 모두 축소

이 페이지에서

요약

ADO (ActiveX 데이터 개체) FoxPro 언어로 찾을 것과 비슷한 레코드 조작 명령을 구현합니다.

AddNew 메서드를 새 빈 레코드로 현재 레코드 집합의 끝에 추가됩니다. Update 메서드를 사용하여 레코드 집합에 데이터를 씁니다. 해당 Delete 메서드를 사용하여 현재 레코드가 레코드 집합에서 제거합니다.

찾기 및 필터 메서드를 Recordset 특정 필드 값을 검색할 수 있습니다. 복합 식은 두 메서드 모두 지원합니다.

추가 정보

다음 예제에서는 SQL Server PUBS 예제 데이터베이스의 책임도 테이블에서 레코드를 인스턴스화합니다. 이 예제에서는 레코드 집합에 새 레코드를 추가하는 AddNew 및 Update 메서드를 보여, Find 메서드를 사용하여 새 레코드 및 새 레코드를 제거하려면 Delete 메서드를 찾습니다. 그 다음 동일한 레코드를 다시 추가하고 Filter 속성을 사용하여 찾은 레코드를 제거합니다.

참고: SQL Server 설치를 Recordset.Open 메서드에서 적절한 SERVER, UID 및 PWD 매개 대체하십시오.

이 예제를 사용하려면 사용자가 Microsoft 데이터 액세스 구성 요소 (MDAC) 버전 2.x 또는 설치되어 있어야 합니다 나중에, Visual Studio 6.0 데이터 구성 요소가 포함된 또는 다음 웹 주소에서 다운로드할 수 있습니다.
http://msdn.microsoft.com/en-us/data/aa937729.aspx

예제 코드

* Demonstrate the ADO AddNew, Update, Find,
   * Filter and Delete functions.

   #DEFINE adOpenDynamic 2
   #DEFINE adLockOptimistic 3
   oRecordSet = CREATEOBJECT("ADODB.Recordset")

   * SQL Server driver defaults to server-side cursor,
   * this would otherwise be necessary to use adOpenDynamic.
   oRecordSet.OPEN("select * from authors", ;
      "DRIVER={SQL Server};"+;
      "SERVER=YourServerName;"+;
      "DATABASE=pubs;"+;
      "UID=YourUserName;"+;
      "PWD=YourPassword",;
      adOpenDynamic, adLockOptimistic)

   =AddRec()
   * Now the record is added - find it and delete it.
   oRecordSet.FIND("au_id = '987-65-4321'")
   IF NOT oRecordSet.EOF
      oRecordSet.DELETE
      =MESSAGEBOX("Record deleted")
   ENDIF

   * Remove comment to display the AU_IDs in the RecordSet.
   * =ShowRS()

   * Add it again, this time, use a compound Filter to find
   * and delete it.
   =AddRec()
   oRecordSet.FILTER = ("au_id = '987-65-4321' and au_lname = 'Smith'")
   IF NOT oRecordSet.EOF
      oRecordSet.DELETE
      =MESSAGEBOX("Record deleted")
   ENDIF

   * Remove comment to display the AU_IDs in the RecordSet
   * =ShowRS()

   * Remove the filter.
   oRecordSet.FILTER = ""

   * Function ShowRS:
   * Display all the au_ids in the RecordSet.
   FUNCTION ShowRs

   CLEAR
   oRecordSet.MoveFirst
   ? oRecordSet.RecordCount
   * print the au_id field values
   DO WHILE ! oRecordSet.EOF
      ?oRecordSet.FIELDS("au_id").VALUE
   oRecordSet.MoveNext
   ENDDO


   * Function AddRec:
   * Add a new record to the authors table.
   FUNCTION AddRec

   oRecordSet.AddNew
   oRecordSet.FIELDS("au_id")= '987-65-4321'
   oRecordSet.FIELDS("au_lname") = "Smith"
   oRecordSet.FIELDS("au_fname") = "John"
   oRecordSet.FIELDS("phone") = 9999999999
   oRecordSet.FIELDS("address") = "123 4th Street"
   oRecordSet.FIELDS("city") = "New York"
   oRecordSet.FIELDS("state") = "NY"
   oRecordSet.FIELDS("zip") = "99999"
   oRecordSet.FIELDS("contract") = .T.
   oRecordSet.UPDATE
   =MESSAGEBOX("Record added")
				

속성

기술 자료: 193946 - 마지막 검토: 2004년 7월 1일 목요일 - 수정: 4.3
본 문서의 정보는 다음의 제품에 적용됩니다.
  • Microsoft Visual FoxPro 6.0 Professional Edition
  • Microsoft Data Access Components 2.1 서비스 팩 2
  • Microsoft Data Access Components 2.5
  • Microsoft Data Access Components 2.6
키워드:?
kbmt kbctrl kbdatabase kbhowto kbsqlprog KB193946 KbMtko
기계 번역된 문서
중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

피드백 보내기

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com