"Birlikte Aç" Kutusu Nasıl Çıkartılır?
İşte size küçücük bir püf noktası, yaptığı iş ise çok basit: dosya ilişkilendirmeye yarayan "Birlikte Aç" kutusunu karşınıza getiriyor ve paramatre olarak verdiğiniz dosyayı istediğiniz bir programla açmanıza olanak tanıyor. Private Sub Command1_Click() ' Komut butonuna tıklandığındaDim x As Longx = Shell("rundll32.exe shell32.dll,OpenAs_RunDLL dosyaadi.xxx")End Sub
İşte size küçücük bir püf noktası, yaptığı iş ise çok basit: dosya ilişkilendirmeye yarayan "Birlikte Aç" kutusunu karşınıza getiriyor ve paramatre olarak verdiğiniz dosyayı istediğiniz bir programla açmanıza olanak tanıyor. Private Sub Command1_Click() ' Komut butonuna tıklandığındaDim x As Longx = Shell("rundll32.exe shell32.dll,OpenAs_RunDLL dosyaadi.xxx")End Sub