Alternatif Cara untuk Menjalankan Aplikasi atau File Eksternal dari VFP
Berikut ini adalah alternatif cara yang teman - teman dapat gunakan untuk menjalankan Aplikasi atau File Eksternal dari Visual Foxpro. Ada beberapa alternatif source code yang dapat digunakan untuk melakukan hal ini, baik dari syntak bawaan Visual Foxpro, melalui Winapi atau melalui script objek bawaan VBScript. Mungkin kita langsung aja mencoba alternatif - alternatif tersebut. Berikut ulasannya :
Cara Pertama (Menggunakan Syntak Bawaan Visual Foxpro)
Source code bawaan Visual Foxpro yang digunakan menjalankan aplikasi dan file eksternal adalah sebagai berikut :
[ RUN / ! ] /N (Nama Aplikasi Eksternal)
Contoh 1
RUN /N Notepad
Contoh 2
! /N "C:\Program Files\Adobe\Reader 9.0\Reader\Acrord32.exe" ;
"C:\Tutorial.pdf"
Beberapa hal yang harus diperhatikan dalam menggunakan syntak bawaan Visual Foxpro dengan cara pertama diatas adalah sebagai berikut :
- Klausa RUN bisa diganti dengan !
- Klausa /N artinya adalah No Waiting, bila teman - teman menghilangkan klausa tersebut maka aplikasi eksternal yang dijalankan akan diiringi dengan sebuah konsol, dan konsol tidak akan hilang sampai teman - teman menutup aplikasi tersebut.
- (Nama Aplikasi Eksternal) adalah sebuah aplikasi atau file dengan ekstensi exe. Bila aplikasi tersebut adalah bawaan windows atau sudah diregistrasikan maka teman - teman bisa langsung mencantumkan nama aplikasi tersebut seperti pada Contoh 1. Akan tetapi secara normal teman - teman harus mencantumkan path lengkap untuk memanggilnya seperti Contoh 2, saat menjalankan aplikasi acrobat reader.
- Bila teman - teman ingin menjalankan file eksternal seperti Contoh 2 yaitu ingin menjalankan file dengan format PDF maka teman - teman harus mencantumkan default aplikasi untuk membaca file tersebut dan kemudian baru diikuti nama file eksternal yang ingin dibuka.
Cara Kedua (Menggunakan Function Shellexecute di WinAPI)
Alternatif lain dengan lebih banyak pilihan adalah dengan menggunakan function Shellexecute di WinAPI seperti di bawah ini :
&& Deklarasi ini harus dijalankan dulu sebelum menjalankan contoh - contoh di bawah
DECLARE INTEGER ShellExecute IN shell32;
INTEGER hwnd,;
STRING lpOperation,;
STRING lpFile,;
STRING lpParameters,;
STRING lpDirectory,;
INTEGER nShowCmd
Contoh 1
ShellExecute(0, "Open", "Notepad", "", "", 1)
Contoh 2
ShellExecute(0, "Open", ""C:\Tutorial.pdf"", "", "", 1)
Dengan menggunakan cara kedua ini kita akan lebih banyak mempunyai opsi dalam melakukan pemanggilan aplikasi file eksternal. Berikut kelebihannya :
- Tidak harus menyertakan default aplikasi untuk menjalankan sebuah file, contohnya bila ingin membuka file pdf kita tinggal tentukan aja lokasi dan nama filenya tanpa menentukan letak default aplikasi untuk membuka file pdf tersebut seperti cara pertama.
- Saat membuka aplikasi ada berbagai pilihan tampilan yang ditunjukkan pada angka 1 yang berwarna merah, pilhan selengkapnya adalah (0) Hide - Menjalankan aplikasi tetapi tidak menampakkan jendela aplikasinya, (1) Normal - Menjalankan aplikasi dengan tampilan default, (2) Minimized - Menjalankan aplikasi dengan jendela di Minimize, (3) Maximized - Menjalankan aplikasi dengan jendela di Maximized
- Selain itu teman - teman juga bisa memberikan parameter dan default directory untuk menjalankan aplikasi jika memang diperlukan.
Cara Ketiga (Menggunakan Objek Wscript Shell)
Alternatif terakhir untuk menjalankan aplikasi atau file eksternal ini menggunakan Objek Wscript Shell. Berikut cara penggunaannya :
Contoh 1
cRun=CREATEOBJECT("wscript.shell")
cRun.Run("notepad",1)
cRun=CREATEOBJECT("wscript.shell")
cRun.Run("c:\tutorial.pdf",1)
Dengan cara yang ketiga ini teman - teman tetap bisa mengatur tampilan jendela aplikasi berdasarkan angka 1 yang berwarna merah dan selain itu cara pemanggilan file eksternal juga tidak harus disertai pemanggilan default aplikasinya.
Untuk menentukan cara mana yang akan digunakan terserah teman - teman mana yang dianggap lebih sederhana dan mudah cara pakainya. Yang tepenting ada alternatif cara yang dapat dipilih, jadi jika satu cara dirasa tidak sesuai dengan keinginan maka bisa mencoba cara yang lain.
SEMOGA BERMANFAAT...!!
No comments :
Post a Comment