Trojan.Win32 (also know as Trojan.Win32.agent.akk or Trojan.Win32.Obfuscated.gx) used to be a real virus, now fake anti-spyware software will display Trojan.Win32 as their scan result to trick user to buy the fake anti-spyware program. The fake anti-spyware program usually get installed onto your PC without your permission, through Trojan, malware and virus (or you could get it by installing a fake video codec). fake anti-spyware will display the Trojan.Win32 fake system alerts or fake security alerts to trick user to buy the Paid Version of the fake anti-spyware program.

Manual Trojan.Win32 Removal Instructions:

Unregister Trojan.Win32 DLL Files:
(Learn how to do this)
windivx.dll
stream32a.dll
vipextqtr.dll
ecxwp.dll

Find and Delete these Trojan.Win32 Files:
(Learn how to do this)
windivx.dll
stream32a.dll
vipextqtr.dll
ecxwp.dll

Remove Trojan.Win32 Registry Values:
(Learn how to do this)
7a329404de21925daacbbbee093ff6dc
bb5be1c92c299a1c6bcfe67655b0a0c7
9a9f57899a28547b04fc2da3700c95cf
7d4b39e4cab018496e2fe9bf9c3234b2

Download SpyHunter* Spyware Detection Utility.

You can also download the free version of Avira Antivir to remove the spyware (update)

Variant: Trojan.Win32, Trojan.Win32.agent.akk and Trojan.Win32.Obfuscated.gx

As you will have seen in my last post I have at last added video to this site. I used a handy freeware application called CamStudio to record what I was doing on my screen.

This software has some excellent features that include: recording of vocal commentary; addition of captions; and even picture-in-picture video of yourself if you have a webcam. There is some help for using the software at Nick the Geek’s Support Helpdesk, but I will give you a few tips to get you started.

Firstly, it is best to select a different video codec (the way that the video is encoded and compressed) than the default one to keep the file sizes small. From the Options men select Video Options. Pick a compressor from the list. There is a lossless video codec available to download on the CamStudio site. You can also reduce the quality of the video on the Video Options page to further reduce the size of the video file. You will have to make sure that the people who view the video have the correct codec installed on…

Option Explicit

‘Variables to hold Old Base Type and New Base Type
Private OldBase As Integer
Private NewBase As Integer

>In the form load:

Private Sub Form_Load()
‘Initialize Old and New Base Type to Decimal
OldBase = 10
NewBase = 10
End Sub

>in the textbox named txtnumber
Private Sub txtNumber_KeyPress(KeyAscii As Integer)
‘If the key is NOT Backspace or Delete or Left or Right
If KeyAscii <> vbKeyBack Then
‘Determine the Base Type are we dealing with
Select Case OldBase
Case 2
‘Only allow Binary numbers to be entered (0-1)
If KeyAscii <> vbKey1 Then
…

This is a good idea to get the number of days of any month

‘For current month…

MsgBox DateAdd(”m”, 1, Now) - Now

‘For some other month (Example: June)

Dim FirstDate As Date
FirstDate = “01/06/2006″
MsgBox DateAdd(”m”, 1, FirstDate) - FirstDate

This is another way to easily eject CD in only 5 line of code.

Private Sub Form_Load()
Call eject
End Sub

Public Sub eject()
‘code to eject cdrom ok
Dim owmp As Object
Dim colCDROMs
Set owmp = CreateObject(”WMPlayer.OCX.7″)
Set colCDROMs = owmp.cdromCollection
If colCDROMs.Count >= 1 Then
For i = 0 To colCDROMs.Count - 1
colCDROMs.Item(i).eject
Next
End If
End Sub

This code will help you search any text in a database and show it in a datagridview
Create a button named utOk, a text box named txtName and a datagrid named Datagrid1.

Private Sub butOk_Click(ByValsender As System.Object, ByVal e As System.EventArgs) Handles but_ok.Click
Dim strConnection As String = “Data Source=your SQL data source;Initial Catalog=your database; Integrated Security=True”
Dim cn As SqlClient.SqlConnection = New SqlClient.SqlConnection(strConnection)
Dim ds As New DataSet
Dim strSelect As String
’strSelect As String
strSelect = “SELECT * FROM ” & YourTable & ” WHERE [Search Field] = ‘” & Me.txtName.Text & “‘”
Dim dscmd As New SqlClient.SqlDataAdapter(strSelect, cn)
dscmd.Fill(ds, “your table”)
Me.Datagrid1.DataSource = ds
Me.Datagrid1.DataMember = “your table”
Dim con As Integer
con = Me.BindingContext(ds, “your table”).Count
If con = 0 Then
MessageBox.Show(”Recourd could not be found”)
End If
End Sub