Saturday, 13 May 2017

Mengatasi Masalah SendKeys Pada VB6 di Windows 8

Sendkeys() adalah suatu perintah yang digunakan program untuk memerintahkan keyboard menekan suatu tombol seperti Tab atau Home atau End atau yang lainnya. Perintah ini biasanya sering digunakan oleh programmer VB agar program yang dibuat lebih atraktif. Namun fungsi ini bermasalah jika source code dijalankan di Windows 8 atau yang lebih baru. Permasalahan tidak akan muncul jika yang dijalankan adalah file exe hasil compilasi.


Jika code dijalankan maka akan muncul error: Run-time error 70: Permision Denied seperti gambar dibawah ini.










Untuk mengatasi hal tersebut ganti perintah Sendkeys dengan CreateObject("WScript.Shell").SendKeys "{tab}".
Contoh:
Sendkeys "{tab}"
diganti dengan
CreateObject("WScript.Shell").SendKeys "{tab}"

1 comment:

SQL Order By

SQL Order By digunakan untuk melakukan pengurutan data berdasarkan kolom tertentu. Sintak dasar dari SQL Order  By adalah: SELECT field1, fi...