The program is written in Word2003/VBA and reports these two files as duplicates by comparing their file contents, not their names. The MP3 tracks are 943Kb in size.
The two files are stored in the same folder “T:\Music\2018\201804\20180407\” and yet to this human eye the names appear to be identical.
Perhaps one of the hyphens is a hard-hyphen, or an optional hyphen or a soft hyphen. I write a comparisons procedure and it baulks at the hyphen, but the ASCII code reads “045” for each hyphen!
Code: Select all
Public Function ShowDelta(ByVal strFile1 As String, ByVal strFile2 As String)
While (Len(strFile1) > 0) And (Len(strFile2) > 0)
If Left(strFile1, 1) <> Left(strFile2, 1) Then
MsgBox strFile1 & vbCrLf & strFile2
Stop
Else
End If
strFile1 = Right(strFile1, Len(strFile1) - 1)
strFile2 = Right(strFile2, Len(strFile2) - 1)
Wend
'Sub TESTShowDelta()
' Call ShowDelta("Bach - 16 BWV 268 Auf auf mein Herz und du mein ganzer Sinn", "Bach - 16 BWV 268 Auf auf mein Herz und du mein ganzer Sinn")
'End Sub
End Function
My “Duplicates” application continues to report these two 1KB files as duplicates, and both files sit in the same folder “T:\Music\2018\201804\20180407\”.
I have appended “.TXT” to the names so that I can attach them to this post.
Your mission: Download the two text files to a folder and confirm that you are able to store two files with visibly the same name into a single folder.
We might then discuss options to resolve this strange issue.
I have been trying different things for six days now. Most recently half an hour ago, using PKZip2.5.exe to package the two files with MP3 extents (not allowed here!), but PKZip made a zip file with only ONE of the MP3 files in it, so PKZIP2.5 thinks that the two names are identical. Or else whatever PKZip2.5 uses to obtain the contents of a folder reports only one file in the folder.
P.S. In Preview mode here the hyphens appear to be different in elevation, and in Word2003, Insert Symbol I find Unicode for hyphens at 002D and 0335, so perhaps these are yet more foreign characters that Word2003/VBA ASC function chops down to 045 codes.
Yours in prayer
Chris