문제 4 처리 기능 구현
1. '열차표예약' 폼에서 '예약' 버튼(cmd예약)을 클릭하면 다음과 같은 기능을 수행하도록 구현하시오.
? '열차표예약' 폼의 각 컨트롤에 입력된 데이터를 <하행열차판매> 테이블에 추가하시오.
? ADO 개체를 이용하시오.
작성한 코드
Private Sub cmd예약_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.ActiveConnection = CurrentProject.Connection
rs.CursorType = adOpenDynamic
rs.LockType = adLockOptimistic
rs.Open "select * from 하행열차판매"
rs.AddNew
rs!고객ID = cmb고객ID
rs!구간 = cmb구간
rs!좌석수 = txt좌석수
rs!출발일자 = txt출발일자
rs!열차요금 = txt열차요금
rs!적립포인트 = txt적립포인트
rs.Update
rs.Close
End Sub
오류 원인이 무엇인가요?
실기특성상 질문이나 그림만으로는 정확한 이유를 알기 어렵습니다.
작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.
좋은 하루 되세요.
"-
*2012-06-27 10:45:15
실기특성상 질문이나 그림만으로는 정확한 이유를 알기 어렵습니다.
작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.
좋은 하루 되세요.
"