Salve ragazzi,
avevo sbagliato a postare il messaggio:
ora ve lo ripeto:
Io ho questo codice:
<%
dim path
dim fso
dim fold
dim fileCount
dim cFcount
dim fNames
dim file
dim tName
dim nName
dim buffer
dim i
dim content
dim objFiles
dim objFso
dim strpath
dim objFolder
dim strFile
path = "c:\inetpub\wwwroot\andrea\immagini\"
strpath = "c:\inetpub\wwwroot\andrea\immagini\"
set fso = CreateObject("Scripting.fileSystemObject")
set fold = fso.getFolder(path)
fileCount = fold.files.count
redim fNames(fileCount)
cFcount = 0
for each file in fold.files
cFcount = cFcount + 1
fNames(cFcount) = lcase(file.name)
next
for tName = 1 to fileCount
for nName = (tName + 1) to fileCount
if strComp(fNames(tName),fNames(nName),0)=1
then
buffer = fNames(nName)
fNames(nName) = fNames(tName)
fNames(tName) = buffer
end if
next
next
for i = 1 to fileCount
content = content & fNames(i) & "
"
next
set objFso = CreateObject("Scripting.fileSystemObject")
Set objFolder = objFso.GetFolder(Server.MapPath(strpath))
Set objFiles = objFolder.Files
Set objFso = Nothing
Set objFolder = Nothing
Set objFiles = Nothing
%>
il browser m dice qst:
Tipo di errore:
Server.MapPath(), ASP 0172 (0x80004005)
Come parametro per il metodo MapPath è necessario specificare un percorso virtuale. Il parametro fornito corrisponde a un percorso fisico.
/Andrea/Immagini.asp, line 54
Tipo di browser:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
Pagina:
GET /Andrea/Immagini.asp
Ora:
lunedì 6 settembre 2004, 8.48.35
Informazioni aggiuntive:
Supporto Microsoft
cosa devo fare???

Rispondi quotando