|
[폭주기관차, 2012/01/13 10:51, [Interest]/오늘을 살아가는 나...]
천재는 1%의 영감과 99%의 노력으로 이루어진다.
-토마스 알바 에디슨 많은 사람들은 이 말을 두고 사람은 노력하면 된다라고 아무리 재능이 있어도 노력하는 사람은 못 따라 잡는다는 의미로 쓴다. 물론 아무리 재능이 있어도 노력이 없으면 노력하는 사람보다 뒤쳐질 수밖에는 없다. 하지만...
전에 나는 신문 취재에서 그 기자에게
'1퍼센트의 영감이 없으면 99퍼센트의 노력은 소용이 없다'고 말한 거였소. 그런데 신문에는 1퍼센트의 영감에 대한 중요성이 아니라 99퍼센트의 노력에 중점을 두고, 나를 노력하는 사람으로 미화하여 진실을 잘못 전한 것이오. 정말이지 못말리는 착각이지요. 에디슨의 자서전에 보면 더 정확히 확인할 수 있을 것이다. 에디슨은 99%의 노력을 강조한 것이 아니고 1%의 영감을 강조하였다. 즉, 노력도 중요하지만, 단 1%의 영감이 없이는 천재가 될 수 없다는 것이다. Genius is one percent inspiration and ninety-nine percent perspiration Trackback Address :: http://kongmks.cafe24.com/trackback/313
[폭주기관차, 2012/01/02 15:29, [Programming]/Visual Basic]
VB에서 Len("테스트") 로 길이를 구하면 3이 리턴된다.
어떤 떄는 이런게 필요할 때도 있지만 간혹 바이트 단위로 알고 싶을 떄가 있다. 그럴땐 아래와 같은 함수를 만들어서 사용하면 된다.
Function nLeft ( ByVal strTmp As String ) Dim bytesize As Integer bytesize = 0 ' 문자열 길이 만큼 반복하면서 문자길이만큼 잘라오기 For i = 1 to Len(strTmp) ' 한글과 영문을 구분하기 If Asc( Mid(strTmp , i , 1 ) ) > 0 Then '한글값은 0보다 작다 bytesize = bytesize + 1 '한글이 아닌경우 즉 영문은 1Byte Else bytesize = bytesize + 2 '한글인 경우 2Byte End If Next nLeft = bytesize End Function Trackback Address :: http://kongmks.cafe24.com/trackback/312
[폭주기관차, 2011/12/22 09:34, [Interest]/오늘을 살아가는 나...]
관혼상제(冠婚喪祭)란 무엇일까??
아래와 같은 4가지를 뜻한다고 한다. 관례(冠禮), 혼례(婚禮), 상례(喪禮), 제례(祭禮)
자세한 뜻을 살펴보면 아래와 같다. 1.관례 오늘날 성인식과 같은 것으로 성년기에 이르는 동안에 남자는 머리를 추켜올려 초립이라는 관을 썼고, 여자는 머리를 틀어 올려서 비녀를 꽂아 계례라 하였음. 2. 혼례 오늘 날의 결혼식을 말하며 혼례라도 말함. 이는 남녀가 부부가 되는데 따르는 모든 의식절차를 일컫는 말로서 예로부터 인간의 대사라 하였고 엄중한 예식을 행하여 왔음. 3. 상례 사람이 죽었을 때 치르는 의례를 말하는 것임. 이 상례 의식은 사람이 죽은 때로부터 묘지에 장사를 지낼 때까지의 절차로 사례 중 가장 복잡하고 엄숙한 의례식의 하나. 4. 제례 제례 또는 제사는 돌아가신 조상을 위로하는 의식과 절차를 말함. 한국 민족은 돌아가신 조상의 위패를 각 가정의 사당이나 사찰에 모셔두고 돌아가신 날과 명절에는 그 계절의 가장 좋은 음식을 제상에 올리고 일가친척들이 한자리에 모여 의식을 행하여 왔음. 출처 : 네이버 지식iN Trackback Address :: http://kongmks.cafe24.com/trackback/311
[폭주기관차, 2011/12/18 14:51, [Programming]/PHP]
설명하기가 애매한데 예를 들면 갤러리 게시판 같은 경우
가로로 5칸까지 출력하고 그 다음줄 5칸 출력, 그리고 다음 줄에 출력을 할 경우가 있다. (말이 어렵다면 일단 아래 예제 이미지를 보면 무슨 말인지 이해할 수 있으려나;;;) 그럼 일단 코드와 결과물만 먼저 보자. 그리고 필요하면 그때 긁어다 쓰면 된다.ㅋㅋㅋ
<?
$max_col = 5; // 가로 최대 갯수(한 줄 최대 갯수) $data = array( "a", "b", "c", "d", "e", "f" ); ?> <table border="1" cellSpacing="1" cellPadding="2"> <tr> <? $i = 0; foreach( $data as $key => $value ) { if( $i % $max_col == 0 ) { echo "</tr> <tr>"; } ?> <td><?=$key?> => <?=$value?></td> <? $i++; } for( $i = $i%$max_col; $i > 0 && $i < $max_col; $i++ ) { ?> <td> </td> <? } echo "</tr>"; ?> </table> ![]() 가로로 출력된 내용 Trackback Address :: http://kongmks.cafe24.com/trackback/310
[폭주기관차, 2011/12/14 14:09, [Programming]/Excel VBA]
우선 간단하게 Sheet 이름을 기준으로 변수에 넣는 법은 아래와 같다.
Dim shProcess As Worksheet
Set shProcess = Worksheets("Sheet1") MsgBox shProcess.Cells(1, 1) 이렇게 하면 Sheet1의 A1 셀의 값이 출력이 된다. 좀 더 응용을 해서 현재 열린 통합문서에서 이 이름의 시트가 있는지 없는지 여부를 확인하여 변수에 저장하고 싶다면 아래와 같이 하면 된다.
Dim shData As Worksheet ' Or As Variant Dim stFindSheetName As Stringbr Dim bResult As Boolean Dim shProcess As Worksheet Set shProcess = Worksheets("Sheet1") stFindSheetName = shProcess.Cells(1, 1) ' Sheet1의 A1에 찾고자하는 시트의 이름이 있다고 가정 bResult = False For Each shData In ActiveWorkbook.Worksheets If shData.Name = stFindSheetName Then bResult = True MsgBox shData.Cells(1, 1) End If Next If bResult = False Then MsgBox stFindSheetName & "시트 이름을 찾지 못하였습니다." End If Trackback Address :: http://kongmks.cafe24.com/trackback/309
[폭주기관차, 2011/12/14 13:27, [Programming]/Excel VBA]
배열 변수를 동적으로 할당 하였을 때 배열의 크기를 알아내야할 일이 있다.
아래와 같은 코드를 이용하자
Dim tmp() As String Dim Msg As String Dim i As Integer Msg = "test, test2, test3" tmp = Split( Msg, ", " ) For i = 0 To UBound( tmp ) MsgBox tmp(i) Next ' tmp의 갯수는 UBound( tmp ) + 1 개가 된다. Trackback Address :: http://kongmks.cafe24.com/trackback/308
[폭주기관차, 2010/03/28 01:15, [Operating System]/Linux / Unix]
압축하는 방법 보러 가기 tar tvf test.tar.gz
이렇게 치면 압축된 파일의 경로와 이름, 용량이 출력됩니다. 옵션 설명을 보자면 아래와 같습니다. t : 묶여진 tar 파일의 내용물(List)을 출력합니다
v : 파일들을 묶거나 해체할 때 파일들의 이름과 크기를 표시합니다. f : 사용할 tar 파일을 지정합니다.
drwxr-xr-x root/root 0 2010-03-28 01:01:01 test/
-rw-r--r-- root/root 777 2010-03-28 02:02:02 test/test.php -rw-r--r-- root/root 777 2010-03-28 02:02:02 test/test2.php drwxr-xr-x root/root 0 2010-03-28 01:01:01 test2/ -rw-r--r-- root/root 777 2010-03-28 02:02:02 test2/test2.php 자 이제 경로가 나왔으니 특정 파일 푸는 법은 아래와 같이 해주시면 됩니다. tar xvfzp test.tar.gz test2/test2.php
이렇게 하면 test2.php 파일만 압축이 풀리게 됩니다. tar xvfzp test.tar.gz ` tar tf test.tar.gz | grep "/test2/" `
이렇게 하면 경로에 '/test2/' 가 들어있는 경로 및 파일은 다 압축이 해제되어요~ tar xvfzp test.tar.gz -C ./newfolder/
특정파일/디렉토리는 이상하게 -C 옵션 줘도 새로운 디렉토리로 압축이 풀리지는 않네요...ㅋ Trackback Address :: http://kongmks.cafe24.com/trackback/307
|
||






