Visual Basic Runas Application Module

Visual Basic Runas Application Module

Domain ortamında kullanıcı hesaplarında uygulama çalıştırmanız için yönetici yetkisi gereken durumlar olur ve kullanıcıya admin şifresini vermeniz yada local admin yetkisi vermeniz sizi çileden çıkaran bir durumdur.  Ancak uygulama desteklemediği için çözümsüz kalırsınız.

Bu yüzden bu durumu sadece o uygulama için çözmeniz gerekir. Bu işlem için VB 6.0 ile hazırlanmış bir modül mevcut. ve kullanıcıya şifreyi vermek yerine bu uygulama ile admin olarak açılmasını sağlayabilirsiniz.

hazırladığınız vb 6.0 uygulamasına ekteki modul dosyasını indirerek ekleyiniz

daha sonra form load olayına aşağıdaki kodu kullanıcı bilgileri ile yazınız

Res = RunAs(username, password, application.exe)
End

bu durumda yeni oluşturduğunuz uygulama belirtilen exe dosyasını kullanıcı yetkisi ile açacak
ve kendini kapatacaktır. Böylelikle siz uygulamayı admin yetkisi ile açmış olacaksınız. ve şifrenizi kullanıcıya vermenize gerek kalmayacaktır. ancak bu dosyanın ve çalıştırılacak diğer dosyanın kopyalanmasına, silinmene, ve değiştirilmesine karşı yetki kısıtlaması yapmanız gerekmektedir. aksi durumda exe adını değiştirerek kendi uygulamasının çalışmasını
sağlayabilir. ayrica uygulamanin kopyalanip baska bir yerde calistirilmasina karsi onlem almamiz gerekiyor

uygulamanin calistirildi klasor farkli ise calistirmasin ve hata versin

If Lcase(App.Path) = "app.path" Then
Res = RunAs("username", "password", "application.exe")
Else
MsgBox "cakallik yapmayalim"
End If

bu durumda baska bir klasore kopyalanip calistirildiginda cakallik yapmayalim uyarisini verecektir.

Saygılarımla,

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir