| Public Sub DisplayOpenWith(strFile As String)
`***OPEN WITH DIALOG:
Örnek kullanım: DisplayOpenWith "C:uzantısıbelliolmayandosya.bvq"
`**************************************
On Error Resume Next
Shell "rundll32.exe shell32.dll, OpenAs_RunDLL " & strFile
End
Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir. |