::NPTEAM:: Network Programer Team

[MS-SQL] BAK 파일을 새로운 DATABASE로 복원하기(attach_db_from_backup)

(TTF) — Sat, 11 Oct 2008 00:24:15 +0900

MDF 파일만 있을 경우에는 sp_attach_single_file_db 프로시저를 이용해서 아주 간편하고 쉽게 DB를 복원할 수 있다.

그러나 Backup(BAK) 파일의 경우에는 복원하는데 약간 불편함을 감수해야 한다.

아래의 프로시저를 이용하면 이러한 불편함을 약간이나마 해소할 수 있다.

_Attach_DB_From_Backup.sql

IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = object_id(N'[dbo].[_Attach_DB_From_Backup]') AND OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP procedure [dbo].[_Attach_DB_From_Backup]
GO

SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO

CREATE PROCEDURE [dbo]._Attach_DB_From_Backup
@strRestoreDBName varchar(128),
@strBackupFilePath varchar(255)
AS

-- master DB 체크
IF DB_NAME() <> 'master'
BEGIN
RAISERROR( 'current database name was not "master". You should be change "master" database', 16, 1 )
RETURN
END

-- 생성할 DB가 존재하는지 체크
IF EXISTS (SELECT * FROM master..sysdatabases WHERE name = @strRestoreDBName )
BEGIN
RAISERROR( 'It was already existed database name. Try to execute procedure another DB name', 16, 1 )
RETURN
END

-- 실행 시간 측정
declare @StartTime datetime
SET @StartTime = GetDate()

-- 동적 실행 쿼리로 쓰일 변수
declare @strQuery nvarchar(2048)

-- DB 생성
SET @strQuery = 'CREATE DATABASE ' + @strRestoreDBName
EXEC sp_executesql @strQuery

-- 임시 테이블 생성 - (Backup 파일에서 정보 추출)
CREATE TABLE #FileListInfo
(
LogicalName nvarchar(128) NULL,
PhysicalName nvarchar(260) NULL,
Type char(1) NULL,
FileGroupName nvarchar(128) NULL,
[Size] numeric(20,0) NULL,
[MaxSize] numeric(20,0) NULL
)

-- 임시 테이블 생성 - (생성된 DB에서 정보(MDF, LDF 파일 경로) 추출)
CREATE TABLE #CreatedDBInfo
(
name nvarchar(128) NULL,
filename nvarchar(260) NULL
)

