erste Tests

App_Code/WebService.vb

@@ -150,44 +150,5 @@ Public Class WebService
 
         myConn.Close() : Return lstCountries
     End Function
-    <WebMethod()>
-    Private Function buildtablerow(tbl As Table, SDLNumber As String, Bezstr As String, Datgueltigbisstr As String, KartNr As String) As Table
 
-        Dim row As TableRow = New TableRow
-        Dim c1 As TableCell = New TableCell
-        Dim c2 As TableCell = New TableCell
-        Dim c3 As TableCell = New TableCell
-        Dim c4 As TableCell = New TableCell
-
-        c1.Text = SDLNumber
-        c2.Text = Bezstr
-        c3.Text = Datgueltigbisstr
-        c4.Text = KartNr
-        row.Cells.Add(c1)
-        row.Cells.Add(c2)
-        row.Cells.Add(c3)
-        row.Cells.Add(c4)
-        tbl.Rows.Add(row)
-        Return tbl
-    End Function
-    <WebMethod()>
-    Private Function buildtablerow_M(tbl As Table, SDLNumber_M As String, Bezstr_M As String, Datgueltigbisstr_M As String, KartNr_M As String) As Table
-
-        Dim row As TableRow = New TableRow
-        Dim c1 As TableCell = New TableCell
-        Dim c2 As TableCell = New TableCell
-        Dim c3 As TableCell = New TableCell
-        Dim c4 As TableCell = New TableCell
-
-        c1.Text = SDLNumber_M
-        c2.Text = Bezstr_M
-        c3.Text = Datgueltigbisstr_M
-        c4.Text = KartNr_M
-        row.Cells.Add(c1)
-        row.Cells.Add(c2)
-        row.Cells.Add(c3)
-        row.Cells.Add(c4)
-        tbl.Rows.Add(row)
-        Return tbl
-    End Function
 End Class