DSN 이름 으로 부터 IP, PORT, USERNAME, DB NAME, NLS_USE 등 얻기

레지스트리에서 DSN이름으로 아래의 정보를 구할수 있음


#include <registry.hpp>

..... 아래처럼 함수를 구현 한다. ....


/DNS 으로 부터 기타 정보 얻기 IP, NAME, ...
//registry HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\DSN

TRegistry* reg = new TRegistry(KEY_READ);
reg->RootKey = HKEY_LOCAL_MACHINE;
reg->OpenKey("SOFTWARE",FALSE);
reg->OpenKey("ODBC",FALSE);
reg->OpenKey("ODBC.INI",FALSE);
reg->OpenKey(cbboxDSNList->Text,FALSE);
edtServer->Text = reg->ReadString("Server");
edtDatabase->Text = reg->ReadString("Database");
cbboxNLS->Text = reg->ReadString("NLS_USE");
edtPasswd->Text = reg->ReadString("Password");
edtPort->Text = reg->ReadString("Port");
edtUserName->Text = reg->ReadString("User");

DSN List 얻기

//---------------------------------------------------------------------------
#include <vcl.h>
#include <sql.h>
#include <sql.h>
#include <sqlext.h>
#include <sqltypes.h>
#pragma hdrstop
#pragma comment(lib, "odbc32.lib")
#include "regServerUnit.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmRegisterDatabaseServer *frmRegisterDatabaseServer;
//---------------------------------------------------------------------------
__fastcall TfrmRegisterDatabaseServer::TfrmRegisterDatabaseServer(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmRegisterDatabaseServer::FormCreate(TObject *Sender)
{
//DSN 리스트 얻기
    HENV hEnv;
  char  tmpDSN[256];
  SWORD tmpDSNLen = 255;
  SWORD ResultLen;
  UCHAR tmpDriver[256];
  SWORD tmpDriverLen = 255;
  SWORD ResultDescLen;
  RETCODE ReturnCode = SQL_SUCCESS;
  UnicodeString DSNList;

  ReturnCode = ::SQLAllocEnv(&hEnv);
  if (SQL_SUCCESS == ReturnCode)
  {
      ReturnCode = ::SQLDataSources(hEnv, SQL_FETCH_FIRST, tmpDSN, tmpDSNLen, &ResultLen, tmpDriver, tmpDriverLen, &ResultDescLen);

      while(!ReturnCode)
      {
          // additional processing
            DSNList = tmpDSN;
          cbboxDSNList->AddItem(DSNList,NULL);
          ReturnCode = ::SQLDataSources(hEnv, SQL_FETCH_NEXT, tmpDSN, tmpDSNLen, &ResultLen, tmpDriver, tmpDriverLen, &ResultDescLen);
      };
  }
}
//---------------------------------------------------------------------------

하드디스크 WD500GB 디스크 조각모음후..

디스크 조각모음을 하고 나서 성능측정을 다시 하니

5.6에서 5.7로 0.1 올랐다.

thinkpad T60 osx 10.5.7

XxX 10.5.6

바로 업데이트

사운드 OK

그래픽은 일단 해상도만 qe/ci 하면 잔상이 생기네요...

무선랜 안됨

Vista/osx/ubuntu

준비물
easyBCD
acronis disk director
acronis true image
해킨 dvd
우분투

M$ 윈도우를 주로 사용하고 osx 맛보기 가끔 linux를 사용하는 랩탑에
일단 파티셔닝 작업을 한다.
첫번째 M$ OS
두번째 OSX
세번째 리눅스

두번째 파티션을 준비 할때는 0xAF ShagOS swap로 convert시킴 (disk diretor 이용)

해킨 dvd 부팅후 설치

mbr이 날아감

다윈로더에서 vista를 선택해서 비스타 진입

disk direcotr로 Active 파티션을 C로 바꾸고 EasyBCD에서 MBR복구
OSX 부트를 설정 해준다.

다시 부팅 하면 vista우선 easyBCD에 의한 부트 로더 나옴

마지막으로 우분트 설치
우분트 설치에 중요점은 마지막에 grub를 주하드 MBR이 아닌 걍 파티션에 설치

vista에 가서 easyBCD로 리눅스 부트 추가 해주면 됨

osx해킨은 업데이트나 iwi3945 같은거 설치 잘못 하다간 바로 커널 패닉이므로

아크로니스 투루이미지로 백업을 받아 둔다.

현재 XxX10.5.6에서 10.5.7로 소프트웨어 업데이트시 이상 없이 동작 한다.

다음 소프트웨어 업데이트 라든지 모험 하기전에 반드시 백업을 해두자..

Thinkpad T60 하드 교체하기

T60 2613-a54

RAM 2GB

CPU core2duo T5600 1.83

HDD 도시바 120GB

이번에 WD 500GB 5400rpm 8mb 버퍼

요넘을 갈아 끼었다.

일단 공간 압박때문에

320GB 7200RPM과 고민하다가.. 성능 보단 공간이라고 생각 하고....

그런데 성능도 괞찮다.

주 하드 디스크 : 디스크 데이터 전송률 4.4에서 --- > 5.6으로 향상 되었다.

주기적으로 ls 하기

# while (true) do ls; sleep 1; done

어떤 디렉토리에 어떤 파일이 갑자기 생기나 확인 하려고.. 계속 ls를 쳐보는 노가다....
모르면 노가다 알면 참 쉽죠 ~~ 잉....