FileSystemObjetc

Hi everyone

Can i using file system object to rename my file since i can get file ?


Also,
Can anyone know how to using ASP to rotate image to maybe 90,180, 270 degree? Do anyone have the ASP component or where can I find it?



Need response ASAP

Thx in advance

Mac

[r0ach]

OK.

To rename a file, I would do this:

1.) Read the whole file
2.) Write it to a new file
3.) Delete old file

about the rotating picture, if you can't find a component to do it, write one.

[r0ach]

Let me be clearer about the rename:

<%
	Sub Rename(path, oldfile, newfile)
		set fso = Server.CreateObject("Scripting.FileSystemObject")
		'first check if path and oldfile is valid.  I skipped it.
		'assumed it's valid
		'also check if newfile exist.  we don't want to overwrite existing files
		oPath = path & oldfile
		nPath	= path & newfile
                'copy old file to new file
		fso.CopyFile oPath, nPath, False
                'delete old file
		fso.DeleteFile oPath, True
                Set fso = nothing
                ' you could leave out the path parameter,
                ' but then you must include it into each filename
	End Sub
	
	'Usage:
	Rename("C:\My Documents\", "Test1.txt", "Test2.txt")
%>

Should work. Haven't tested it.

[Edited by r0ach on 06-26-2000 at 07:53 AM]

[r0ach]

****, sorry. Made a mistake.
CopyFile method won't take new filename for destination. (I think)

Replace the whole "fso.copyfile" line in previous post with:

'open file
Set oF = fso.GetFile oPath
'create new file
Set nF = fso.CreateFile nPath, False 'don't want to overwrite existing file
'copy old file to new file
nF.Write oF.ReadAll
'close files
oF.Close
nF.Close