전체글
-
-
2023 코리아드론쇼Daily 2023. 2. 24. 17:19
어느 날 갑자기 카톡으로 2023 코리아드론쇼 입장 QR코드가 날아왔다. 이게 뭐지?? 하고 와이프에게 물어보니 예전에 신청을 했단다. 그러고 보니 기억이 나는 거 같기도. 하여 아들 스케줄이 한가한 목요일에 출발하였다. 수영을 다녀온 아들을 바로 데리고 점심을 먹어야 하니 센텀시티로 가서 서가미즈에서 점심을 맛있게 먹는 걸로 하였다. 울 아들이 좋아하는 목살스테이크. 그런데 정작 본인은 볶음밥을 주문했다는 ㅎㅎㅎ 2019년 겨울을 불태웠던 해운대 센텀호텔과 벡스코를 보며 잠시 옛 생각에 잠기고. 1관으로 입장하였다. 벡스코에서 하는 행사라 각 업체의 드론 홍보로 생각하고 갔는데 육해공군에서도 참여를 하였더라. 군사작전용으로 쓰는 드론도 많고 사람이 들어가기 힘든 현장에 투입되는 드론도 있고 물론 재난현..
-
안젤리크Daily 2023. 2. 21. 21:06
신간도서 중 하나 웬만한 신간은 다 빌려봤는데 이 책이 유난히 구하기 힘들었음 부산시내 모든 도서관을 매일 검색하는데 부산도서관에 한 권 남았던데 덕포까지 어떻게 가냐고.. 집 근처에 서점이라곤 부대까지 가야 하는데 몇 번 가다 보면 버스비 합치면 책 한 권 값은 훌쩍 넘긴 단말이지 그런데 오늘 마침 뙇!! 집에서 그리 멀지 않은 작은 도서관에 이 책이 막 들어왔나 보다. 진짜인가 싶어 몇 번을 새로고침해도 책이 그대로 있길래 그대로 시동 걸었지. 동사무소 2층에 있는 곳이라 주차가 원활하지 못하여 도로가에 주차를 하고 냉큼 달려갔는데 웜마. 도서 검색 pc가 안 보이네. 하여 매의 눈으로 신간 파트를 훑어본 결과 내 눈에 확 들어온 그 책. 망설임 없이 냉큼 집어 나왔다. 진도가 잘 나가서 벌써 절반 ..
-
-
발렌타인데이Daily 2023. 2. 15. 10:35
올해도 어김없이 찾아온 발렌타인데이. 부인이 퇴근길에 나와 아들의 초콜릿을 친히 사 오셨네. 발렌타인데이는 로마 시대의 기원을 갖고 있습니다. 로마 제국 시대에는 2월 15일에 로마 신화에 나오는 여신, 유노(Faunus)와 아폴로(Apollo)에게 헌화를 바치는 로마인의 행사, 루퍼칼리아(Lupercalia)가 있었습니다. 그러나 이 행사는 기독교가 유행하기 시작하면서 금지되었습니다. 그 후, 3세기에는 기독교인들 사이에서 발렌타인이라는 이름의 성직자가 유명해졌습니다. 그는 결혼을 비밀리에 진행하는 것을 돕는 등 이웃을 도와주는 성직자였습니다. 그러나 그가 로마 제국의 황제인 클라우디우스(Claudius) 2세에 의해 죽임을 당하게 되었습니다. 발렌타인이 죽인 날짜는 2월 14일로 기록되어 있으며, 이..
-
아들 생일파티Daily 2023. 2. 12. 20:45
하나 있는 아들의 12번째 생일이 다가왔다. 아들은 생일날 친구들에게 이런저런 선물을 받기로 했다고 자랑을 하기 시작한다. 요즘 어린이들이 주고 받는 선물은 무려 구글기프트카드. 두둥. 나도 해본 적 없는 현질을 초딩이 하다니. 부러울 따름이지만. 생일 선물을 받고만 있을 순 없으니 와이프 왈 아들아, 그럼 친구들을 집에 초대해야하지 않겠니 로 시작된 아들 생일 프로젝트의 시작. 생일 전날이자 4학년의 마지막날 학교를 가서 친구들에게 물어보기로 한단다. 그렇게 모이게 된 10대 청소년 6명. 와이프가 퇴근날 다이소에서 사온 HAPPY BIRTHDAY 풍선을 아침부터 불고 붙이고. 우리 아들 폐활량 늘었겠네 ㅋㅋㅋ 한시 반부터 하나둘씩 우리 집에 모이기 시작한 10대 청소년들. 어째서 다 남자냐. 어떻게 ..
-
당비휴 근무일지 달력VB(A) 2023. 2. 10. 14:45
3월에 휴가 미리 잡을려고 만든 달력 부산 당비휴 근무기준. 기존 코드에서 이리 붙이고 저리 붙이고 ㅋㅋㅋ Option Explicit Sub Calendar() '연도별 달력 만들기 Dim i As Integer Dim Days As Integer, StartDay As Integer Dim Row As Integer, cnt As Integer Dim InputYear As Integer Dim theDay As Date Dim formSheet As Worksheet Dim v(2) As String Dim SelectedDate As Date, StartDate As Date '매월 1일, 근무설정 기준일 Dim intCycle As Integer Dim cntW As Integer Set for..
-
-
-
-
-