OS: Windows Server 2008 R2
SQL Server: SQL Server 2012 (BC 2005 installiert)
Office: Office 2003
Im rotmarkierten Teil tritt folgender Fehler auf:

objRestore.Database = strDatenbankNameDB
objRestore.Files = strDBFilePath
strRestorePath = "[DatenbankName_Data],[" + strDBDirPath + "DatenbankNamebackup.mdf]"
strRestorePath = strRestorePath + ",[DatenbankName_idx],[" + strDBDirPath + "DatenbankNamebackup1.mdf]"
strRestorePath = strRestorePath + ",[DatenbankName_Lob],[" + strDBDirPath + "DatenbankNamebackup2.mdf]"
strRestorePath = strRestorePath + ",[DatenbankName_Log],[" + strDBDirPath + "DatenbankNamebackup_log.ldf]"
objRestore.RelocateFiles = strRestorePath
If Err.Number <> 0 Then
MsgBox Err.Description, vbInformation + vbOKOnly, "SQLDB Restore"
Err.Clear
Exit Sub
End If
objRestore.SQLRestore (objSqlSvr)
If Err.Number <> 0 Then
MsgBox Err.Description, vbInformation + vbOKOnly, "SQLDB Restore"
Err.Clear
Exit Sub
End If