حاولت الحصول على معلومات عن اسم المستخدم الحالي لكن هناك خطأ في السطر الثاني من الكود
فحاولت كتابة الأمر
imports syste.direcortyserivece لكن لا توجد تلك namespae
'Dim DomainUser As String = System.Security.Principal.WindowsIdentity.GetCurrent.Name.Replace("\", "/")
'Dim ADEntry As New System.DirectoryServices.DirectoryEntry("WinNT://" & DomainUser)
'Dim FullName As String = ADEntry.Properties("FullName").Value
'Response.Write(FullName)