Desktop

I don't know about the CD burner, but here's a little program to help you rename files to a short name:

Private Sub RecurseFolders(sStartPath As String)
Dim oFSO As Scripting.FileSystemObject
Dim oFolders As Scripting.Folders
Dim oFolder As Scripting.Folder
Dim oSubFolder As Scripting.Folder
Dim oFiles As Scripting.Files
Dim oFile As Scripting.File

Set oFSO = New Scripting.FileSystemObject
Set oFolder = oFSO.GetFolder(sStartPath)
Set oFiles = oFolder.Files
For Each oFile In oFiles
oFile.Copy oFile.ParentFolder & "\" & oFile.ShortName
Next

Set oFolders = oFolder.SubFolders
For Each oSubFolder In oFolders
RecurseFolders oSubFolder.Path
Next
End Sub

Private Sub Command1_Click()
RecurseFolders "d:\workspaces\test\"
End Sub

Just give it a start path, and it will recurse the folder structure from there.

I use a freeware program called 'THE Rename' to manage files in Windows 98/ME. It identifies (too) long filenames and can also logically rename as well.

I don't know if the program will work with W2000, but include the link in case other people using W9x have the same problem. It has other features eg allows editing of MP3 ID tags, though I havn't tested them yet.

http://www.herve-thouzard.com/therename.phtml

Hope it works for you on W2000.

I use a program called Nero.... www.nero.com to do the buring that I do. I will automatcailly rename the files for me, since there seems to be a limit on the file length and directory path that a cd can handel.

This question was auto closed due to inactivity