memanggil Windows Tools Menggunakan vb6
langsung ke tutorialnya aja :
siapkan :
command button (bebas mau berapa aja yang penting tau perintah-perintah commandPrompt)
1 Module
1. buatlah 1 module dan isikan code dibawah ini
2. buatlah button sesuai kebutuhan yang penting nyit-nyiterz tau perintah commandprompt
sebagai contoh lihat gambar dibawah ini :
lalu masukan code perintahnya :
Ok disini kita belajar ... untuk memanggil tools windows menggunakan vb6 bisa kelihatan dari codenya
ShellExecute Me.hWnd, vbNullString, "Tuliskan Tools Windows", vbNullString, "C:\", 1
Tulisan yang di Bold ialah jenis perintah yang ingin di munculkan.
langsung ke tutorialnya aja :
siapkan :
command button (bebas mau berapa aja yang penting tau perintah-perintah commandPrompt)
1 Module
1. buatlah 1 module dan isikan code dibawah ini
Public 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
2. buatlah button sesuai kebutuhan yang penting nyit-nyiterz tau perintah commandprompt
sebagai contoh lihat gambar dibawah ini :
lalu masukan code perintahnya :
Quote
Untuk Task Manager
ShellExecute Me.hWnd, vbNullString, "taskmgr.exe", vbNullString, "C:\", 1
Quote
Disk Cleaner
ShellExecute Me.hWnd, vbNullString, "cleanmgr.exe", vbNullString, "C:\", 1
Quote
Notepad
ShellExecute Me.hWnd, vbNullString, "Notepad.exe", vbNullString, "C:\", 1
Quote
Paint
ShellExecute Me.hWnd, vbNullString, "mspaint.exe", vbNullString, "C:\", 1
Quote
Security Center
ShellExecute Me.hWnd, vbNullString, "wscui.cpl", vbNullString, "C:\", 1
Quote
Registry Editor
ShellExecute Me.hWnd, vbNullString, "regedit.exe", vbNullString, "C:\", 1
Quote
Character Map
ShellExecute Me.hWnd, vbNullString, "charmap.exe", vbNullString, "C:\", 1
Quote
CommandPrompt
ShellExecute Me.hWnd, vbNullString, "cmd.exe", vbNullString, "C:\", 1
Quote
Windows Explorer
ShellExecute Me.hWnd, vbNullString, "explorer.exe", vbNullString, "C:\", 1
Quote
Control Panel
ShellExecute Me.hWnd, vbNullString, "control.exe", vbNullString, "C:\", 1
Quote
Disk Defragmenter
ShellExecute Me.hWnd, vbNullString, "dfrg.msc", vbNullString, "C:\", 1
Quote
System Information
ShellExecute Me.hWnd, vbNullString, "winmsd.exe", vbNullString, "C:\", 1
Ok disini kita belajar ... untuk memanggil tools windows menggunakan vb6 bisa kelihatan dari codenya
ShellExecute Me.hWnd, vbNullString, "Tuliskan Tools Windows", vbNullString, "C:\", 1
Tulisan yang di Bold ialah jenis perintah yang ingin di munculkan.
Posting Komentar