Dim newEggRow As MainDS.EggsRow
newEggRow = MainDS.Eggs.NewEggsRow()

newEggRow.Nick = txtEggNick.Text
newEggRow.Mode = 0
newEggRow.IP = cbEggIP.SelectedItem
newEggRow.Network = txtEggNetwork.Text
newEggRow.Server = txtEggServer.Text
newEggRow.Userfile = 0
newEggRow.Port = txtEggPort.Text
MainDS.Eggs.Rows.Add(newEggRow)


' this is not working for me is there something i am missing
' refering to http://msdn2.microsoft.com/en-us/library/5ycd1034(VS.80).aspx
' any help would be much appreciated