AccessTr.neT

Tam Versiyon: Shell Komutu Hk.
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhaba arkadaşlar,
Geçerli db konumunda shell ile harici bir dosya açtırmaya çalışıyorum fakat invaild procedure  call or argument hatası alıyorum. 
Test için kullandığım komut ;


Dim p As Variant
p = CurrentProject.Path & "\resim.jpg"
Shell p


Şekilnde denedim. Ayrıca 
 
MsgBox p
 ile de dosya yolunu doğruladım fakat açamadım bir türlü. Yardım edebilir misiniz?
Kod:
Dim p As String
    p = CurrentProject.Path & "\resim.jpg"
    Call CreateObject("Shell.Application").ShellExecute(p)
(27/02/2020, 12:37)feraz yazdı: [ -> ]
Kod:
    Dim p As String
    p = CurrentProject.Path & "\resim.jpg"
    Call CreateObject("Shell.Application").ShellExecute(p)

Teşekkürler üstad. Sorun çözüldü (:
Rica ederim.Parantez içindeki p nin sağına , korsanız dosya açılma olayları çıkar tam ekran gibi.