ASP e XML

[<^sPyNiFeX^> 0]

E aí galera do fórum Imasters???

Estou com dificuldade em fazer uma rotina em asp para que o mesmo crie um arquivo de xml como resposta

No código abaixo o asp lê o nome dos diretórios e arquivos de um diretório específico.

 

Set fsobj = Server.CreateObject("Scripting.FileSystemObject")

'Cria o objeto FSO que será utilizado para a operação.

 

pasta = "o caminho do diretório que o asp vai ler os arquivos"

'Seta a variavel pasta com o caminho para a pasta que desejamos listar seu conteúdo.

 

Set objpasta = fsobj.GetFolder(pasta)

'Cria o objeto objpasta para manipularmos o conteúdo da referida pasta.

 

response.write "<b>Listando conteúdo de: "& pasta &"</b><br><br>"

 

'A rotina abaixo lista todos os arquivos da pasta e exibe os detalhes do mesmo.

 

contar = 0

For Each objFile in objpasta.Files

contar = contar + 1

Response.Write contar & ". Arquivo: "& objFile.Path & " | Tamanho: "& int(objFile.Size/1024) &" Kb<br>"

Next

 

'Esta parte da rotina irá listar as subpastas do diretório em questão.

 

For Each objSubFolder in objpasta.SubFolders

response.write "<br><br><b>Listando conteúdo de: "& objsubfolder &"</b><br><br>"

contar = 0

For Each objFile in objpasta.Files

contar = contar + 1

response.write contar & ". Arquivo: "& objFile.Path & " | Tamanho: "& int(objFile.Size/1024) &" Kb<br>"

Next

Next

 

%>

 

Agora que o asp já respondeu o nome dos subdiretório e arquivos de um diretório específico, falta somente fazer ele gerar essa resposta em xml. Alguem sabe fazer isso??? :blink:

 

 

Agradeço desde já pela atenção,

Marcelo.

[birobirosk8 0]

com o proprio fso você pode gerar um arquivo.tipo escreve tudo e depois é só salvar com a extensão XML, faloow