Challenge Everything

CreateFile() 함수 사용 시 이미 생성된 파일의 경우 읽기로 읽은 다음 SetFilePointer() 함수로 파일 끝으로 이동 시키지 않으면 읽어들인 파일의 맨 위에서부터 계속 덮어쓰기 된다.

CreateFile(), WriteFile() 사용 시 항상 SetFilePointer() 함수를 사용해야 한다.

SetFilePointer()는 fseek() 과 같은 역할

CDatabase m_db;

m_db.OpenEx("DSN=DSNNAME;UID=USERID;PWD=PASSWORD");

CRecordset m_rs(&m_db);

m_rs.Open(CRecordset::dynaset, strQuery);

m_rs.AddNew();

// m_rs.Edit();

// 이런식으로 레코드셋 바로 사용하기 위해서는 MFC Class Wizard 를 이용해서 해당 테이블을 레코드셋 클래스로 만들어야 한다.

// 레코드셋 클래스 일일히 만들다가 열폭했다.

// 클래스 위자드를 사용하니 깔끔하게 잘 돌아간다.

// 내 시간은 어디가서 보상받나...

m_rs.m_nLevel = 10;

m_rs.Update();

m_rs.Close();

fatal error C1001: internal compiler error
C1001: file "msc1.cpp" line 2701

-> Visual Studio .NET 2003

이런 덴장찌게 같은 에러...

도데체 무슨 문제인지 아무리 에러난 부분을 찾아봐도 찾을 수 없었다...

내부 컴파일러 에러...

에헤라 디야~~~

정신이 이상해 질려고 한다...

혹시나 하는 마음에...

구조체 정의된 곳을 찾아봤다...

struct DBTIMESTAMP

{

};

역시나...

Visual Studio .NET 2003 PlatformSDK와 atlmfc에 DBTIMESTAMP가 typedef로 버젓이 선언되어 있는게 아닌가...

스팀 이빠이 만땅 받았다...

살포시 구조체 이름을 바꿨다...

아무런 문제없이 컴파일 됐다...ㅡ.ㅡ;;

신발...

6.0에서 짠 소스를 7.1에서 컴파일 할때는 항상 저런에러가 발생할 거라는걸 명심 또 명심하자...

======================================================================================

>> 20061108 같은 에러로 인한 삽질...

이번에 나타난 에러는 위와는 다른 상황이었다.

아무리 리빌드 올 하는 삽질을 해봐도 해결이 안됐다.

그냥 빌드만 하면 잘~ 컴파일 된다.

전체 리빌드 올 할 경우에만 문제가 생겼다.

혹시나 하는 마음에 프로젝트 옵션에 "미리 컴파일된 헤더 사용 안 함" (/YX, /Yc, /Yu 옵션 제거) 으로 하고 리빌드 올...

아주 잘~ 컴파일 된다...

이런 Dog같은 경우가...

정확히 뭐가 문제인지는 모르겠지만 컴파일러 자체의 문제라는 얘기가 많다...

XX같은 M$ VC++에도 신경을 좀 써달란 말이닷!!!

출처 :

http://www.devpia.com/MAEUL/Contents/Detail.aspx?BoardID=57&MAEULNO=22&no=1812

    dim testStr     ' 테스트문자열 변수
    dim one_str     ' 문자열 하나
    dim one_ace     ' 문자의 아스키값
    dim one_hex     ' 문자의 헥사값
    dim one_chr     
     dim tmp
    
    testStr = "가나다abc"
    
    '========================================================
    ' 문자 -> 아스키값 -> 16진수(헥사값) -> 다시 문자로
    '========================================================
    for i = 1 to len(testStr)
        one_str = mid(testStr,i,1)      ' 문자를 하나 가져온다.
        one_asc = Asc(one_str)          ' 문자 -> 10진수 (아스키코드로 변환)
        one_hex = hex(one_asc)          ' 10진수 -> 16진수
      if len(one_hex) = 1 then one_hex = "0" & one_hex    ' 16진수 값이 F 미만일경우는 0A, 0B..인데 앞의 숫자 0이 생략되어서 강제로붙여준다.
      one_chr = chr("&H" & one_hex)   ' 16진수 -> 문자

        
        Response.Write "가져온 문자 : " & one_str & "<br>"
        Response.Write "문자 to 아스키값 : " & one_asc & "<br>"
        Response.Write "아스키값 to HEX값 : " & one_hex & "<br>"
        Response.Write "HEX값 to 문자 : " & one_chr & "<hr>"
    next
 
    
    '========================================================
    ' 함수 이용 -_-
    '========================================================
    tmp = StringToHex(testStr)
    Response.Write "문자열을 16진수로<br>"
    Response.Write tmp & "<hr>"
    
    tmp = HexToString(tmp)
    Response.Write "16진수를 문자열로<br>"
    Response.Write tmp
 
 
    '----------------------------------------------
    ' 문자열 -> 16진수
    '----------------------------------------------
    Function StringToHex(pStr)
        dim i, one_hex, retVal
        for i = 1 to len(pStr)
            one_hex = hex(asc(mid(pStr,i,1)))
            retVal = retVal & one_hex
        next
        StringToHex = retVal
    End Function
 
    '----------------------------------------------
    ' 16진수 -> 문자열 변환 함수
    '----------------------------------------------
    Function HexToString(pHex)
        dim one_hex, tmp_hex, i, retVal
        for i = 1 to len(pHex)
            one_hex = mid(pHex,i,1)
            if IsNumeric(one_hex) then
                tmp_hex = mid(pHex,i,2)
                i = i + 1
            else
                tmp_hex = mid(pHex,i,4)
                i = i + 3
            end if
            retVal = retVal & chr("&H" & tmp_hex)        
        next
        HexToString = retVal
    End Function