2 Computereinträge pro User

Dokumentation/SMB.vb

@@ -2,7 +2,7 @@
 
 Public Class SMB
 
-    Property fileserver As String = "pandorasbox.verag.ost.dmn"
+    Property fileserver As String = "stor10.verag.ost.dmn"
     Dim ds As New DataSet
     Private Sub SMB_Load(sender As Object, e As EventArgs) Handles Me.Load
         Class1.EnableDoubleBuffered(dgv)
@@ -31,7 +31,7 @@ Public Class SMB
             .AutoResizeColumn(2)
             .AutoResizeColumn(3)
         End With
-        counter.Text = dgv.Rows.Count
+        counter.Text = fileserver & " " & dgv.Rows.Count
 
     End Function