Advertisement
3_2004-2005 System Services/ Functions #149498

Easy ShellExecute replacement without API calls

With only a few lines of code you will be able to open any document with the associated executable file or, if no association present, you will be prompted to open the file with the program you choose. This can also be used to execute an executable file. No API calls used!

AI

AI 요약: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

소스 코드
original-source
Private Function ExecuteFile(ByVal FileName As String) As Boolean
 Dim myProcess As New Process()
 myProcess.StartInfo.FileName = FileName
 myProcess.StartInfo.UseShellExecute = True
 myProcess.StartInfo.RedirectStandardOutput = False
 myProcess.Start()
End Function
원본 댓글 (3)
Wayback Machine에서 복구됨