..:mmac:. wrote:
Alas... thanks, I will live with the ordering as is.
You could always *utilize* my JScript suggestion. Start by encapsulating the
JScript logic in a function:
function listFiles(filePath) {
var fso = Server.CreateObject("Scripting.FileSystemObject"),
files = new Enumerator(fso.GetFolder(filePath).Files)
for (var a=[]; !files.atEnd(); files.moveNext())
a.push(files.item().name)
a.sort(function(x,y){return+x.replace(/\D/g,"")<+y.replace(/\D/g,"")?-1:1})
return a.join("*")
}
Now you need only call that function from elsewhere in your ASP script. Your
script can be written in either VBScript or JScript; this example is
obviously in vbscript
:
<%@ Language=VBScript %><%
Dim myFiles
myFiles = Split(listFiles("c:\inetpub\wwwroot\"),"*")
' The rest of your logic goes here
%>
<script runat="server" language="JScript">
//----- function goes here -----//
</script>
Because VBScript arrays and JScript arrays don't play together especially
well, I used Array.join() to zip the JScript array into an
asterisk-delimited[1] string, and Split() to turn it back into a VBScript
array.
This example, incidentally, illustrates a very useful concept in ASP: mixing
languages. You can access JScript objects from VBScript blocks and
vice-versa. But due to order-of-execution rules, using objects other than
functions can yield unexpected results[2].
[1] Use whatever you like. To avoid splitting on a character that is
potentailly part of a filename, make sure you use an illegal filename
character for your delimiter. With that in mind, note that Windows does not
allow the following characters in filenames: \/:*?"<>| You could
likewise us whitespace characters, such as "\t" and vbTab, or "\r\n" and
vbCrLf.
[2] Though predictible ones. See
http://aspfaq.com/show.asp?id=2045 for more
on this topic.
--
Dave Anderson
Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms. Please do not contact
me directly or ask me to contact you directly for assistance. If your
question is worth asking, it's worth posting.
