problemer med call i VBA

Måske hjælp her :

http://bytes.com/topic/access/answers/542668-shell-batch-file

det hjalp da lidt, men nu kan den ikke slete biblioteket igen vai RmDir kommandoen..

Private Sub UpdateImagePath_Click()
Dim folderexist As String
shell "S:\PMT\PMT2011\Import\copy_imagepath.bat"
shell "Y:\1. Assets - jpg billeder fra SL billeddatabase\Billeder\imagepath.bat"
NotOk:
If Dir("Y:\1. Assets - jpg billeder fra SL billeddatabase\Billeder\zzdonezz\", vbDirectory) = "" Then
GoTo NotOk
Else
DoCmd.OpenQuery "QryImagePathSZ4_Delete"
DoCmd.OpenQuery "QryImagePath_ReplacePath"
DoCmd.OpenQuery "QryImagePath_ReplaceBackslash"
DoCmd.OpenQuery "QryImagePath_EANNodots3"
RmDir "Y:\1. Assets - jpg billeder fra SL billeddatabase\Billeder\zzdonezz"
End If
End Sub

har været syg i længere tid derfor har der ikke været aktivitet fra min side. Er nu klar igen så venligst blot besvar så giver jeg point, da sagen ikke længere er aktuel
sorry...

No problemo
Håber du er på højkant igen