Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Problème d'autorisations VBScript

1 réponse
Avatar
Sylvain
Bonjour =E0 tous!
Afin d'afficher les donn=E9es d'une page web, je dois ouvrir un fichier
de type .doc.

J'utilise pour cela le code suivant: (vbscript)
<%

loc_document=3D"chemin_vers_le_fichier/doc_cpte.doc"
set mon_fso =3D Server.CreateObject("Scripting.FileSystemObject")
'response.write server.MapPath(loc_document)

mon_ts=3D mon_fso.OpenTextFile(server.MapPath(loc_document), 2, false)

texte=3D mon_ts.ReadAll()
%>
<body>
<%
response.write (texte)
%>
</body>
le "'response.write server.MapPath(loc_document)", envoie le bon
r=E9pertoire, ce dernier etant autoris=E9 en lecture/=E9criture et
l'utilisateur d'acc=E8s anonyme au dossier est bien
IUSR_NOM_DE_MON_SERVEUR.

Merci d'avance

1 réponse

Avatar
Sylvain
Mille excuses j'ai oublié de dire mon problème:
une page d'erreur s'affiche quand je lance le script

Erreur d'exécution Microsoft VBScript (0x800A0046)
Permission refusée
/net3/fournisseur/doc_cpte.asp, line 9

Sylvain a écrit :

Bonjour à tous!
Afin d'afficher les données d'une page web, je dois ouvrir un fichier
de type .doc.

J'utilise pour cela le code suivant: (vbscript)
<%

loc_document="chemin_vers_le_fichier/doc_cpte.doc"
set mon_fso = Server.CreateObject("Scripting.FileSystemObject")
'response.write server.MapPath(loc_document)

mon_ts= mon_fso.OpenTextFile(server.MapPath(loc_document), 2, false)

texte= mon_ts.ReadAll()
%>
<body>
<%
response.write (texte)
%>
</body>
le "'response.write server.MapPath(loc_document)", envoie le bon
répertoire, ce dernier etant autorisé en lecture/écriture et
l'utilisateur d'accès anonyme au dossier est bien
IUSR_NOM_DE_MON_SERVEUR.

Merci d'avance