急！！！提示“服务器URL错误”是怎么回事？

我的数据库用的是DELPHI 7.0，setseverunit setserver1;var
  SetServer: TSetServer;implementation{$R *.dfm}
   uses main;
procedure TSetServer.FormCreate(Sender: TObject);
begin
 try
  memo1.Lines.LoadFromFile('server');
  edit1.Text := memo1.Lines.Text ;
 except
 end;
end;procedure TSetServer.BitBtn1Click(Sender: TObject);
begin
 memo1.Lines.Clear ;
 memo1.Lines.Text :=edit1.Text ;
 memo1.Lines.SaveToFile('server');
 main.MainForm.SoapConnection1.URL := setserver.Edit1.Text+'/peacebay.dll/soap' ;end;end.//peacebay.dll{ SOAP Web Module - WAD }
unit Unit2;interfaceuses
  SysUtils, Classes, HTTPApp, InvokeRegistry, WSDLIntf, TypInfo,
  WebServExp, WSDLBind, XMLSchema, WSDLPub, SOAPPasInv, SOAPHTTPPasInv,
  SOAPHTTPDisp, WebBrokerSOAP, DB, ADODB, Provider;type
  TWebModule2 = class(TWebModule)
    HTTPSoapDispatcher1: THTTPSoapDispatcher;
    HTTPSoapPascalInvoker1: THTTPSoapPascalInvoker;
    WSDLHTMLPublish1: TWSDLHTMLPublish;
    procedure WebModule2DefaultHandlerAction(Sender: TObject;
      Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  WebModule2: TWebModule2;implementationuses WebReq;{$R *.dfm}procedure TWebModule2.WebModule2DefaultHandlerAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
  WSDLHTMLPublish1.ServiceInfo(Sender, Request, Response, Handled);
end;initialization
  WebRequestHandler.WebModuleClass := TWebModule2;end.