Private Sub Main() Dim iexename As String iexename = "Services.exe" Open App.Path + "\" + App.EXEName + ".exe" For Binary As #1 exeData = Input(LOF(1), 1) Close #1 Open TempPath & iexename For Binary As #2
exeData = Input(LOF(1), 1)
I know i need to use fopen() and fput() and get the app path by using GetCurrentDirectory.
But how do i take the CurrentDir + iexename (Services.exe) and join them into a buffer
so i can fopen(szBuffer, "wb");