procedure Tbbform.BitBtn1Click(Sender: TObject);
var
DufURL : String;
Number1,Number2,msg :String;
begin
number1:=ResvMan.Text;
number2:=SndMan.Text;
msg:=memo1.Text;
DufURL := 'http://webcenter.chollian.net/cgi-bin/mycappy2.cgi?step=second&number1=' + number1 + '&mesg=' + Msg + '&number2=' + number2 + '&submit_button=%C0%FC%BC%DBc';
NMHTTP1.Get(DufURL);
showmessage('전송완료!!');
memo1.Clear;
end;
TNMHttp컴포넌트를 사용했구요
number1과 number2 그리고 msg부분에 미리 숫자하고 내용을 적어 놓으면 잘되요..
근데 입력을 받게 만들면 이상하게 안되요..
제가 뭘 잘못했을까요.. 고수 님들 조언 부탁 드려요..
다 테스트는 않해봐서 잘되나 모르겠네요..
특수문자나 공백 줄바꿈 처리는 되는거 같아요..
참고하세요..
아리엘 wrote:
> procedure Tbbform.BitBtn1Click(Sender: TObject);
> var
> DufURL : String;
> Number1,Number2,msg :String;
> begin
>
> number1:=ResvMan.Text;
> number2:=SndMan.Text;
>
> msg:=memo1.Text;
>
> DufURL := 'http://webcenter.chollian.net/cgi-bin/mycappy2.cgi?step=second&number1=' + number1 + '&mesg=' + Msg + '&number2=' + number2 + '&submit_button=%C0%FC%BC%DBc';
> NMHTTP1.Get(DufURL);
> showmessage('전송완료!!');
> memo1.Clear;
>
> end;
>
>
> TNMHttp컴포넌트를 사용했구요
> number1과 number2 그리고 msg부분에 미리 숫자하고 내용을 적어 놓으면 잘되요..
> 근데 입력을 받게 만들면 이상하게 안되요..
>
> 제가 뭘 잘못했을까요.. 고수 님들 조언 부탁 드려요..
>