AYUDA, copiar imagenes Imagenes

[rishart]

Hola amigos aki les presento un problema que me surgio y no se como hacerle para solucionar el porblema.

resulta que con el commanddialog al seleccionar una imagen para copiar a la carpeta de raiz de mi sistema con un nombre que yo defino me marca un error y me dice que la imagen esta siendo usada, como le puedo hacer para que mi sistema no use la imagen cunado vaya a copiarla, aki le muestro el codigo que utilizo para copiar la imagen....

Código:

Me.CommonDialog1Open.FileName = "Logo2.jpg"

                    destino = My.Application.Info.DirectoryPath & "\"
                    If CommonDialog1Open.FileName <> "" Then
                        Call CopiarImagen(rutaImagen, destino & "Logo2.jpg")
                        sql4 = sql4 & "'" & destino & "Logo2.jpg','"
                    Else
                        sql4 = sql4 & "'','"
                    End If

y la funcion copiar esta asi::

Código:

On Error GoTo error_Renamed
        If blocked = False Then
            FileCopy(StartPath, EndPath)

        End If

        Exit Sub
error_Renamed: MsgBox(Err.Description, MsgBoxStyle.Exclamation, "Error")

sin mas por el momento les agradezco de antemano la atencion prestada esperando su ayuda o de alguna forma de como hacer le para copiar una imagen a mi carpeta de raiz con un nombre que esta establecido. gracias, saludos