¡Caminando hacia el éxito!

Aprende en Comunidad

Avalados por :

Solução para o erro de conversão de tipo ao exportar e importar dados entre MySQL e SAP HANA no VB.NET 2010

  • Creado 01/03/2024
  • Modificado 01/03/2024
  • 3 Vistas
0
Cargando...

Olá Especialistas,

Recebi o erro:

Incapaz de fazer a conversão do objeto do tipo 'System.Data.DataSet' para o tipo 'System.Data.IDataReader'

após executar uma aplicação para exportar dados da tabela do banco de dados mysql e importar os dados na tabela do esquema hana. Ambas as tabelas estão configuradas com os mesmos códigos de campo e tipos de dados. Ambas as tabelas têm o mesmo nome de tabela, ou seja, Billing_Data. O nome do esquema no hana é Staging_Db. O nome do esquema no mysql é mysqlstg_db.

Minha aplicação foi desenvolvida usando vb.net 2010. A versão do sap hana é 1.0 para SAP Business One Hana. Não utilizei a API DI do SAP B1H.

#Region "Variável Comum"
  Private ComDset As New DataSet
#End Region
#Region "trabalho diário"

 Private Sub trfbilldata(ByVal DBSAddOn As String, ByVal TrfNum As String, ByRef sAccumErrMsg As String)
Dim...
Dim..

Me.Cursor = Cursors.WaitCursor
        myconn = New MySqlConnection
        myconn.ConnectionString = "server=" + sDBOrigin + ";" _
        & "user id=" + sDBUserName + ";" _
        & "password=" + sDBUserPassword + ";" _
        & "database=" + sDBName + ";"


  Try
            myconn.Open()
            SQL = "SELECT * FROM BILLING_DATA where " & _
                         " coalesce(RULE1,'')='' and coalesce(TrfNum ,'') = ''"

            myCommand.Connection = myconn
            myCommand.CommandText = SQL

            myAdapter.SelectCommand = myCommand
            myAdapter.Fill(myData)

            myconn.Close()


        Catch myerror As MySqlException
            MessageBox.Show("Erro: " & myerror.Message)
        Finally
            myconn.Dispose()
        End Try

        Dim filename As String
        Dim col, row As Integer
        Dim adp2 As New MySqlDataAdapter(SQL, myconn)
        Try
            ComDset.Reset()
            adp2.Fill(ComDset, "TTbl")
            If ComDset.Tables.Count <    
            
Pedro Pascal
Se unió el 07/03/2018
Pinterest
Telegram
Linkedin
Whatsapp

Sin respuestas

No hay respuestas para mostrar No hay respuestas para mostrar Se el primero en responder

contacto@primeinstitute.com

(+51) 1641 9379
(+57) 1489 6964

© 2024 Copyright. Todos los derechos reservados.

Desarrollado por Prime Institute

¡Hola! Soy Diana, asesora académica de Prime Institute, indícame en que curso estas interesado, saludos!
Hola ¿Puedo ayudarte?