이것은 문서의 이전 버전입니다!


CLIPPER에서는 RDD를 DBFNTX 또는 DBFCDX를 사용하였지만 NextWin에서는 ADSNTX 또는 ADSCDX를 권장합니다.

ADS(Advantage Database Server or Local Server)에 관한 자세한 정보는

  http://www.advantagedatabase.com/ADS/default.htm를 참고바랍니다.

우선 ADS local server를 사용하기 위해서는 현재 작업폴더 또는 Windows폴더 또는 Windows/System32 폴더에 ACE32.DLL, ADSLOC32.DLL, AXCWS32.DLL파일을 설치하기 바랍니다.

SOURCE 프로그램을 컴파일하기 위해 MAKE.BC파일 또는 NBUILD.BAT파일에 라이브러리 RDDADS.LIB와 ACE32.LIB파일을 추가바랍니다.

응용프로그램에서 RDD ADS는 아래와 같이 사용합니다.

FUNCTION TEST()
    Local cText := "ADS 사용시 START()함수의 내용을 코딩하시오.“
    START()
    MsgInfo( cText )   
RETURN NIL
 
FUNCTION START()
    REQUEST _ADS
    rddRegister( "ADS", 1 )
    rddsetdefault( "ADS" )
    SET SERVER LOCAL
    SET FILETYPE TO CDX // DBFCDX를 사용
RETURN NIL
 
아래와 같은 명령어를 사용하는 모든 프로그램에는
  #include "ADS.CH"
를 추가합니다.
  Set PATH
  Set Deleted
  Set Default to
  Set Epoch
  Set Date Format
 
만약 TSBrowse를 사용한다면 REQUEST _ADS를 아래 문장으로 대치바랍니다.
  REQUEST _ADS, ADSKeyno, ADSKeycount

참고

어플리케이션을 16비트에서 32비트로 변환하고 ADS를 사용하는 경우 16비트 어플리케이션에서 사용하던 두 함수를 아래와 같이 변경하여 사용바랍니다.

 

NSAMPLES\ADS\TESTADS.PRG 참조

#include "npp.ch"
#include "ads.ch"
 
REQUEST _ADS
 
FUNCTION Main()
   Local cFile := "TEST.DBF"
   Local aStru := {{ "ALNO", "N", 02, 00 }, { "ALBU", "C", 16, 00 },;
                   { "ALCL", "C", 05, 00 }, { "ALUP", "D", 08, 00 },;
                   { "ALME", "M", 10, 00 } }
 
   App_Init()  // ADS 설정
 
   iF !FILE( cFile ) ; dbCreate( cFile, aStru ) ;  End
   USE TEST NEW SHARED ALIAS "TEST" VIA "ADS"
 
   iF FILE( "TEST.CDX" )
      SET INDEX TO TEST
   Else
      INDEX ON TEST->ALNO TAG ALNO TO TEST FOR !Deleted()
      INDEX ON TEST->ALBU TAG ALBU TO TEST FOR !Deleted()
   End
 
 
   iF TEST->( LastRec() ) < 1 ; TEST->( dbAppend() ) ; End
   TEST->( dbGoTop() )
   TEST->ALNO := 1
   TEST->ALBU := "홍보부"
   TEST->ALCL := "홍보"
   TEST->ALUP := CTOD( "2003.08.09" )
   TEST->ALME := "ADS RDD는 매우 안정적입니다."
   TEST->( dbCommit() )
   // 자료를 DB에 저장시 ADS에서는 LOCK를 걸지 않습니다.
 
   TEST->( ordSetFocus("ALNO") )
   TEST->( OrdScope ( 0, 1 ) )  // 1 시작번호
   TEST->( OrdScope ( 1, 5 ) )  // 5 끝번호
   // ALNO 인덱스로 포커스를 맞추고 1번부터 5번까지 내용을 보여줍니다.
 
   TEST->( dbGoTop() )
   Dr_Browse()
 
   TEST->( OrdScope ( 0, NIL ) )   // SCOPE 해지
   TEST->( OrdScope ( 1, NIL ) )   // SCOPE 해지
 
RETURN NIL
 
 
FUNCTION App_Init()    // 초기함수(INT FUNCT ...)로 지정하지 마시오.
 
   rddRegister( "ADS" )
   rddsetdefault( "ADS" )
   SET SERVER LOCAL        // REMOTE
   SET FILETYPE TO CDX     // DBFCDX
 
   SETHANDLECOUNT(110)
   SET _3DLOOK ON
   SET DELETE ON
   SET DATE FORMAT "YYYY.MM.DD"
 
RETURN NIL
 

Link categories 1

Link categories 2