나눔터  
  HOME > 나눔터 > 묻고답하기 > 액세스
액세스
액세스에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 김주흥 (2you2me)

추천:  0
파일:     조회:  4442
제목:   [RE]테이블이나 폼에 자동 입력되는 방법은 없나여..?
     
  제가 학적부 관리 데이타 베이스를 만들라구 하는데요..

그러니까 학과의 정해진 영문코드를 입력하면 학과의 한글이름이랑 영문이름..

그리구 학사과정인지 석사과정인지 까지 한꺼번에 자르륵 입력하고 싶어서...

그런 방법은 없나요...

==============[하이루님 글에 대한 답변입니다]==============
afterupdate이벤트를 이용합니다

테이블이 다음과 같다면

 테이블이름: 학과명

 영문코드  영문이름  한글이름  과정구분
 xxxxxxx   xxxxxxx   xxxxxxx   석사
 xxxxxxx   xxxxxxx   xxxxxxx   학사

영문코드에 인덱스를 설정한다(인텍스이름: code)
영문코드는 중복되는 데이타가 없어야 한다


폼의 영문코드필드의 afterupdate이벤트애 아래와 같은 코드를 기술한다

"엑세스 2000이상일 경우 97인경우에는 dao. 을 지우고 사용함
dim db as dao.database
dim rst as dao.recordset

set db = currentdb()
set rst = db.openrecordset("학과명")

rst.index = "code"      "-------->인텍스이름
rst.seek "=", 영문코드  "-------->영문코드필드이름

if rst.nomach then
   msgbox "찾는 학과가 없슴니다."
   exit sub
else
   me!영문이름 = rst!영문이름  "me!영문이름----->폼의 필드이름
   me!한글이름 = rst!한글이름
   me!과정 = rst!과정구분
end if

rst.close
db.close


 
[불량 게시물 신고]  
        
  

작성일 : 2001-08-05(08:53)
최종수정일 : 2001-08-05(08:53)
 


 ◎ 관련글

  제 목   작성자   날짜
테이블이나 폼에 자동 입력되는 방법은 없나여..? 하이루 2001-08-05
[RE]테이블이나 폼에 자동 입력되는 방법은 없나여..? 김주흥 2001-08-05