The VBUC incorporates the usage of the System.Data.Common library members in the translation process to ensure the generated code is taking advantage of the .NET framework 2.0 features. This option is recommended for the following scenarios:
Support for ADODC data control is added into this feature.
The member transformation for this data access technology is described as follows:
Class | Maps To |
ADODB.RecordSet | Artinsoft.VB6.DB.ADO.ADORecordSetHelper |
ADODB.Command |
System.Data.Common.DbCommand Example: System.Data.Common.DbCommand cmd = factory. CreateCommand(); |
ADODB.CommandTypeEnum | System.Data.CommandType |
ADODB.Connection |
System.Data.Common.DbConnection Example: GetFactory() will require database- provider-name paramater in order to use the non default provider. System.Data.Common.DbConnection conn = FactoryManager.GetFactory().CreateConnection(); |
ADODB.DataTypeEnum | System.Data.DbType |
ADODB.Field | System.Data.DataColumn |
ADODB.Fields | System.Data.DataColumnCollection |
ADODB.IsolationLevelEnum | System.Data.IsolationLevel |
ADODB.ObjectStateEnum | System.Data.ConnectionState |
ADODB.Parameter |
System.Data.Common.DbParameter Example: System.Data.Common.DbParameter p = factory. CreateParameter(); |
ADODB.ParameterDirectionEnum | System.Data.ParameterDirection |
ADODB.Parameters | System.Data.Common.DbParameterCollection |
ADODB.Stream |
System.IO.StreamWriter Example: new System.IO.StreamWriter() Note: The file name to open or create can be otained from the values used in LoadFromFile and SaveToFile methods. FileMode and FileAccess values could require some manual changes according to the values used in LoadFromFile and SavetoFile methods. |
ADODB.LockTypeEnum | Artinsoft.VB6.DB.ADO.LockTypeEnum |
ADODB.CursorLocationEnum | Artinsoft.VB6.DB.ADO.CursorLocationEnum |
ADODB.AffectEnum | Artinsoft.VB6.DB.ADO.AffectEnum |
ADODB.EventStatusEnum | Artinsoft.VB6.DB.ADO.Events.EventStatusEnum |
ADODB.EventReasonEnum | Artinsoft.VB6.DB.ADO.Events.EventReasonEnum |
ADODB.PositionEnum | Artinsoft.VB6.DB.ADO.PositionEnum |
This feature also supports the upgrade of the ADODC data control into a helper class. The supported classes are the following:
Class | Maps To |
MSAdodcLib.Adodc | Artinsoft.VB6.DB.ADO.ADODataControlHelper |
MSAdodcLib.EOFActionEnum | Artinsoft.VB6.DB.Controls.EOFActionEnum |
MSAdodcLib.BOFActionEnum | Artinsoft.VB6.DB.Controls.BOFActionEnum |
A brief source sample of this feature:
Public recRecordset As ADODB.Recordset Public ADODBConnection As New ADODB.Connection Private Sub Form_Load() Set ADODBConnection = New ADODB.Connection ADODBConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\TestDB.mdb;Mode=Read|Write;Persist Security Info=False" ADODBConnection.Open Set recRecordset = New ADODB.Recordset recRecordset.CursorLocation = adUseClient recRecordset.Open "select * from Countries", ADODBConnection, adOpenKeyset, adLockOptimistic, adCmdText recRecordset.Sort = "Name" recRecordset.MoveFirst End Sub
Public recRecordset As ADORecordSetHelper Private _ADODBConnection As DbConnection = Nothing Private Sub Form1_Load(ByVal eventSender As Object, ByVal eventArgs As EventArgs) Handles MyBase.Load ADODBConnection = Artinsoft.VB6.DB.AdoFactoryManager.GetFactory().CreateConnection() ADODBConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & My.Application.Info.DirectoryPath & "\TestDB.mdb;Mode=Read|Write;Persist Security Info=False" 'UPGRADE_TODO: (7010) The connection string must be verified to fullfill the .NET data provider conecction string requirements. More Information: http://www.vbtonet.com/ewis/ewi7010.aspx ADODBConnection.Open() recRecordset = New ADORecordSetHelper("") recRecordset.CursorLocation = CursorLocationEnum.adUseClient recRecordset.Open("select * from Countries", ADODBConnection, LockTypeEnum.adLockOptimistic) recRecordset.Sort = "Name" recRecordset.MoveFirst() End Sub
public ADORecordSetHelper recRecordset = null; private DbConnection _ADODBConnection = null; private void Form1_Load( Object eventSender, EventArgs eventArgs) { ADODBConnection = Artinsoft.VB6.DB.AdoFactoryManager.GetFactory().CreateConnection(); ADODBConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Path.GetDirectoryName(Application.ExecutablePath) + "\\TestDB.mdb;Mode=Read|Write;Persist Security Info=False"; //UPGRADE_TODO: (7010) The connection string must be verified to fullfill the .NET data provider conecction string requirements. More Information: http://www.vbtonet.com/ewis/ewi7010.aspx ADODBConnection.Open(); recRecordset = new ADORecordSetHelper(""); recRecordset.CursorLocation = CursorLocationEnum.adUseClient; recRecordset.Open("select * from Countries", ADODBConnection,LockTypeEnum.adLockOptimistic); recRecordset.Sort = "Name"; recRecordset.MoveFirst(); }
Note: The connection string might need some manual adjustments as explained in the EWI contained present in the source code.
9130 Jollyville Rd, Suite 175
Austin, TX 78759
Call us: +1 (425) 609-8458
info@wearegap.com