|
임승균.조로 님이 쓰신 글 :
: 안녕하세요
:
: 출처!!~ 천리안 프로그래머 포럼(pdspf)" 에서 가져 왔습니다(델파이)
: 빌더로 컴버트 합니다~~
:
: bool CheckSaUpJaBunHo(char *No)
: {
: const int Weight[8] = {1, 3, 7, 1, 3, 7, 1, 3};
: AnsiString TempStr;
: int Loop, Sum;
: bool result = true;
:
: Sum = 0;
: for (Loop= 0; Loop < 8; Loop++) {
: Sum = Sum + StrToInt(No[Loop]) * Weight[Loop];
: }
: Loop = StrToInt(No[8]) * 5;
: Sum = Sum + (Loop / 10) + (Loop % 10);
: Sum = Sum % 10;
: if (Sum == 0) TempStr = "0";
: else TempStr = IntToStr(10 - Sum);
: if (TempStr != No[9]) result = false;
: return result;
: }
:
: void __fastcall TForm1::Button1Click(TObject *Sender)
: {
: AnsiString SN = "3158100589";
: if (!CheckSaUpJaBunHo(SN.c_str())) {
: ShowMessage("사업자번호가 잘못되었습니다.");
: }
: }
:
: 즐거운 하루 되십시요~~
:
: 병아리 님이 쓰신 글 :
: : 안냐세요~
: : 사업자등록번호 체크하는법을 알고싶은데요..
: : 델파이소스는 봤는데 도데체 뭐가뭔지.... ㅠ.ㅠ
: : 부탁드립니다..
: :
:
:
|