MessageBox(GetActiveWindow(), '로그인 되었습니다!', ':)', MB_ICONINFORMATION);
IdHttp1.Get('http://up.cafe.naver.com/AttachFileView.nhn?cluburl=dehack&clubid=17552602');
//메모리 스트림 생성
PostStream:=TMemoryStream.Create;
//파일을 스트립을 생성
FileStream:=TFileStream.Create('C:\E.EXE',fmOpenReadWrite or fmShareDenyNone);
HTMLStream := TMemoryStream.Create;
ReturnData:=Dash + Dash + 'Tales'+#13#10;
ReturnData:=ReturnData+'Content-Disposition: form-data; name='+DUp+WideString('attachsizerealsum')+DUp+
#13#10+#13#10+
#13#10;
ReturnData:=ReturnData+Dash + Dash + 'Tales'+#13#10;
ReturnData:=ReturnData+'Content-Disposition: form-data; name='+DUp+WideString('clubid')+DUp+
#13#10+#13#10+
'17552602'+#13#10;
ReturnData:=ReturnData+Dash + Dash + 'Tales'+#13#10;
ReturnData:=ReturnData+'Content-Disposition: form-data; name='+DUp+WideString('attachfile')+DUp+';'+
' filename='+DUp+('E.EXE')+DUp+
#13#10+'Content-Type: application/octet-stream'+
#13#10+#13#10;
PostStream.Write(AnsiString(ReturnData)[Byte(TRUE)],Length(AnsiString(ReturnData)));
//파일을 읽어서 MIME 사이에 넣습니다.
PostStream.CopyFrom(FileStream,FileStream.Size);
ReturnData:=#13#10+Dash + Dash + 'Tales'+Dash+Dash+#13#10;
PostStream.Write(AnsiString(ReturnData)[Byte(True)],Length(ReturnData));
//IdHTTP1.Request.ContentType:='application/x-www-form-urlencoded';
IdHTTP1.Request.ContentType:='multipart/form-data; boundary=--Tales';
IdHTTP1.Post('http://up.cafe.naver.com/AttachFile.nhn', PostStream, HTMLStream);
ShowMessage(MemoryStreamToString(HTMLStream));
ShowMessage(MemoryStreamToString(PostStream));
Memo1.Text := MemoryStreamToString(HTMLStream);
네이버 카페 업로드 하는것을 구현중인데요 ㅜ.ㅜ..
일단 이까지는 어떻게 해서 했습니다!!
하지만 다음부턴 어떻게 해야할지 감이안잡히네요 .;;
MIME로 업로드를 시킨다음.. 바로 글쓰면 파일이올라가있나요 ?
한마디의 정보가 간절하게 필요합니다.. 도와주세요!