-----Original Message-----
From: Ai Rosita <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
Date: 05 Oktober 2000 12:22
Subject: [webauthor] gimana cara Pharsing.!!!
>ada yang tahu ngak gimana cara yang paling mudah untuk
>melakukan pharsing
>terhadap suatu nama file di dalam suatu folder di ASP.
>misalnya :
>1. ingin menampilkan seluruh file yang ber_extention .jpg
>atau
>2. saya ingin menampilkan file yang berawalan huruf "a"
<%
Set fso =
Server.CreateObject("Scripting.FileSystemObject")
Set fld = fso.GetFolder("C:\")
For Each file In fld.Files
'Kondisi jika extension jpg
Cond1 = LCase(fso.GetExtensionName(file.Path)) = "jpg"
'Kondisi jika awal huruf a
Cond2 = Left(LCase(file.Name), 1) = "a"
If Cond1 Or Cond2 Then
Response.Write file.Name & "<br>"
End If
Next
%>
### FREE DOMAIN [.COM|.NET|.ORG *] >> http://www.indoglobal.com << ###
Berhenti langganan kirim email ke [EMAIL PROTECTED]
Arsip di http://www.mail-archive.com/[email protected]/
