책 내용 질문하기
ado 실행 오류(2권 데이터베이스 실무 p.150) 기본문제 4번
도서
2019 시나공 컴퓨터활용능력 1급 실기
페이지
150
조회수
220
작성일
2019-06-29
작성자
탈퇴*원
첨부파일
Private Sub cmd제품정보찾기_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
DoCmd.OpenForm "제품정보"
rs.ActiveConnection = CurrentProject.Connection
rs.Open "select * from 제품별판매현황 where 판매번호 =" & txt판매번호
Forms!제품정보.txt판매번호 = rs!판매번호
Forms!제품정보.txt제품명 = rs!제품명
Forms!제품정보.txt판매량 = rs!판매량
Forms!제품정보.txt불량품 = rs!불량품
Forms!제품정보.txt단가 = rs!단가
Forms!제품정보.txt제품평 = rs!제품평
Forms!제품정보.txt거래처명 = rs!거래처명
Forms!제품정보.txt판매등급 = rs!판매등급
rs.Close
입력하고 실행하면 오류가 계속 발생합니다.
답안파일을 열어서 실행해도 같은 오류가 나는데 뭐가 문제일까요?
답변
2019-06-30 14:14:27
안녕하세요.
txt거래처등급을 설정해 주셔야 합니다.
수정 전 : Forms!제품정보.txt판매등급 = rs!판매등급
수정 후 : Forms!제품정보.txt거래처등급 = rs!거래처등급
좋은 하루 보내세요.
-
관리자2019-06-30 14:14:27
안녕하세요.
txt거래처등급을 설정해 주셔야 합니다.
수정 전 : Forms!제품정보.txt판매등급 = rs!판매등급
수정 후 : Forms!제품정보.txt거래처등급 = rs!거래처등급
좋은 하루 보내세요.