C:\Documents and Settings\thosiba\My Documents\Desarollo\VS
NET\ResTransitos\Trasitos\Trasitos\Principal.vb(265): El método 'CualAno'
tiene varias definiciones con firmas idénticas.
Private Sub CualAno(ByVal cual As String)
TransitosC = New ADODB.Connection
TransitosR = New ADODB.Recordset
Dim sSqlCargoC As String
Dim transitosDT As New DataTable
Dim transitosDA As New OleDb.OleDbDataAdapter
TransitosC.CursorLocation = ADODB.CursorLocationEnum.adUseClient
TransitosC.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & nbase)
sSqlCargoC = "select numero , ano , empresa , exportador , deposito from
traslados order by ano where ano = '" & cual '"
TransitosR.Open(sSqlCargoC, TransitosC, ADODB.CursorTypeEnum.adOpenKeyset,
ADODB.LockTypeEnum.adLockOptimistic)
End Sub
Gracias
Leer las respuestas