<%
Dim Fs, bSkinURL, SkinFolder, FolderCollection
Set Fs = Server.CreateObject("Scripting.FileSystemObject")
bSkinURL = Server.MapPath("..") & "/Skin"
Set SkinFolder = Fs.GetFolder(bSkinURL)
Set FoderCollection = SkinFolder.SubFolders
For EACH Folder IN FoderCollection
%>
<option value="<%= Folder.Name %>"><%= Folder.Name %></option>
<% Next %>
Dim Fs, bSkinURL, SkinFolder, FolderCollection
Set Fs = Server.CreateObject("Scripting.FileSystemObject")
bSkinURL = Server.MapPath("..") & "/Skin"
Set SkinFolder = Fs.GetFolder(bSkinURL)
Set FoderCollection = SkinFolder.SubFolders
For EACH Folder IN FoderCollection
%>
<option value="<%= Folder.Name %>"><%= Folder.Name %></option>
<% Next %>
'WEB TIP > ASP' 카테고리의 다른 글
| TEXT로 지정된 칼럼 SP에서 사용하기 (0) | 2006.04.05 |
|---|---|
| Session값 지우기 (0) | 2006.04.05 |
| Request값 확인하기 (0) | 2006.04.05 |
| 변수값으로 include (0) | 2006.04.05 |
| 제목, 내용 입력전 필터링 함수 (0) | 2006.04.05 |
