GPO ile Local Administrator Şifresi Değiştirme ve Enable Yapma

strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")
objUser.SetPassword "Yeni Şifre"
objUser.AccountDisabled = False
objUser.SetInfo

Yukarıdaki kodu logo.vbs adıyla kaydedin. Ardından Sysvol dizinine dosyayı kopyalayın.

Son olarak aşağıdaki sıra ile GPO oluşturup, ilgili bilgisayar gruplarınızı bu GPO ile ilişkilendirin.


Resimler yalnızca GPO 'nun nasıl oluşturulacağına dair bilgi vermek içindir.

Detaylar

Fast reporta dışarıdan sorgu ekleme

Bu makalemizde fastreportta oluşturulan raporlara exe’ye müdahale etmeden AdoQuery ile yeni alanlar eklemekten bahsedeceğim
örneğin yazdığınız programda bir çok alanı öngörerek sorgunuza eklediniz ve harika çalışıyor hatta son kullanıcınında dizayn edebileceği bir yapı kurdunuz kendisi sağa sola çekiyor renkleri değiştiriyor istediği gibi dizayn edebiliyor ancak o da ne ihtiyacı olan bir alanı bulamıyor ve sizinde gözünüzden kaçmış bunun için sizin sorguya ilave etmeniz ve yeni bir exe göndermeniz gerekiyor bir çuval

incir berbat oldu yarın başka bir müşteri başka bir alan istemeye başladı vs.vs. bunun için yapmanız gereken püf nokta sorgunuza anahtar alanları eklemeyi unutmamış olmanız yeterli ve sonrasında fast report dizayn ekranında kod kısmını kullanarak
ihtiyacınız olan alanları join edebilirsiniz
basit bir örnek vereceğim
de görüldüğü gibi yeni bir memo ekliyoruz ve memo seçili iken

 onbeforeprint eventına çift tıklayak kod kısmının açılmasını sağlıyoruzdaha sonra data kısmına girerer bir  adoconnection ve bir adoquery ekliyoruz ve bağlantı ayarlarımızı yaparak
kod kısmına geri dönüyoruz

resimdeki sorguyu datasette olan bir alan ile join ederek yeni memoları ihtiyacınıza göre kullanıyoruz

umarım ihtiyaç sahibi arkadaşlara faydalı olacaktır.

Bu Yazı : http://www.mustafasoy.com.tr 'den alınmıştır.

Detaylar