creating files and folders.

[Bluemonkey]

when i use this bit of code it gives a internal server 500 error.

when i get a piece this piece works it creats the files and folder in /winnt/system32 folder

can any one help me please

cardnumber = rs.Fields("cardnumber").Value

rs.close

dim fs
dim filecontents
dim foldername

set fs=Server.CreateObject("Scripting.FileSystemObject")

set foldername=fs.CreateFolder("../memberscards"Session("UserName"))

set filecontents=fs.CreateTextFile("../memberscards"Session("UserName")&cardnumber".html",true)

[BigDaddy]

What error is being given? Make sure you have the friendly errors turned off on your browser by going to Tools-->Internet Options-->Advanced, and unclicking "show friendly errors". That will allow you to see a more detailed error message.

[Mhtml]

I believe that it may be because you are closing the recordset before doing the operation, try closing it afterwards.

[rcreyes]

Try this link from Microsoft Knowlegebase explaining the error you describe, and solutions

http://support.microsoft.com/default.aspx?scid=kb;en-us;Q311766

[glenngv]

set foldername=fs.CreateFolder("../memberscards" & Session("UserName"))

set filecontents=fs.CreateTextFile("../memberscards" & Session("UserName") & cardnumber & ".html",true)

[Bluemonkey]

i added the ampersand's and it works to make the file but its still makes the file in my c:\winnt\system32\ folder why is this? and how do i get it to create it where i want it to create it?

[glenngv]

try:

set foldername=fs.CreateFolder(server.mappath("../memberscards" & Session("UserName")))

set filecontents=fs.CreateTextFile(server.mappath("../memberscards" & Session("UserName") & cardnumber & ".html"),true)

but you need to add a "/" before the username and cardnumber, don't you?

set filecontents=fs.CreateTextFile(server.mappath("../memberscards" & Session("UserName") & "/" & cardnumber & ".html"),true)

[Bluemonkey]

that worked thank you very much