arkadaşlar merhaba.
Daha önce kullandığım kodum aşağıda ki gibi. Herhangi bir değişiklik yapmadım ancak şimdi çalışmıyor. İnternetten bir çok araştırma yaptım bu konu ile alakalı işin içinden çıkamadım. Bu hatayı aşmanın bir yolu varmıdır.
Hata mesajı : Run-time error '5':
Invalid procedure call or argumant.
KOD :
Private Sub CommandButton1_Click()
Dim vPID As Variant
vPID = Shell("win3270.exe ""C:\Program Files\Microsoft Host Integration Server Client\System\win3270.exe""", vbNormalFocus)
Daha önce kullandığım kodum aşağıda ki gibi. Herhangi bir değişiklik yapmadım ancak şimdi çalışmıyor. İnternetten bir çok araştırma yaptım bu konu ile alakalı işin içinden çıkamadım. Bu hatayı aşmanın bir yolu varmıdır.
Hata mesajı : Run-time error '5':
Invalid procedure call or argumant.
KOD :
Private Sub CommandButton1_Click()
Dim vPID As Variant
vPID = Shell("win3270.exe ""C:\Program Files\Microsoft Host Integration Server Client\System\win3270.exe""", vbNormalFocus)