Hola amigo... bueno seria algo asi:
Código:
set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oFich = FSO.OpenTextFile(Server.MapPath("noticia.htm"), 8)
'Escribimos la linea nueva
oFich.WriteLine ("Aca todo lo que sea la noticia")
oFich.Close
Saludos y suerte