Sledecu funkciju koristim za dobijanje Windows korisnickog imena:
Code (vbnet):
<WebMethod()> _
Function Korisnik() As String
If TypeOf My.User.CurrentPrincipal Is WindowsPrincipal Then
Dim parts() As String = Split(My.User.Name, "\")
Dim korisnik As String = parts(1)
Return korisnik
Else
Return My.User.Name
End If
End Function
<WebMethod()> _
Function Korisnik() As String
If TypeOf My.User.CurrentPrincipal Is WindowsPrincipal Then
Dim parts() As String = Split(My.User.Name, "\")
Dim korisnik As String = parts(1)
Return korisnik
Else
Return My.User.Name
End If
End Function
Funkcija je smestena u web servisu i kada se pokrene potrebno je da vrati ime trenutno ulogovanog korisnika racunara na kome se servis nalazi! Medjutim kada se funkcija tj. web servis pokrene sa lokalnog racunara ona vraca ime korisnika ali kada se pokrene sa klijenta dobijam poruku:
-the supplied index is out of bounds
Da li neko zna kako da resim ovaj problem, ili kako najlakse da dobijem ime korisnika racunara na kome je postavljan web servis?
Hvala!
[Ovu poruku je menjao Shadowed dana 27.01.2010. u 15:20 GMT+1]
[Ovu poruku je menjao Comii dana 27.01.2010. u 15:56 GMT+1]