ShellExecute с несколькими параметрами запуска - VB

Формулировка задачи:

Помогите!! Уже который день мучаюсь! Возникают проблемы при прогрузке dbf файла в таблицу Oracle. Дело в том, что кодировка dbf - 866, а таблицы Oracle - 1251. В следствие чего русские буквы отображаются непонятными символами. Пробую сделать это через программу, написанную на foxpro (cpzero.prg). Работаю через shellexecute, вот тут-то и возникает проблема. В программу необходимо передать 2 параметра (файл для перекодировки и саму кодировку) не могу понять как это правильно написать. Сейчас у меня это выглядит так:

                    Листинг программы
                
 
                        
                          
                    
Private Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long _
) As Long
 
Sw_normal = 0
 
ShellExecute 0, "open", "cpzero.prg", "D:\wwwdbfmp\397cnt14.dbf, 1251", "D:\CodePage\", Sw_normal

Ну и после отработки ничего не меняется. Помогите пожалуйста, очень нужно!

Решение задачи: «ShellExecute с несколькими параметрами запуска»

textual
                            Листинг программы 
                        
ShellExecute 0&, "open", "foxpro.exe", """D:\CodePage\cpzero.prg"" ""D:\wwwdbfmp\397cnt14.dbf"" 1251", "c:\program files\foxpro", Sw_normal