WEB TIP/ASP

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%>   ">

For Each item in Request.Form For i = 1 to Request.Form(item).count Response.write "request(" & item & ")=" & Request.Form(item)(i) Next Next QueryString은 알맞게;;;

위와 같이 하면 바로 에러;;; 그럼 어떻게 하느냐. incFile = Request.QueryString("Mode") & ".asp" Server.Execute(incFile)로 하면 아무이상 없습니다.

Subject = subject_filter(Trim(Request.Form("Subject"))) Contents = contents_filter(Trim(Request.Form("Contents"))) Dim rex Function contents_filter(content) content = replace(content,"","") content = replace(content,"

Dim Result, i Result = Trim(Request.Form("Result"))Result = Split(Result,",") For i = 0 To Ubound(Result) Response.Write Result(i) // 디비 연결 및 입력 프로시져 Next