请教如何用程序将iis的80端口改为8080,急!!!!!(100分)

请教如何用程序将iis的80端口改为8080,急!!!!!

自己来

uses comobj;

procedure TMainForm.Button1Click(Sender: TObject);
var WebSite,WebServer:Variant;
begin
try WebSite:=CreateOleObject('IISNamespace'); except Dialogs.MessageDlg('本机可能没有安装IIS系统，接口读取错误!',mtError,[mbOK],0); Exit; end;
WebSite:=WebSite.GetObject('IIsWebService', 'localhost/w3svc');
WebServer:=WebSite.GetObject('IIsWebServer', '1');
WebServer.put('ServerBindings', ':8080:');
WebServer.SetInfo;
end;

谢了