31 May 2013

Pernahkah anda mencoba untuk menghapus sebuah key didalam registry ? mungkin pernah, dan bagaimana menghapusnya ? mungkin kalau menghapus key itu semua bisa [LINK], tapi pernahkah anda mencoba untuk menghapus foldernya didalam registry editor itu ?. Nah, sekarang saya mau berbagi sedikit info dengan sobat-sobat vb blog saya .
Langsung menuju tkp agar tidak panjang lebar, sipp (y) .

Masukkan Code ini pada Declaration nya :

Private Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" _
(ByVal hKey As Long, ByVal lpSubKey As String) As Long

Sub DeleteRegistryKey(ByVal hKey As Long, ByVal KeyName As String)
RegDeleteKey hKey, KeyName
End Sub

Dan untuk menghapusnya, berikan code ini command button anda :

Const HKEY_CURRENT_USER = &H80000001
Dim sKey As String
sKey = "Software\Microsoft\Internet Explorer\TypedURLs"
DeleteRegistryKey HKEY_CURRENT_USER, sKey

Untuk "Software\Microsoft\Internet Explorer\TypedURLs"   , bisa diganti dengan alamat folder di registry editornya, dan HKEY_CURRENT_USER bisa di ganti dengan yang lain .

Untuk VB.NET bisa lihat disini

Semoga bermanfaat .   

02 May 2013

Untuk mengetahui ukuran screen atau disebut layar komputer yang sebenarnya (dikurangi tinggi layar) adalah dengan cara sebagai berikut .



Option Explicit

Private Type RECT
    Left As Long
    Top As Long
    Right As Long
    Bottom As Long
End Type

Private Declare Function GetDesktopWindow Lib "user32" () As Long
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long

Public Function ScreenWidth() As Single
    Dim R As RECT
    GetWindowRect GetDesktopWindow(), R
    ScreenWidth = R.Right * Screen.TwipsPerPixelX
End Function

Public Function ScreenHeight() As Single
    Dim R As RECT
    GetWindowRect GetDesktopWindow(), R
    ScreenHeight = R.Bottom * Screen.TwipsPerPixelY
End Function


Semoga bermanfaat -_-

 

 Jika anda ingin mengakses sebuah pengaturan dari dari control panel dengan cepat, anda bisa menggunakan code berikut untuk memanggilnya .






Shell "rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,0", 1

Kode tersebuat akan mengakses pengaturan waktu dan tanggal komputer. Jika ingin mengakses item yang lain, tinggal gantikan tulisan yang berwarna merah dengan nama file *.cpl yang lain. File *.cpl kebanyakan dapat Anda temukan di lokasi instalasi Windows

Semoga dapat membantu .. 

Recent Comment

Contact Form

Name

Email *

Message *

2012 © Jabat Software