getopenfile_CLT

[2ippy]

Private Sub cmdBrowse_Click()
On Error GoTo err_cmdBrowse

    Me![txtPicture] = GetOpenFile_CLT("C:\", "Select the File")
    Me![txtPicture] = LCase(Me![txtPicture])
    Me!Picture.Picture = Me!txtPicture

exit_cmdBrowse:
    Exit Sub
    
err_cmdBrowse:
    MsgBox Error$
    Resume exit_cmdBrowse
End Sub

Can someone help me with this code please, it's from a 2000 sample and i need 2003.

I think it's the getopenfile_CLT

I'm going through the object brower but found nothing yet.