Hallo zusammen,

ich brauch wieder einmal eure Hilfe.
Ich habe ein Formular, über das ich über einen Button in einen Windows-Ordner springen und dort dann Bilder abzuspeichern bzw. anzusehen kann. Der Computer springt automatisch in den Ordner, der den gleichen Namen des Datensatz hat. Der Datensatz besitzt eine QM-Nr. und der Ordner wird gleich genannt. Die QM-Nr. ist wie folgt aufgebaut: Zuerst die „08“ für das aktuelle Jahr und dann die „001“, „002“, „003“… für den Auftrag; Folglich also „08001“, „08002“, 08003“
Bis jetzt funktioniert auch alles wunderbar, doch nun soll ich einen Altbestand von ca. 1000 Ordnern einbinden, deren Namen zwar mit der QM-Nr. beginnen aber danach noch etwas folgt (z.B. „01005 Pleuel“ ).
Mein jetziger Code ist:

Private Sub Befehl37_Click()
Dim Pfad As String
Pfad = "D:\Tobias\" & Me.QM_Nr
If Dir(Pfad, vbDirectory) <> "" Then
Me.Application.FollowHyperlink Pfad
Else
MkDir (Pfad)
Me.Application.FollowHyperlink Pfad
End If
End Sub

Gibt es eine Möglichkeit, dass der Computer nicht den kompletten Ordnernamen vergleicht sondern nur die ersten fünf Stellen heranzieht??
Bitte um eure Hilfe.
Schon mal Danke.

Gruß Tobias

PS:Ich verwende Access 07