-- Backup 파일로 부터 정보 추출 -> #FileListInfo
SET @strQuery = N'RESTORE FILELISTONLY FROM DISK = ''' + @strBackupFilePath + ''''
INSERT INTO #FileListInfo EXEC sp_executesql @strQuery

-- 생성된 DB에서 정보 추출 -> #CreatedDBInfo
SET @strQuery = 'select name, filename from ' + @strRestoreDBName + '.[dbo].sysfiles'
INSERT INTO #CreatedDBInfo EXEC sp_executesql @strQuery

-- Backup 파일로 부터 LogicalName(Data, Log)를 가져온다.
declare @LogicalName_Data nvarchar(128)
declare @LogicalName_Log nvarchar(128)

SELECT @LogicalName_Data = LogicalName FROM #FileListInfo where Type = 'D'
IF( @@error <> 0 OR @@rowcount = 0 OR @LogicalName_Data IS NULL )
begin
RAISERROR( 'LogicalName for Data is not exist', 16, 1 )
DROP TABLE #FileListInfo
DROP TABLE #CreatedDBInfo

SET @strQuery = 'DROP DATABASE ' + @strRestoreDBName
EXEC sp_executesql @strQuery
RETURN
end
SELECT @LogicalName_Log = LogicalName FROM #FileListInfo where Type = 'L'
IF( @@error <> 0 OR @@rowcount = 0 OR @LogicalName_Log IS NULL )
begin
RAISERROR( 'LogicalName for Log is not exist', 16, 1 )
DROP TABLE #FileListInfo
DROP TABLE #CreatedDBInfo

SET @strQuery = 'DROP DATABASE ' + @strRestoreDBName
EXEC sp_executesql @strQuery
RETURN
end

-- 생성된 DB에서 MDF, LDF 파일 경로를 가져온다.
declare @strFileName_Data nvarchar(260)
declare @strFileName_Log nvarchar(260)

SELECT @strFileName_Data = filename FROM #CreatedDBInfo where filename like '%MDF%'
IF( @@error <> 0 OR @@rowcount = 0 OR @strFileName_Data IS NULL )
begin
RAISERROR( '#CreatedDBInfo has not MDF file path', 16, 1 )
DROP TABLE #FileListInfo
DROP TABLE #CreatedDBInfo

SET @strQuery = 'DROP DATABASE ' + @strRestoreDBName
EXEC sp_executesql @strQuery
RETURN
end
SELECT @strFileName_Log = filename FROM #CreatedDBInfo where filename like '%LDF%'
IF( @@error <> 0 OR @@rowcount = 0 OR @strFileName_Log IS NULL )
begin
RAISERROR( '#CreatedDBInfo has not LDF file path', 16, 1 )
DROP TABLE #FileListInfo
DROP TABLE #CreatedDBInfo

SET @strQuery = 'DROP DATABASE ' + @strRestoreDBName
EXEC sp_executesql @strQuery
RETURN
end

-- Backup 파일로 부터 DB를 복원 한다.
SET @strQuery = 'RESTORE DATABASE ' + RTRIM(@strRestoreDBName) + ' FROM DISK = ''' + RTRIM(@strBackupFilePath)
+ ''' WiTH REPLACE, MOVE ''' + RTRIM(@LogicalName_Data) + ''' TO ''' + RTRIM(@strFileName_Data) + ''', '
+ ' MOVE ''' + RTRIM(@LogicalName_Log) + ''' TO ''' + RTRIM(@strFileName_Log) + ''''

EXEC sp_executesql @strQuery

-- 임시 테이블 Drop
DROP TABLE #FileListInfo
DROP TABLE #CreatedDBInfo

SELECT 'Elapsed time : ' + convert( varchar(128), GetDate() - @StartTime, 114 )

SET NOCOUNT OFF

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

참조 사이트
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=1247&lngWId=5
http://www.sqlteam.com/forums/topic.asp?TOPIC_ID=36961

[DB] ADO Connection String

(TTF) — Tue, 30 Sep 2008 07:24:58 +0900

Text
http://www.codemaker.co.uk/it/tips/ado_conn.htm#OLEDBProviderForTextFiles

Excel
http://www.codemaker.co.uk/it/tips/ado_conn.htm#ODBCDriverForExcel

[폰트] 프로그래머 폰트 모음

(TTF) — Mon, 29 Sep 2008 11:55:56 +0900

프로그래머 폰트 모음
VeraMono.ttf + 맑은 고딕

http://gyuha.tistory.com/207

[VS2005] 현재 편집 중인 문서 솔루션 익스플로러에서 찾기

(TTF) — Thu, 18 Sep 2008 20:04:09 +0900

출처 : http://serious-code.net/moin.cgi/VisualStudioMacro

SolutionExplorer.vb

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports System.Diagnostics

Public Module SolutionExplorer

Sub FindInSolution()
Dim p = DTE.Properties("Environment", "ProjectsAndSolution").Item("TrackFileSelectionInExplorer")
p.value = 1
p.value = 0
End Sub

Sub CollapseNode(ByRef item As UIHierarchyItem)

Dim subitem As UIHierarchyItem
For Each subitem In item.UIHierarchyItems
If (subitem.UIHierarchyItems.Expanded = True) Then
CollapseNode(subitem)
subitem.UIHierarchyItems.Expanded = False
End If
Next

End Sub

Sub CollapseAll()

' Get the the Solution Explorer tree
Dim UIHSolutionExplorer As UIHierarchy
UIHSolutionExplorer = DTE.Windows.Item(EnvDTE.Constants.vsext_wk_SProjectWindow).Object()

' Check if there is any open solution
If (UIHSolutionExplorer.UIHierarchyItems.Count = 0) Then
' MsgBox("Nothing to collapse. You must have an open solution.")
Return
End If

' Get the top node (the name of the solution)
Dim UIHSolutionRootNode As UIHierarchyItem
UIHSolutionRootNode = UIHSolutionExplorer.UIHierarchyItems.Item(1)

CollapseNode(UIHSolutionRootNode)

' Select the solution node, or else when you click on the solution window
' scrollbar, it will synchronize the open document with the tree and pop
' out the corresponding node which is probably not what you want.
UIHSolutionRootNode.Select(vsUISelectionType.vsUISelectionTypeSelect)

End Sub
End Module

[WMI] DEP에 프로그램 추가하기

(TTF) — Tue, 09 Sep 2008 02:29:06 +0900

출처 : http://www.npteam.net/674

DEP(Data Execution Prevention : 데이터 실행 방지) 탭에
일일히 프로그램 경로를 추가해야 하는 경우가 있다.

ATL의 Thunk로 메시지 Pump를 구현했거나,
Stack에 Asm으로 코드를 삽입하고 JMP로 EIP를 이동하여 Code Section이 아닌
Data Section에서 Code 실행이 이루어질 경우 DEP에 프로그램을 추가하면 해결된다.

그러나 DEP에 프로그램을 추가하는 MS에서 제공하는 옵션이 없기 때문에,
위와 같은 프로그램을 등록하기 위해선 손이 많이 간다.

아래의 WMI 스크립트를 이용해서 Drag And Drop으로 DEP를 추가해 보자!

AddToDep.vbs

Option Explicit

' 기본 Object 가져오기
Dim Shell : Set Shell = WScript.CreateObject("WScript.Shell")
Dim FSO : Set FSO = CreateObject("Scripting.FileSystemObject")
Dim WshEnv : Set WshEnv = Shell.Environment("Process")
Dim ProgramDir : ProgramDir = WshEnv("ProgramFiles")
Dim SystemRoot : SystemRoot = WshEnv("Systemroot")

'CMD 윈도우 98에서도 적용 가능하게 COMSPEC으로 가져온다.
Dim COMSPEC : COMSPEC = Shell.ExpandEnvironmentStrings("%comspec%")

Dim Exe01 : Exe01 = SystemRoot & "\system32\sysdm.cpl"

'각 Step별 윈도우 Title 확인
Const WindowTitleName_01 = "시스템 등록 정보"

'Main 함수 실행 후 종료
MainFunction
Wscript.quit

Sub MainFunction
' Argument 검사
If Wscript.Arguments.Count = 0 Then
Shell.Popup "DEP에 추가할 Argument를 입력하지 않았습니다.", 3, "No Arguments", 48
Wscript.quit
End If

' Step 1. sysdm.cpl 시스템 등록 정보 열기
Install Exe01, ""
SendKeys "{ESC}"

Wscript.sleep 1000
Install Exe01, ""

' Step 1. "시스템 등록 정보"
WaitForActiveWindow WindowTitleName_01, 3

' SendKeys "{TAB}{TAB}"
SendKeys "{RIGHT}{RIGHT}{RIGHT}"
SendKeys "%s"
SendKeys "{TAB}{TAB}{TAB}{TAB}"
SendKeys "{RIGHT}{RIGHT}"
SendKeys "%(ud)"
Wscript.Sleep 500
SendKeys "%(n)"

'설정파일 경로 구하기
Dim strAddToDepFile : strAddToDepFile = Wscript.Arguments.Item(0)
Dim strFileFullPath
GetFileFullPath strAddToDepFile, strFileFullPath

SendKeys strFileFullPath
Wscript.Sleep 500

SendKeys "%o"
SendKeys "{ENTER}"
Wscript.Sleep 500
SendKeys "{ESC}"
End Sub

Sub GetFileFullPath(strFileName, strFileFullPath)
Dim objFile
Set objFile = FSO.GetFile( strFileName )
strFileFullPath = FSO.GetAbsolutePathName(objFile)
End Sub

Sub Install (InstallFile, Arguments)
If (FSO.FileExists(InstallFile)) Then
Shell.Run COMSPEC & " /c " & InstallFile & Arguments &" & Exit", 0
Else
Shell.Popup InstallFile & " 을(를) 찾을 수 없습니다.", 3, "File dose not exist", 48
Wscript.Quit
End if
End Sub

Sub WaitForActiveWindow(WindowName, Second)
if Second < 0 Then
Shell.Popup "음수 시간을 설정할 수 없습니다.", 3, "Error!", 48
Wscript.Quit
End if

Dim TimeOutCount : TimeOutCount = Second * 10

Wscript.Sleep 1 'Winxp SP3에서 AppActivate() 버그 임시 해결용 by TTF

While ( Shell.AppActivate( WindowName ) = False )

if TimeOutCount < 0 Then
Shell.Popup WindowName & " 윈도우를 찾을 수 없습니다. 실행을 종료합니다.", 5, "Can't Find Window", 48
Wscript.Quit
End if

Wscript.Sleep 100
TimeOutCount = TimeOutCount - 1
WEnd

'Winxp SP3에서 AppActivate() 버그 임시 해결용 by TTF
Wscript.Sleep 1
End Sub

'Shell.SendKeys 위를 Sleep(200)로 감싼다. XP SP3 버그 임시 해결 by TTF
Sub SendKeys( Keys )
Wscript.Sleep 200
Shell.SendKeys Keys
End Sub

정규식을 써보자!

(TTF) — Tue, 05 Aug 2008 02:07:20 +0900

출처 : http://www.npteam.net/658

정규식을 설명하기 위해서 한가지 예를 들기로 한다.(http://www.npteam.net)

^ht{2}p:(/{2})w{3}(.)(n.{0,10})(?:com|net|(co.kr))

문장의 처음은 h로 시작한다.
"t"글자가 연속 2번 출력된다.
"p:" 가 출력된다.
"/"가 연속 2번 출력된다.
"w"가 연속 3번 출력된다.
아무글자 1글자를 그대로 출력한다.
n으로 시작해서 최소 0에서 최대 10글자까지 아무글자나 출력한다.
맨 뒤에 종결 문자는 "com", "net", "co.kr" 3가지중 하나라도 만족하면 출력한다.

윈도우에서 모든것을 표현하는 *문자는 ".*"로 사용가능하다.

따라서 위의 정규식으로 출력되는 결과를 찾으면 다음과 같이 출력된다.

이 수식을 이용해서 VBScript에서 이용하려면 다음의 샘플 코드를 사용하시면 됩니다.

■ 정규식에 의해서 일치하는 문장이 있는지 없는지 판단하는 스크립트

Dim objRegExp
Set objRegExp = New RegExp
objRegExp.MultiLine = True
objRegExp.Pattern = "^ht{2}p:(/{2})w{3}(.)(n.{0,10})(?:com|net|(co.kr))"

SubjectString = "http://www.npteam.net"

If objRegExp.Test(SubjectString) Then
' Successful match
MsgBox "Success"
Else
' Match attempt failed
MsgBox "Failed"
End If

■ 정규식에 의해서 일치하는 문장을 리턴받고 싶을 경우

Dim ObjRegExp, MatchWords, ResultString
Set ObjRegExp = New RegExp
ObjRegExp.MultiLine = True
ObjRegExp.Pattern = "^ht{2}p:(/{2})w{3}(.)(n.{0,10})(?:com|net|(co.kr))"

SubjectString = "http://www.npteam.net"

Set MatchWords = ObjRegExp.Execute(SubjectString)
If MatchWords.Count >= 1 Then
ResultString = MatchWords(0).Value
Else
ResultString = "Nothing"
End If

MsgBox ResultString

이해를 돕기 위해 샘플 정규식을 한가지 소개하고자 한다.

■ 숫자 000 ~ 255

^([01][0-9][0-9]|2[0-4][0-9]|25[0-5])$

첫번째 자리의 숫자 (0, 1), 두번째 자리 숫자(0~9), 세번째 자리 숫자(0~9)
첫번째 자리의 숫자(2), 두번째 자리 숫자(0~4), 세번째 자리 숫자(0~9)
첫번째 자리의 숫자(2), 두번째 자리의 숫자(5), 세번째 자리의 숫자(0~5)

결국 각각 다음과 같은 범위를 제한하고 있다.

000 ~ 199, 200 ~ 249, 250 ~ 255

왜 이렇게 3단계로 분류해야 할까?
정규식은 숫자를 정수로 판단하는 것이 아니라 각각 하나의 문자로 판단하기 때문이다.
따라서 문자가 올 수 있는 범위를 세부적으로 제한함으로써 위와 같은 결과를 얻을 수 있다.

이외에도 정규식을 활용하면 수 많은 표현을 아주 간결하게 찾아낼 수 있다.

GoogleTest 기본 샘플 프로젝트

(TTF) — Fri, 11 Jul 2008 23:26:30 +0900

출처 : http://www.npteam.net/656

구글에서 Test Framework인 Google Test를 공개하였다.

UnitTest++를 압도하는 획기적인 기능이 포함되어 있는 google test.

그러나 프로젝트 세팅이 어려워서 테스트 코드를 작성하기 어려우셨던 분들을 위해서,

간단한 샘플 프로젝트를 작성하여 올립니다. (비주얼스튜디오 2005)

GUnitTest.zip

"도구 -> 옵션 -> 프로젝트 및 솔루션 -> VC++ 디렉터리 -> 다음 파일의 디렉터리 표시 -> 포함파일" 에 아래 설정을 추가해 주세요.

$(SolutionDir)gtest-1.0.1\include

UnitTest++을 사용하셨던 분들은 아래의 명령인수를 추가하시면 입이 딱 벌어질 만한 놀라운 일이 벌어집니다.

--gtest_break_on_failure

[WMI] 시스템 변수 레지스트리 추가하기(환경변수설정)

(TTF) — Thu, 10 Jul 2008 01:40:00 +0900

출처 : http://www.npteam.net/655

[WMI] 비주얼 스튜디오 2005 단축키 설정 불러오기 by TTF 로
비주얼 스튜디오 환경설정 Setting 파일을 이용해서
"단축키 설정"과 "프로젝트 디렉터리 설정"을 쉽게 불러오는데 성공하였다.

하지만 비주얼 스튜디오 설치 과정에서 괴로운 작업이 한가지 더 있다.
바로 환경변수에 폴더 경로를 추가하는 작업.

그렇게 힘들진 않지만 윈도우 단축키와 마우스 컨트롤이 단련되어 있지 않은
"특수한" 프로그래머들은 이런 것 하나를 추가하는데에도 고통을 느낀다.(으악~~)

자자 아래와 같이 한방에 등록해 주는 WMI 스크립트!
이제 비주얼 스튜디오 환경변수 설정할 때 약간(?) 도움을 받을 수 있다. ㅎㅎㅎ

"Env_Setting.vbs" 파일만 클릭해 주면,
현재 "Env_Setting.vbs"가 있는 위치의 폴더 경로를 얻어와서,
그동안 등록하기 불편했던 환경 설정 변수들을 모두 등록 해준다.

Env_Setting.vbs

Option Explicit

Dim strComputer : strComputer = "."

' 기본 Object 가져오기
Dim Shell : Set Shell = WScript.CreateObject("WScript.Shell")
Dim FSO : Set FSO = CreateObject("Scripting.FileSystemObject")
Dim WshEnv : Set WshEnv = Shell.Environment("Process")
Dim ProgramDir : ProgramDir = WshEnv("ProgramFiles")
Dim Reg : Set Reg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
Dim WMIService : Set WMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

'CMD 윈도우 98에서도 적용 가능하게 COMSPEC으로 가져온다.
Dim COMSPEC : COMSPEC = Shell.ExpandEnvironmentStrings("%comspec%")

'현재 세팅 파일 경로 구하기
Dim strSetupFile : strSetupFile = "Env_Setting.vbs"

'Main 함수 실행 후 종료
MainFunction
Wscript.quit

'Main 함수
Sub MainFunction
' 세팅 파일 절대 경로 구하기
Dim strParentFolderPath
GetParentFolderPath strSetupFile, strParentFolderPath

' 환경 변수 레지스트리 설정
Const HKEY_CURRENT_USER = &H80000001
Const HKEY_LOCAL_MACHINE = &H80000002

Dim strKeyPath, strValueName, strValue

'일단 등록하고 아래에서 바로 사용할 수 있도록 Refresh 하자
strKeyPath = "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
strValueName = "TTF_Base"
strValue = strParentFolderPath
Reg.SetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue

strKeyPath = "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
strValueName = "TTF_Base_Header"
strValue = "%TTF_Base%\include\Header"
Reg.SetExpandedStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue

strKeyPath = "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
strValueName = "TTF_Base_Lib"
strValue = "%TTF_Base%\Include\Library"
Reg.SetExpandedStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue

strKeyPath = "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
strValueName = "TTF_Base_UnitTest"
strValue = "%TTF_Base%\UnitTest++\src"
Reg.SetExpandedStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue

'환경 변수 새로고침(바로 사용 가능하도록 Refresh)
Dim colItems : Set colItems = WMIService.ExecQuery ("Select * from Win32_Environment WHERE SystemVariable = True")

Dim objItem
For Each objItem in colItems
objItem.Put_
Next
End Sub

Sub GetParentFolderPath(strFileName, strFileFullPath)
Dim objFile
Set objFile = FSO.GetFile( strFileName )
strFileFullPath = FSO.GetParentFolderName(objFile)
End Sub

.Net 프로그램 리버스 엔지니어링 하기

(TTF) — Tue, 08 Jul 2008 23:33:50 +0900

출처 : http://www.npteam.net/652

가끔 .net으로 프로그래밍된 것을 볼때가 있다.

OllyDbg로 디버깅 하려고 Dll을 열어봤는데 OTL(털썩) 이건 뭔지...

그래서 도전하기로 했다. IL Dasm 고고싱~

역시 MSDN에는 튜토리얼이 나와 있었다.

Ildasm.exe Tutorial
http://msdn.microsoft.com/en-us/library/aa309387(VS.71).aspx

MSIL Disassembler (Ildasm.exe)
http://msdn.microsoft.com/en-us/library/f7dy01k1(VS.80).aspx(영문판)
http://msdn.microsoft.com/ko-kr/library/f7dy01k1(VS.80).aspx(한글판)

방법: 어셈블리 내용 보기
http://msdn.microsoft.com/ko-kr/library/ceats605(VS.80).aspx

Reverse Engineering To Learn .NET Better
http://www.blong.com/Conferences/DCon2003/ReverseEngineering/ReverseEngineering.htm

자 그럼 ildasm.exe를 받아야 하는데... 설마 .net SDK를 다 받으란 말인가?

결국 MS에서 다운 받았다.(354MB)
http://www.microsoft.com/downloads/details.aspx?FamilyID=fe6f2099-b7b4-4f47-a244-c96d69c35dec&displaylang=en

다운의 압박이 끝나고 설치를 완료하니 ILDASM.exe를 찾을 수 있었다. ㅎㅎ
118kb짜리 다운로드 받기 위해서 무려 354MB를 다운 받을 수 밖에 없었다.(T_T MS의 압박)

ildasm.exe는 찾았는데... ilasm.exe가 없네.. 쩝..
"C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\ilasm.exe" 여기에 있었구나!!

자 이제 다 찾았으니 리버스 엔지니어링 좀 해볼까?

xxx.dll 파일을 xxx.il로 다음과 같이 출력한다.

ildasm.exe xxx.dll /output:xxx.il

그러면 해당 폴더에 리소스 파일 + xxx.il 파일이 생기는 것을 볼 수 있다.
우리는 notepad로 xxx.il 파일을 수정한 후

ilasm /dll xxx.il

이렇게 Cmd 명령을 입력하면 xxx.dll이 출력된다.

흐흣. .net 리버스 엔지니어링도 결국 어려운게 아니었다.

미수다 첫째 줄은 의미가 있는가?

(TTF) — Mon, 07 Jul 2008 23:20:11 +0900

웹서핑을 하다가 훌륭한 블로그가 있어서 링크를 걸어 봅니다.
http://openlook.org/blog/2008/02/17/cb-1201/

미수다 첫째 줄은 의미가 있는가? 대해서 나름데로 DB를 만들고 주관적 관점이 포함된 과학적 접근 방법으로 해석한 재미있는 글이었습니다.

모든 수학적, 과학적인 공식과 논리를 초,중,고등학교에서 배우지만 실상 이렇게 실생활에 연관지어서 재미있게 해석해 보려는 시도를 하지 않았던 제 자신이 부끄럽습니다.

창조적인 사고란 이런것이구나 하고 느끼게된 블로그 글이었습니다.

글이 올라온 지 30일이 지나 새 댓글은 쓸 수 없습니다.

라고 되어 있어서 블로그 링크에 대한 허락은 구하지 못하였지만, 정말 저에게는 고마운 글이었습니다.