MDM UST, MSE-API, API-Einstellungen

This commit is contained in:
2024-08-20 09:27:26 +02:00
parent 1cd82d4a6f
commit 0bb8d59d97
3 changed files with 17 additions and 8 deletions

View File

@@ -156,10 +156,14 @@ Public Class usrCntlDatenarchiv
For Each r As DataGridViewRow In .Rows
If r.Cells("Param_value").Value IsNot DBNull.Value AndAlso r.Cells("Param_value").Value.ToString.StartsWith("\\") Then
DirectCast(r.Cells("open"), DataGridViewImageCell).Value = My.Resources.search
If r.Cells("Param_value").Value IsNot DBNull.Value AndAlso r.Cells("Param_value").Value <> "" Then
Dim path As New System.IO.DirectoryInfo(r.Cells("Param_value").Value)
If path.Exists Then
DirectCast(r.Cells("open"), DataGridViewImageCell).Value = My.Resources.search
End If
End If
Next