이번 포스팅 부터는 상품 관리를 만들 예정입니다. 상품 관리는 사실 고민이 좀 많이 되는데, 저희가 사용하는 방식을 토대로 만들예정이라 상품 관리가 2가지가 될 예정입니다. 첫번째는 일반적인 상품 관리이고, 두번째는 거래처에서 보내오는 상품명(거래처의 상품명이라고 생각하시면 되겠습니다)을 처음의 상품명과 연결해서 사용하는 방식으로 진행합니다. 사실 이부분은 발주 시스템을 구축하면 하나만 가지고 되는 부분이기는 한데 사정상 여의치 않거나 뭐 여러가지 이유로 이런 방식을 유지해야하는 경우가 (저희 같은 경우도 그렇습니다) 있어서 우선은 이 방향으로 진행해 보고자 합니다. 차후에는 발주 입력시에 없는 상품일 경우 상품 등록 창을 띄워 상품등록을 하는 방향으로 진행할까 합니다. 우선 기초가 되는 테이블을 생성해..
매출처 관리 유저폼(FormClient) 매출처 관리 유저폼 전체 코드 더보기 Option Explicit '폼 열릴때 실행 Private Sub UserForm_Initialize() Call SetColumnHeaders Call Connect_DB Call Load_Client_DB Cn.Close Me.txtSearch.SetFocus End Sub '리스트뷰 헤더 설정 Private Sub SetColumnHeaders() With Me.ListClient.ColumnHeaders .Add Text:="번호", Width:=0, Alignment:=lvwColumnLeft .Add Text:="매출처명", Width:=150, Alignment:=lvwColumnCenter .Add Text:=..
매출처 관리에서 등록/수정을 눌렀을때 팝업되는 유저폼 입니다. 하나의 유저폼을 사용해서 Caption을 다르게 설정해주고 Caption에 따라 처리를 나눠줬습니다. 유저폼의 레이아웃은 아래와 같습니다. 이해를 돕기 위해 텍스트 박스에는 이름을 써놓았습니다. 등록 버튼은 btnSave, 닫기 버튼은 btnClose로 설정했습니다. 유저폼 이름은 FormEditClient로 설정했습니다. 코드는 아래를 펼쳐서 확인해 주세요. 더보기 Option Explicit '저장 Private Sub btnSave_Click() If Me.Caption = "매출처 등록" Then Call Add_Client Else Call Edit_Client End If Unload Me End Sub '닫기 Private Sub..
이번 포스팅에서는 매출처 관리 유저폼을 만들어 보겠습니다. 기본 레이아웃은 아래의 그림과 같습니다. 검색은 텍스트 박스, 우측 상단에 텍스트 박스는 리스트뷰 선택시 선택한 idx를 넣어둘 텍스트 박스입니다. 매입처 관리 유저폼과 마찬가지로 리스트뷰를 사용했습니다. 아래의 등록, 수정, 삭제, 닫기의 4개 버튼은 레이블 컨트롤을 사용합니다. 다음은 유저폼 코드입니다. 먼저 유저폼이 실행되었을때 처리되는 코드 입니다. Option Explicit '폼 열릴때 실행 Private Sub UserForm_Initialize() Call SetColumnHeaders Call Connect_DB Call Load_Client_DB Cn.Close Me.txtSearch.SetFocus End Sub 리스트뷰의 헤..
이번 포스팅부터 매출처 관리를 시작합니다. 우선은 DB에 테이블을 생성합니다. 테이블명은 client로 각 항목은 idx(일련번호), clientName(매출처명), licenseNumber(사업자등록번호), address(주소), businessConditions(업종), businessCategory(업태) 총 6개의 항목으로 구성했습니다. 아마 차후에 추가될 항목도 있을 예정입니다. idx는 PRIMARY KEY를 설정해 주고, 기본값으로 AUTO_INCREMENT를 설정해 자동증가하도록 해줍니다. idx는 INT형으로, 나머지는 VARCHAR형으로 설정해주고 길이는 적당히 설정해 주었습니다. clientName를 제외하고 나머지는 NULL허용, 기본값 NULL입니다. 다음 포스팅부터는 매출처 관리..
