GameMaker Studio with Visual Studio 2013 settings

If you are trying to use GamerMaker Studio wih Visual Studio 2013 and getting the error Unable to validate WinJS API Reference even though you prepared the requirements you have to change the settings to point to Visual Studio 2013 directory and change the WinJS version to 2 like in the following screenshot:

Game Maker VS2013

Note that I have pointed the Windows SDk to 8.1 since I’ve got Windows 8.1.



Crystal Reports Unknown Database Connector Error

I was working on a report which involved several tables and relationships between these tables.

I made sure that I’ve loaded and filled the table sources I tried launching my report but kept on getting the error “Unknown Database Connector Error”.

After a little bit of debugging what I suspected was true. You have to make sure that the tables or the tables’ links are executed in a correct order that doesn’t break the relations.
Basically it is best to load the father tables and then children tables.

To do that open the Database Expert which comes with Crystal Reports -> Links -> Order Links

Crystal Reports Link Order

It worked for me without checking the “Link ordering is enforced”.

Hope this helps 🙂


Editable bound DataGridView ComboBox

A bound DataGridView ComboBox Column doesn’t allow user input. You might come across a situation where you need to make it easier for the user to select an item from the ComboBox and at the same time allow them to just enter free text.

The trick is to make the ComboBox column without a DataSource and then you load the items by code. Also you have to handle a couple of stuff such as the EditingControlShowing event to convert the ComboBox style to be DropDown instead of DropDownList, and some other handling to commit the ComboBox change.

I will leave you with the code:

Private Sub MyForm_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

    'Get ComboBox items

    'Fill the ComboBox
    Dim row As DataRow
    For Each row In Me.MyDataSet.ComboBoxTable
        'Generic list used as a trick to have the ComboBox Items added with Value
        MyComboBox.Items.Add(New GenericListItem(Of String)(row.Item("ColName"), row.Item("ColValue")))



    'Adding Grid handler to detect change in run time
    AddHandler MyDataGridView.CurrentCellDirtyStateChanged, AddressOf MyDataGridView_CurrentCellDirtyStateChanged

End Sub

'Change ComboBox style to DropDown
  Private MyDataGridView_EditingControlShowing(ByVal sender As Object, ByVal e As MyDataGridViewEditingControlShowingEventArgs) Handles MyDataGridView.EditingControlShowing
        If TypeOf e.Control Is ComboBox Then
Dim cb As ComboBox = TryCast(e.Control, ComboBox)

            cb.DropDownStyle = ComboBoxStyle.DropDown
        End If

'When an item is selected from the ComboBox update the cell value
        If MyDataGridView.Columns(MyDataGridView.CurrentCell.ColumnIndex).Name = "MyComboBox" Then
Dim selectedComboBox As ComboBox = DirectCast(e.Control, ComboBox)
            RemoveHandler selectedComboBox.SelectionChangeCommitted, AddressOf selectedComboBox_SelectionChangeCommitted
            AddHandler selectedComboBox.SelectionChangeCommitted, AddressOf selectedComboBox_SelectionChangeCommitted

        End If

    End Sub

Private Sub selectedComboBox_SelectionChangeCommitted(ByVal sender As Object, ByVal e As EventArgs)

        Dim selectedCombobox As ComboBox = DirectCast(sender, ComboBox)
        If selectedCombobox.SelectedItem IsNot Nothing Then

            'Use the List we created earlier so we could retrieve the Value instead of the diplayed text
            Dim oItem As GenericListItem(Of String) = CType(selectedCombobox.SelectedItem, GenericListItem(Of String))

            Me.MyDataGridView.Item("ColumnName", MyDataGridView.CurrentCell.RowIndex).Value = oItem.Value()

        End If

    Catch ex As Exception

    End Try
End Sub

Private Sub MyDataGridView_CurrentCellDirtyStateChanged(ByVal sender As Object, ByVal e As EventArgs) Handles MyDataGridView.CurrentCellDirtyStateChanged
    'Commit the change which was in run time so the Value changed event happens and then allow one check box
    If MyDataGridView.IsCurrentCellDirty Then
    End If
End Sub

