Discussion :

[Louis-Guillaume Morand]

Je souhaiterait lister les fichiers d'un repertoire. rien de bien compliqué vous allez me dire et bah pourtant le code suivant me sort l'erreur

Erreur d'exécution Microsoft VBScript erreur '800a000d'

Type incompatible: 'MapURL'

/test/extranet/detailsfile.asp, ligne 324

Voici mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for each item in folder.Files
url = MapURL(item.path)
Response.Write("<tr><td><a href=""" & url & """>"&item.name &"</a>" _
 & "</td></tr>" & vbCrLf)
next

bien entendu, si j'enlève le mapURL je peux lister parfaitement les item.path mais ce sont des chemins de type "d:/ws/blabla" et sur un site web ca ne marche pas il faut l'url web. je ne comprend pas l'origine de cette erreur. google ou dvp ne m'ont pas sorti un seul cas comme le mien.

quelqu'un pour aider une ame desespérée?

[Louis-Guillaume Morand]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
function MapURL(path)
 
dim rootPath, url
 
'Convert a physical file path to a URL for hypertext links.
 
rootPath = Server.MapPath("/")
url = Right(path, Len(path) - Len(rootPath))
MapURL = Replace(url, "\", "/")
 
end functio

j'ia rajouté cette methode et ca marche. mais c'est pas une methode de base d'ASP : mapurl()??