Skrive til xml fil

Kode 

var
  tmpDoc:IXMLDomDocument2;
  wordsNode:IXMLDOMNode;
  newword:IXMLDOMNode;
begin
  tmpDoc:=CoDOMDocument.Create;
  tmpDoc.load('FILNAVN');
  wordsNode:=tmpDoc.selectSingleNode('rss/words');
  newword:=tmpDoc.createElement('word');
  newword.text:='test';
  wordsNode.appendChild(newword);
  tmpDoc.save('FILNAVN');

Ja.. så virker det næsten...

Problemet er så at jeg skal gøre det ved en fil som jeg har liggende på nettet, men der virker det ikke... så siger den noget med at dataerne er ikke til rådighed endnu... Det virker fint med en fil på haarddisken... men ikke på nettet..

--------------------------------------------------------------
MVH
Jesper
http://securityworld.dk - Alt om sikkerhed.

Kode 

[b]uses[/b] UrlMon;

function Download(Src, Dest: String): Boolean;
begin
  Result := URLDownloadToFile(nil, PChar(Src), PChar(Dest), 0, nil) = 0;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Download('http://localhost/index.php', 'C:/index.php') then
    ShowMessage('File successfully downloaded!')
  else
    ShowMessage('Error while downloading file!');
end;