Private Sub MyDataGridView_CellValidating(sender As Object, e As System.Windows.Forms.MyDataGridViewCellValidatingEventArgs) Handles MyDataGridView.CellValidating

    'Allow user to enter new values for all MyDataGridViewComboBox controls in the MyDataGridView
    If (TypeOf CType(sender, MyDataGridView).EditingControl Is MyDataGridViewComboBoxEditingControl) Then
        Dim cmb As MyDataGridViewComboBoxEditingControl = CType(CType(sender, MyDataGridView).EditingControl, MyDataGridViewComboBoxEditingControl)
        If Not cmb Is Nothing Then
            Dim grid As MyDataGridView = cmb.EditingControlMyDataGridView
            Dim value As Object = cmb.Text
            '// Add value to list if not there
            If cmb.Items.IndexOf(value) = -1 Then
                '// Must add to both the current combobox as well as the template, to avoid duplicate entries...
                Dim cmbCol As MyDataGridViewComboBoxColumn = CType(grid.Columns(grid.CurrentCell.ColumnIndex), MyDataGridViewComboBoxColumn)
                If Not cmbCol Is Nothing Then
                End If
            End If
            grid.CurrentCell.Value = value
        End If
    End If

    ''Following Works for a specific combobox ///////////

    'If e.ColumnIndex = MyMyDataGridView.Columns("MyDataGridViewComboBoxColSize").Index Then 'CType(sender, MyDataGridView).CurrentCell.ColumnIndex

    ' 'Dim cmb As ComboBox = CType(e.Control, ComboBox)

    ' Dim cmb As MyDataGridViewComboBoxEditingControl = CType(CType(sender, MyDataGridView).EditingControl, MyDataGridViewComboBoxEditingControl)

    ' If Not cmb Is Nothing Then

    ' Dim grid As MyDataGridView = cmb.EditingControlMyDataGridView

    ' Dim value As Object = cmb.Text

    ' '// Add value to list if not there

    ' If cmb.Items.IndexOf(value) = -1 Then

    ' '// Must add to both the current combobox as well as the template, to avoid duplicate entries...

    ' cmb.Items.Add(value)

    ' Dim cmbCol As MyDataGridViewComboBoxColumn = CType(grid.Columns(grid.CurrentCell.ColumnIndex), MyDataGridViewComboBoxColumn)

    ' If Not cmbCol Is Nothing Then

    ' cmbCol.Items.Add(value)

    ' End If

    ' grid.CurrentCell.Value = value

    ' End If

    ' End If

    'End If
End Sub

Public Class GenericListItem(Of T)
    Private mText As String
    Private mValue As T

    Public Sub New(ByVal pText As String, ByVal pValue As T)
        mText = pText
        mValue = pValue
    End Sub

    Public ReadOnly Property Text() As String
            Return mText
        End Get
    End Property

    Public ReadOnly Property Value() As T
            Return mValue
        End Get
    End Property

    Public Overrides Function ToString() As String
        Return mText
    End Function
End Class

I hope this helps, and if you have any question let me know.

Happy coding 🙂


Learn SharePoint 2010 without installations or top hardware

So you have decided you want to get into SharePoint, but you find out that you need to have a pretty strong machine to run it. Actually the latest SharePoint 2010 needs 6 GB of RAM as a starting point to run well and a 64 bit Windows 2008 operating system.

You could actually learn without installing a thing! Yes. Microsoft offers a great service called MSDN Virtual Labs.MSDN vlab Using these Virtual Labs you can test and try almost every Microsoft technology and product. And of course SharePoint Virtual Labs is one of them. In the Lab courses you get to learn and have hands-on experience. They even include software which you would need like SharePoint Designer. Really helpful.

So go on and have fun Smile


Make Connectify work with Avast

Recently I updated Connectify to version 3.1 and it just stopped working.

After sometime of trial and error I found out that Avast Antivirus(I have Avast Internet Security) was blocking some essential ports which Avast uses.

Basically what needs to be done are two things:

  1. Enable the Internet Sharing mode in the Firewall settings

    Enable Sharing Mode

  2. Enable some Firewall packet rules for the application ConnectifyNetServices.exe

    Enable some Packet Rules

That’s set, your ready Smile go ahead and try it.


Microsoft and Hadoop

Looks like Microsoft is going to start integrating Hadoop based services in its server and database products. The services will be implemented in Windows Server, Azure and SQL Server 2012.

Hadoop open source project which is if I may say for cloud and distributed computing came to the picture as I  remember when Yahoo announced that they will be using it to store their data. That was long time ago. Later I also learned that other companies which need to manage their big volume of data like Google actually uses it too.

The good thing is that according to Microsoft’s statement is that existing Microsoft Business Intelligence tools will be compatible with Hadoop implementation.

Microsoft’s Hadoop’s efforts already showing results like a Hadoop to SQL Server connector for importing and exporting and an ODBC driver for Hive for real time querying from business intelligence tools into Hadoop.

Microsoft promised that they will contribute back whatever changes or additions they make and will commit to make it compatible with the open source project.

I love SQL Server and I’m glad to see this move from Microsoft. Hopefully this will help better manage big data requirements.