I&#039;m trying to get list of folder and files from the root directory. I just need to get file listing. There are approximately 50 folders and 190 files. This script will be run just one time only. Thing is I taken out response.buffer from the code, but it still points the error. BTW: I tried to search http://support.microsoft.com/ but it gives me "We Currently Have No Documents That Match Your Search "<BR><BR>Code below was posted on ASPMessageboard, I&#039;m thankful to that person for sharing it on the board. <BR><BR>Error Message: <BR>I&#039;m getting error listed below.<BR><BR>Response object error &#039;ASP 0251 : 80004005&#039; <BR><BR>Response Buffer Limit Exceeded <BR><BR>/filelisting.asp, line 0 <BR><BR>Execution of the ASP page caused the Response Buffer to exceed its configured limit. <BR><BR><BR>dim fs,xs,fo,xo,f,x,sf,fpath,s,objts, fext<BR>set fs=Server.CreateObject("Scripting.FileSystemObject ") <BR>set fo=fs.GetFolder("c:servicesmainfolder") <BR><BR>for each f in fo.SubFolders <BR> set xs=Server.CreateObject("Scripting.FileSystemObject ") <BR> set xo=xs.GetFolder("c:servicesmainfolder\" & f.Name) <BR> mainfolder = f.Name<BR> for each x in xo.SubFolders <BR> for each sf in x.files<BR> fpath = "c:/services/mainfolder/" & f.Name & "/" & x.Name & "/" & sf.Name <BR> if xs.FileExists(fpath) then<BR> fullfname = sf.Name <BR> &#039;fext = InStrRev(fullfname, ".")<BR> &#039; filename = Mid(fullfname,1,fext-1)<BR> &#039; fext = Mid(fullfname,fext+1)<BR> &#039; response.write fext & "<BR>"<BR> showfile = showfile & f.Name & "/" & x.Name & "/" & sf.Name & "<BR>"<BR> else<BR> end if <BR> next <BR> next<BR> <BR> set xo=nothing <BR> set xs=nothing <BR> next <BR>set fo=nothing <BR>set fs=nothing <BR><BR>&#060;%= showfile %&#062;