Archive for July, 2008

28
Jul
08

Virtual Server Error 0×00000003

Event Type: Error
Event Source: Virtual Server
Event Category: Virtual Server
Event ID: 1066
Date:  7/28/2008
Time:  8:31:49 PM
User:  NT AUTHORITY\NETWORK SERVICE
Computer: MH1
Description:
Virtual Server encountered an unexpected error, 0×00000003.

You can find a solution Here.

23
Jul
08

Sailing Photos Update

Click below to view my sailing photos.

img_30971

17
Jul
08

Windows Vista Clipboard Stopped Working

Frustrating.

If you are running Microsoft Virtual PC the problem is the Virtual Machine Additions. Either restart Virtual PC or see this to disable clipboard sharing.

10
Jul
08

Sharks

SHARKWATER

Please show your support HERE

If you haven’t seen it let me know – I’ll let you borrow mine.

sharkproject.com Wir kämpfen für Haie!

08
Jul
08

Ride the Wind!

This was my lunch break today.

03
Jul
08

Some new corals

03
Jul
08

Select row on DataGridView right click

This was the suggested way to acomplish a row select from a couple sources:

Private Sub dataGrid1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseUp

Dim pt = New Point(e.X, e.Y)

Dim hti As DataGrid.HitTestInfo = DataGridView1.HitTest(pt)

If hti.Type = DataGrid.HitTestType.Cell Then

DataGridView1.CurrentCell = New DataGridCell(hti.Row, hti.Column)

DataGridView1.Select(hti.Row)

End If

End Sub

Continue reading ‘Select row on DataGridView right click’

03
Jul
08

Kiteboarding Lesson 1

01
Jul
08

Installed Applications on remote PC in VB.NET

Compared to using a ManagementObjectSearcher this is much faster and will return all installed applications including MS patches.

Dim myServerName As String = “WAADESK1″

Const HKLM = &H80000002 ‘HKEY_LOCAL_MACHINE

Dim reg_hklm, key, subkey As RegistryKey

reg_hklm = RegistryKey.OpenRemoteBaseKey(RegistryHive.LocalMachine, myServerName)

key = reg_hklm.OpenSubKey(“Software\Microsoft\Windows\CurrentVersion\Uninstall”, False)

If Not IsNothing(key) Then

For Each temp In key.GetSubKeyNames()

subkey = key.OpenSubKey(temp, False)

If Not IsNothing(subkey.GetValue(“DisplayName”)) Then

Console.WriteLine(subkey.GetValue(“DisplayName”).ToString)

subkey.Close()

End If

Next

key.Close()

End If

Continue reading ‘Installed Applications on remote PC in VB.NET’




 

July 2008
M T W T F S S
« Jun   Aug »
 123456
78910111213
14151617181920
21222324252627
28293031