AccessTr.neT

Tam Versiyon: shell komutu hatası
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
oluşturduğum formdaki gridvievden dosya yolunu ve dosyayı açmak için program yolunu gösteriyorum ve butonla dosyayı aç dediğinde o dosyayı o programla açmasını isityorum. Şöyle bir kod yazdım ama programı açıyor dosyayı açmıyor.
Try
Dim blg, programı As String
programı = Chr(34) & tbxprogramınyolu.Text & Chr(34)
blg = tbxbelgeyolu.Text
Shell(programı & Chr(32) & blg, AppWinStyle.MaximizedFocus)
Catch ex As Exception
MsgBox("Belge Konumunda Yok!", MsgBoxStyle.Critical)
End Try

örnek doyayı koymak isterdim ama yaptığım program dev-expresle yapıldı başka bilgisayarlarda sorun yapabilirm. Tam bilmiyorum. 58 MB tuttu program.
Teşekkür ederim. Sorunu buldum.
Try
Dim blg, programı As String
programı = Chr(34) & tbxprogramı.Text & Chr(34)
blg = Chr(34) & tbxbelgeyolu.Text & Chr(34)
Shell(programı & Chr(32) & blg, AppWinStyle.MaximizedFocus)
Catch ex As Exception
MsgBox("Belge Konumunda Yok!", MsgBoxStyle.Critical)
End Try

yaptım oldu.