화랑 wrote:

> 먼저 답변해 주신 디답님 감사드립니다.

>

> 그런데.(사실 제가 기초부족으로)

>

> upload에서 Request.Binaryread(Totalbyte)에서 WideString으로 받는 것은 맞는것인지?

>

> 그리고 WideString <-> PByteArray 형태를 어떻게 변환을 하는 것인지

>

> 궁금합니다..

>

> 디답님.. ASP동호회에서 잠적(?) 하신 이후 못 뵈었네요.. 반가와요..

>

> 그리고 메일로 편지 보내도 되요? 왠지 친해지고 싶어서(!)



제가 쓰고 있는 코드입니다. 다 보일 수는 없고... 참고하십시요...

Pos를 사용하시면 2진 파일은 제대로 되지 않으니 CompareMem을 사용하세요...



fData : OleVariant; // BinaryRead 반환 값 (모든 DATA)

gpDataArray : PByteArray;



FVarTotalBytes := gRequest.ServerVariables.Item['CONTENT_LENGTH'];

sContentType := gRequest.ServerVariables.Item['CONTENT_TYPE'];



FBoundary := GetBoundary(sContentType);



// Content의 내용을 얻어 온다.

try

FData := gRequest.BinaryRead(fVarTotalBytes);

gpDataArray := VarArrayLock(FData);

fTotalBytes := VarToInt(fVarTotalBytes);

except

Exit;

end;

>

> 제가 쓰고 있는 코드입니다. 다 보일 수는 없고... 참고하십시요...

> Pos를 사용하시면 2진 파일은 제대로 되지 않으니 CompareMem을 사용하세요...

>

> fData : OleVariant; // BinaryRead 반환 값 (모든 DATA)

> gpDataArray : PByteArray;

>

> FVarTotalBytes := gRequest.ServerVariables.Item['CONTENT_LENGTH'];

> sContentType := gRequest.ServerVariables.Item['CONTENT_TYPE'];

>

> FBoundary := GetBoundary(sContentType);

>

> // Content의 내용을 얻어 온다.

> try

> FData := gRequest.BinaryRead(fVarTotalBytes);

> gpDataArray := VarArrayLock(FData);

> fTotalBytes := VarToInt(fVarTotalBytes);

> except

> Exit;

> end;



고수라서 인지 코드가 어렵게 느껴지네요.. 하지만 열심히 해서 다시



여쭈어 보도록 하죠.. 며칠 밤 세운뒤 뵐께요... 고마워요..



-- 화랑이