Nu är det någonting jag inte ser. Det gäller att döpa om filer ifrån htm till aspRenama filer igen
    
    
<code>
Dim kolla As Variant, Path As String
  Dim GammaltFilNamn As String, NyttFilNamn As String
    
    Path = MultiLanguage.Dir1
    
    For Each File In fso.GetFolder(Path).Files
    GammaltFilNamn = Path & File.Name
    kolla = Split(File.Name, ".")
    NyttFilNamn = Path & kolla(0) & ".asp"
On Error GoTo errhandler
        If Dir(NyttFilNamn) <> "" Then
           Exit Sub
        ElseIf (GammaltFilNamn) <> "" Then
           Name GammaltFilNamn As NyttFilNamn
        End If
    Next
</code>
När jag med msgbox kollar GammaltFilNamn  inga problem.
När jag kollar NyttFilNamn heller inga problem.
Men, när skriptet kommer till "Name GammaltFilNamn As NyttFilNamn" då blir det
error "Err 53 file not found"
Jag kan inte hittar var jag skriver fel någonstans.
[REDIGERAT]
Jag hadde missat att lägga in ett "\".