단순 언어 데이터베이스 쿼리

외부 데이터베이스의 이름은 외부 데이터베이스 1 입니다.

버전 2

。 로컬 변수 인덱스, 정수 유형

외부 데이터베이스 1. MDB 데이터베이스를 엽니다 (실행 디렉토리 가져오기 () +" 123. MDB ",,,,)

인덱스 = 외부 데이터베이스 1. 조회 (123 에서 사용자 선택)

。 (색인 ≠ 0) 인 경우

외부 데이터베이스 1. 첫 번째 레코드 (색인)

。 순환 헤드 (외부 데이터베이스 1 뒤) 를 결정합니다. 트레일 레코드 (색인) = false)

True 인 경우 (텍스트 (외부 데이터베이스 1). 읽기 (인덱스,1) = "123456")

정보 상자 ("사용자 존재", 0,)

Return ()

정말 끝난다면.

외부 데이터베이스 1. 다음 레코드 (색인) 로 이동

。 주기의 끝을 결정합니다 ()

그렇지 않으면.

정보 상자 ("쿼리 실패", 0,)

Return ()

끝나면

정보 상자 ("사용자가 없습니다", 0,)

점수를 줄 수 있으면 점수를 주세요!