Q&A

  • 정말 너무나 어렵군요....
정말 너무나 어렵게 윈도우98에 있는 서버를 사용해서

WEB SERVER 예제를 보고 따라하고 있는데 막히는 곳이 있더군요

어떤 한HTML에서 버튼을 눌러서(Submit)하면

그 화면에 있는 내용들이 Table로 Append 되면서

그내용들이 보이는 또다른 HTML이 나오게 할려고 하는데

자꾸 버튼만 누르면 화일을 저장하라고 물어오는데 왜 그런가요?



예제 HTML







Registration Form











학회 사전 등록 서버



사전 등록을 하실 분은 다음 폼을 채워 주십시오.













































이름:

주소:

소속:

종류:

학생 회원 정식 회원

기타:

 



 











DLL화일 내용

procedure TWebModule1.WebModule1RegistrationAction(Sender: TObject;

Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);

begin

Table1.Append;

with Table1 do

begin

FieldByName('Name').AsString := Request.QueryFields.Values['name'];

FieldByName('Address').AsString := Request.QueryFields.Values['address'];

FieldByName('SocName').AsString := Request.QueryFields.Values['socname'];

FieldByName('Member').AsString := Request.QueryFields.Values['member'];

FieldByName('Etc').AsString := Request.QueryFields.Values['etc'];

try

post;

Response.Content := PageProducer1.Content;

except

Response.Content := ''+

'

서버에 에러가 발생하여 등록을 할 수 없습니다.'+

'';

end;

end;

end;



procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag;

const TagString: String; TagParams: TStrings; var ReplaceText: String);

begin

ReplaceText := Request.QueryFields.Values[TagString];

end;







그리고 또다른 HTML







Registration Form









학회 사전 등록 서버



다음과 같은 내용으로 등록하였습니다.



이름: <#name>



주소: <#address>



소속: <#socname>



종류: <#member>



기타: <#etc>









0  COMMENTS