DAO conversion to NET

[JPTL]

Hi, when converting a DAO project all Data based on a DataSource can´t be upgraded, code bellow, how can i menage this?, Thanks 4 helping

 

If mess = CStr(MsgBoxResult.Yes) Then

'UPGRADE_ISSUE: Data property Data1.Recordset was not upgraded. Click for more: 'ms-help://MS.VSCC/commoner/redir/redirect.htm?keyword="vbup2069"'

Me.Data1.Recordset.Delete()

'UPGRADE_ISSUE: Data property Data1.Recordset was not upgraded. Click for more: 'ms-help://MS.VSCC/commoner/redir/redirect.htm?keyword="vbup2069"'

Me.Data1.Recordset.MoveFirst()

Else

'nada

End If

Edited April 15, 2003 by JPTL

[Robby]

I would setup a new controls using all new ADO.NET methods, I'm not sure how the upgrade wizard implemented the rest of your data controls, but I'm certain it's not pretty.

[JPTL]

Humm...i see, the conversion looks Good, why?, because the only things that´s not converted was, Data.Recordset Methods and the Load Form method, but this last one is easy to get a solution.

 

How can i handle this?, thanks;)

[Robby]

Can you post some of the code that pertains to Me.Data1.Recordset, because I have no idea how the wizard handled it.

[JPTL]

Ok, bellow is an example

 

Public Sub dInserir_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles dInserir.Click

Dim db As DAO.Database

Dim rs As DAO.Recordset

 

db = DAODBEngine_definst.Workspaces(0).OpenDatabase(letra)

rs = db.OpenRecordset("Select Max(n_cliente) As MC From DEPOSITARIOS")

 

'UPGRADE_ISSUE: Data property Data1.Recordset was not upgraded. Click for more: 'ms-help://MS.VSCC/commoner/redir/redirect.htm?

keyword="vbup2069"'

 

Me.Data1.Recordset.AddNew()

Me.Text1.Text = rs.Fields("MC").Value + 1

Me.Text2.Focus()

End Sub

 

 

OR THIS

 

If mess = CStr(MsgBoxResult.Yes) Then

Me.Data1.Recordset.Delete()

Me.Data1.Recordset.MoveFirst()

Else

'nada

End If