Kontakt til dataset giver ingen synlige resultater

Jeg har et projekt der kobler op til en webservice og uploader et dataset. En vellykket kontakt til webservicen skulle returnere et resultat-datasæt, men bortset fra det har jeg ikke nogen adgang til at redigere i webservicen. Programmet køres uden fejlmeddelelser, men jeg får ikke rigtig noget resultat af det og dataene bliver ikke uploaded.

Hvad mangler jeg mon?

Koden:

Imports WindowsApplication1.xx.www
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim myDataSet As System.Data.DataSet = minfunktion()
        Me.Visible = False
        Dim myservice As New XX_ListFunctions()
        Dim temp = myservice.XX_MasseUpdate("wsXX-nyheder", "kode", myDataSet)
    End Sub

    Public Function minfunktion() As System.Data.DataSet
        Dim csvPath As String = "c:\testkommasep.txt"

        Dim myDataSet As System.Data.DataSet = New System.Data.DataSet()

        Dim myDataTable As System.Data.DataTable = New System.Data.DataTable("XXXTabel")

        Dim myDataColumn As System.Data.DataColumn

        ' 1. kolonne
        myDataColumn = New System.Data.DataColumn("KOLONNE1")
        myDataColumn.DataType = System.Type.GetType("System.String")
        myDataTable.Columns.Add(myDataColumn)

        ' 2. kolonne
        myDataColumn = New System.Data.DataColumn("KOLONNE2")
        myDataColumn.DataType = System.Type.GetType("System.String")
        myDataTable.Columns.Add(myDataColumn)

        Using sr As System.IO.StreamReader = New System.IO.StreamReader(csvPath)
            Dim line As String

            Do
                line = sr.ReadLine()
                Dim lineArr As String() = line.Split(",")

                Dim myDataRow As System.Data.DataRow = myDataTable.NewRow()
                myDataRow("KOLONNE1") = lineArr(0)
                myDataRow("KOLONNE2") = lineArr(1)
                myDataTable.Rows.Add(myDataRow)
            Loop Until Not line Is Nothing

        End Using
        myDataSet.Tables.Add(myDataTable)
        dinfunktion = myDataSet
    End Function
End Class