diff --git a/Customers/LKWs.aspx b/Customers/LKWs.aspx
index a18daba..7e468b6 100644
--- a/Customers/LKWs.aspx
+++ b/Customers/LKWs.aspx
@@ -308,7 +308,7 @@
};
}
-
+
+
\ No newline at end of file
diff --git a/Customers/LKWs.aspx.vb b/Customers/LKWs.aspx.vb
index bfedc49..838c419 100644
--- a/Customers/LKWs.aspx.vb
+++ b/Customers/LKWs.aspx.vb
@@ -400,7 +400,7 @@ Partial Class LKWS
- Public Shared Sub filltable2(Kennzeichen As String)
+ Public Shared Function filltable2(Kennzeichen As String) As Table
Dim tbl As Table = New Table
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
For Each l2 In list2
@@ -421,10 +421,11 @@ Partial Class LKWS
tr.Attributes.Add("style", "background-color:#ff2500;color:#fff;font-weight:400;")
tbl.Rows.Add(tr)
Next
- End Sub
+ Return tbl
+ End Function
- Public Shared Sub filltable_M(Kennzeichen As String)
+ Public Shared Function filltable_M(Kennzeichen As String) As Table
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(401940, Kennzeichen)
Dim Tbl As New Table
@@ -446,5 +447,6 @@ Partial Class LKWS
tr_M.Attributes.Add("style", "background-color:#ff2500;color:#fff;font-weight:400;")
Tbl.Rows.Add(tr_M)
Next
- End Sub
+ Return Tbl
+ End Function
End Class
diff --git a/qeqwe.txt b/qeqwe.txt
index 1911138..9da5b9a 100644
--- a/qeqwe.txt
+++ b/qeqwe.txt
@@ -19,7 +19,7 @@ Visual Studio does not include an English language pack:
-------------------------------------------------------------------------------
-Build ID: {30F97D92-5784-42DA-978C-0653408BBC2A}
+Build ID: {65520EA3-317D-46D0-8B57-3F01730ED0B6}
--------------------Build System Warning---------------------------------------
Current logging level may degrade build performance: