06/05/2002, 16:27
|
 | | | Fecha de Ingreso: mayo-2001 Ubicación: Gotland-Visvy
Mensajes: 181
Antigüedad: 24 años Puntos: 0 | |
| Re: Problemas con FileSystemObject
ola prueba este:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY bgcolor='#ffcc00'>
<FONT color=#660033 size=5><B>Propiedad FileSystem</B></FONT></br>
<%
'Descripción
'Devuelve el tipo de sistema de archivos que se está usando en la unidad
'especificada.Sintaxisobjeto.FileSystem objeto siempre es un objeto Drive.
'Comentarios
'Los tipos devueltos disponibles son FAT, NTFS y CDFS.
'El siguiente código muestra el uso de la propiedad FileSystem:
'original
'Function MostrarTipoDeSistemaDeArchivos(especificaciondeuni dad)
'Dim fso,d
'Set fso = CreateObject("Scripting.FileSystemObject" ;)
'Set d = fso.GetDrive(especificaciondeunidad)
'MostrarTipoDeSistemaDeArchivos = d.FileSystem
'End Function
%>
<%
'01
SUB MostrarTipoDeSistemaDeArchivos(especificaciondeuni dad)
Dim fso,d
Set fso = CreateObject("Scripting.FileSystemObject" ;)
Set d = fso.GetDrive(especificaciondeunidad)
'MostrarTipoDeSistemaDeArchivos = d.FileSystem
response.write "Se encontro : <BR>"
response.write "" & d.FileSystem
End sub
MostrarTipoDeSistemaDeArchivos ("C:")
%>
<br><center><a href='javascript:window.close()'>Cerrar Ventana</a></center><BR>
<center><HR><font size='1' face='verdana' color='red'><b>CRIMAKETEMPLATE HOSTING</b></font></center><BR>
<center><font size='1' face='verdana' color='red'><i><b>Versión.1.0</b></i></font></center><BR>
</BODY>
</HTML> |