O Adm irá exportar somente os e-mail´s ! apenas 1 item da tabela... olha só, este processo esta correto ? Ele cria um xml, será que se eu colocar txt ele funciona ? - - - - - <% ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\home\login\dados\banco.mdb;" Set conexao=server.createobject("adodb.connection") Conexao.open ConnString SQL="select Nome,Telefone,Email from cadastro" set rs = conexao.execute(SQL) Set ObjFSO = CreateObject("Scripting.FileSystemObject") Set escreve = ObjFSO.CreateTextFile("e:\home\login\web\teste\arq.xml", true) > posso utilizar .txt aqui ? escreve.write "<?xml version=""1.0"" encoding=""ISO-8859-1"" ?>" & vbcrlf escreve.write "<internet>" & vbcrlf do while not rs.eof escreve.write "<opcoes>" & vbcrlf for i=0 to rs.fields.count-1 escreve.write "<" & rs.fields(i).name & ">" & rs.fields(i).value & "</" & rs.fields(i).name & ">" & vbcrlf next rs.movenext escreve.write "</opcoes>" & vbcrlf loop escreve.write "</internet>" & vbcrlf Response.write "Arquivo salvo !" set ObjFSO = nothing rs.close conexao.close set rs = nothing set conexao = nothing %>