FSO - gravar no final de um arquivo txt

[srafael 0]

Tenho um arquivo txt que contem uma lista de nomes. Quando o usuario clicar em cadastrar, a pagina ira gravar um novo nome no final deste arquivo. Como faço para acrescentar este novo nome no final do meu arquivo texto?Grato!

[Mário Monteiro 179]

<%dim fso, txt,fsotxt ,arquivotxt,strConteudo ,arquivoarquivo = "nome_do_txt.txt"Const ForReading = 1set fsotxt = Server.CreateObject("Scripting.FileSystemObject")Set arquivotxt = fsotxt.OpenTextFile(server.mappath(arquivo), ForReading )strConteudo = arquivotxt.ReadAllarquivotxt.Closeset fso = Server.CreateObject("Scripting.FileSystemObject") set txt = fso.createTextFile(server.mapPath(arquivo))txt.writeLine strConteudotxt.writeLine "novo_nome"%>

[Mário Monteiro 179]

no lugar de novo_nome você poe o nome que deseja incluir no final do txt