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 "\".