Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

danielegg

Scripting.FileSystemObject?? como usar??

Por , em ASP Clássico

Recommended Posts

danielegg    0

danielegg
Postado

Estou com dificuldade em conseguir usar este script. Toda vez que eu rodo este script localmente ele trava o meu IIS... agora estou com receio de usar no servidor web e trava-lo. Scripting.FileSystemObject é um componente?? free??Alguem pode me ajudar???

Compartilhar este post

Link para o post
Compartilhar em outros sites

danielegg    0

danielegg
Postado

<%@LANGUAGE="VBSCRIPT"%>

 

 

<% 'Setando os Aquivos

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

Set pasta = FSO.Getfolder("caminho da pasta")

Set arquivos = pasta.Files

%>

 

 

<html>

<head>

<title>CNSD - ITABIRA</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<link href="css/cnsd.css" rel="stylesheet" type="text/css">

</head>

 

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<table width="779" border="0" cellspacing="0" cellpadding="0">

<tr>

<td colspan="3"><% If Session("login") = "ok" Then %>

<!--#include file="topo_admin.asp"-->

<% Else %>

<!--#include file="topo.asp"-->

<% End If %></td>

</tr>

<tr>

<td width="20%" align="left" valign="top"> <strong> </strong>

<!--#include file="lado_menu.asp"-->

</td>

<td width="60%" align="center" valign="top" > <table width="100%" border="0" cellspacing="4" cellpadding="0">

<tr>

<td align="center"><img src="imgs/t_12.gif" width="448" height="25"></td>

</tr>

<tr>

<td> <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">

<tr>

<td width="50">

 

 

<% ' Imprimindo na tela os Arquivos da Pasta

For Each objFolder in arquivos

Response.Write objFolder.name & "<br>"

Next

%>

</td>

</tr>

</table>

 

<p> </p></td>

</tr>

</table>

<p><a href="#" class="link2">A mantenedora</a> | <a href="#" class="link2">Histórico</a>

| <a href="#" class="link2">A escola</a> | <a href="#" class="link2">Missão</a>

| <a href="#" class="link2">Proposta pedagógica</a><br>

<a href="#" class="link2">Funcionamento</a> | <a href="#" class="link2">Corpo

docente</a> | <a href="#" class="link2">Mural</a> | <a href="#" class="link2">Fale

conosco</a></p>

<p class="endereco"><strong>Congregação Religiosas Missionárias

de Nª Sª das Dores</strong><br>

R. Santana - nº 235 - Itabira - MG - Cep: 35900-064 - Fone: 31 3834 5555<br>

<br>

</p></td>

<td width="18%" align="right" valign="top">

<!--#include file="lado_direito.asp"-->

</td>

</tr>

<tr valign="middle" bgcolor="#5991B4">

<td height="18" colspan="3" class="menu">

<div align="center">© Copyright 2003 - CNSD Itabira - Desenvolvido

por Stratta e Sil.</div></td>

</tr>

</table>

</body>

</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

d.eleete    0

d.eleete
Postado

Este script funcionava anteriormente? Pq aqui as vezes o FSO trava o IIS.. e eu reinicio... e pronto.. volta afuncar!

Compartilhar este post

Link para o post
Compartilhar em outros sites

danielegg    0

danielegg
Postado

Ele nunca deu nenhuma mensagem de erro nao... a pagina fica tentando abrir, mas nao consegue e depois o iis trava e tenho q reiniciar!!!Lembrando q isso tudo esta sendo testado local.

Compartilhar este post

Link para o post
Compartilhar em outros sites

WebASP    0

WebASP
Postado 

<%Set Fso = Server.CreateObject ("Scripting.FileSystemObject")	Set arquivo = Fso.GetFolder("C:\")	Set arquivos = arquivo.files		For Each a in arquivos  Response.Write a.name & "<br>"	Next	Set arquivos = nothing	Set arquivo = nothingSet Fso = nothing%>

 

 

Ira listar todos os arquivos da pasta C:\

Compartilhar este post

Link para o post
Compartilhar em outros sites

danielegg    0

danielegg
Postado

Muito obrigado pessoal o script rodou na locaweb direitinho mas no meu servidor local nao rodou nao... eu uso o win xp pro... será q é por isso q ele nao rodou?? O IIS esta instalado ja e ja constatei que possui o componente FileSystemObject será q tenho q fazer mais alguma coisa pra roda-lo na minha máquina??Grato Daniel Egg

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito