Propriétés d'objet FSO Fichier (fichier)
DateCreated renvoie la date et l'heure de la création de ce dossier
DatelastAccessed renvoie la date et l'heure du dernier accès au fichier
DatelastModified renvoie la date et l'heure à laquelle le fichier a été modifié pour la dernière fois
Le lecteur renvoie l'objet du lecteur du lecteur où réside le fichier
Nom définir ou renvoyer le nom du fichier
ParentFolder renvoie l'objet du dossier du dossier parent du fichier
Le chemin renvoie le chemin absolu du fichier et peut utiliser un nom de fichier long
Shortname renvoie le nom du fichier dans le formulaire de style DOS 8.3
ShortPath renvoie le chemin absolu du fichier dans DOS Style 8.3 Formulaire
La taille renvoie la taille (octets) du fichier
Tapez si possible, renvoyez une chaîne de description pour le type de fichier
Méthode d'objet FSO Fichier (fichier)
Utilisation de la méthode des objets de fichier FSO
Copier Copy Copy Un ou plusieurs fichiers sur un nouveau chemin
CreateTextFile crée un fichier et renvoie un objet TextStream
DeleteFile Supprimer un fichier
OpenTextFile ouvre le fichier et renvoie l'objet TextStream pour la lecture ou l'ajout
Renommez le fichier:
La copie de code est la suivante:
Fonction Rename (SourceName, destname)
Dim Ofo, Ofile
set ofso = server.createObject ("scripting.filesystemObject")
Set Ofile = OFSO.getFile (server.mappath (SourceName))
odile.name = destname
Set Ofo = rien
Set Ofile = rien
Fonction finale
Supprimer le fichier:
La copie de code est la suivante:
Fonction fsodel (nom de fichier)
DIM FSO, F
set fso = server.createObject ("scripting.filesystemObject")
f = server.mappath (nom de fichier)
Si fso.fileexists (f) alors
fso.deletefile f, vrai
terminer si
Définir F = rien
Définir FSO = rien
Fonction finale
Remplacez les chaînes dans le fichier:
La copie de code est la suivante:
Fonction fsoreplace (nom de fichier, cible, repstring)
DIM OBJFSO, OBJCOUNTFILE, FILETEMPDATA
Set objfso = server.createObject ("scripting.fileSystemObject")
Set objCountFile = objfso.OpenTExtFile (server.mappath (nom de fichier), 1, true)
FilempData = objCountFile.readall
objCountFile.close
FilempData = Remplacer (filempdata, cible, repstring)
Set objCountFile = objfso.CreateTextFile (server.mappath (nom de fichier), true)
objCountFile.Write FileTempData
objCountFile.close
Définir objCountFile = rien
Définir objfso = rien
Fonction finale
<%
'**************************************************************
'Nom de la fonction: CreateFolder (SPATH)
'Fonction: Créez un répertoire
'Chemin: SPATH: le chemin du répertoire relatif créé
'Valeur de retour: succès vrai, échoué faux
'**************************************************************
'Response.Write CreateFolder ("/ dgsunshine / uploadFile / Demo1 /")
Fonction CreateFolder (SPATH)
Sur l'erreur reprendre ensuite
DIM FSO, Arrfolder, dossier, I, J
Si spath = "" alors
CreateFolder = false
Fonction de sortie
Terminer si
Si vous êtes laissé (spath, 1) = "/" alors
Dossier = "/"
SPATH = MID (SPATH, 2, LEN (SPATH))
Autre
Dossier = "./"
Terminer si
Si droit (spath, 1) = "/" alors spath = gauche (spath, len (spath) -1)
Arrfolder = Split (spath, "/")
Set fso = server.createObject ("scripting.filesystemObject")