Terminallerde görev çubuğunun gösterilmemesi

[fyndhern]

Yine aynı şekilde bu kodu kullanarak yapabilirsiniz, mesela

FSO.CopyFile "\\serverIPadresi\klassörünAdı","C: \DOCUME~1\"+strUserName+"\STARTM~1\&quot ;

Fakat bu durumda bilgisayarlarını her açtıklarında bu dosyalar tekrar ve tekrar masaüstüne kopyalanacaklar. Bence bunu yapmanıza hiç gerek yok, ben olsam ana makina da bir paylaşım klasörü oluşturup bu klasörü tüm bilgisayarlara map eden bir script yazar ve bu maplanmiş klasörü de masaüstüne kısayol olarak oluşturan bir script daha yazardım, böylece istemci makinelarda program kurmanıza bile gerek kalmaz, tabi bu durumda server olan cihazın biraz ram desteğine ihtiyacı olabilir.

[ekinonline]

ben olsam ana makina da bir paylaşım klasörü oluşturup bu klasörü tüm bilgisayarlara map eden bir script yazar ve bu maplanmiş klasörü de masaüstüne kısayol olarak oluşturan bir script daha yazardım, böylece istemci makinelarda program kurmanıza bile gerek kalmaz, tabi bu durumda server olan cihazın biraz ram desteğine ihtiyacı olabilir.


map eden script i ve bunu masaüstüne kopyalama işlemini gösterirseniz sevinirim

[fyndhern]

'Daha önceden bağlanmış olan sürücüleri kopart

On Error Resume Next
Set NetworkBagla = WScript.CreateObject("WScript.Network&quot
Set BagliSuruculer = NetworkBagla.EnumNetworkDrives
For i = 0 To BagliSuruculer.Count - 1 Step 2
If BagliSuruculer.Item(i) = "" Then
Else
If BagliSuruculer.count < 0 Then
Else
NetworkBagla.RemoveNetworkDrive BagliSuruculer.Item(i)
End If
End If
Next



'Sürücüleri bağla

NetworkBagla.MapNetworkDrive "Z:", "\\IPadresi\paylaşımAdı"
'Değişkenleri tanımlayalım ben burada hepsine 1 dedim çünkü 1 tane sürücü bağlayacağım.
Dim y
Dim KisaYolIsimleri (1)
Dim Aciklamalar (1)
Dim Iconlar (1)
Dim kisayolTus (1)
Set KisayolIcinBaglan = CreateObject("WScript.Shell&quot
YolTanimla = KisayolIcinBaglan.SpecialFolders("Desktop&quo t


' Kisayol isimlerini verelim
KisaYolIsimleri(0) = "PAYLAŞIM"


' Mouse ile üzerine gelindiginde cikacak olan aciklamayi verelim
Aciklamalar(0) = "Genel paylaşım dosyanız"


'iconlari atayalim, WINDOWS un altındaki dll lerden ve exe den aldım
'buradaki numara dll in içindeki yada exe nin içindeki kaçıncı icon olduğunu gösterir
Iconlar(0) = "C:\WINDOWS\system32\cscui.dll, 2"


'Kisayol Tuslari
kisayolTus(0) = "Ctrl+Alt+p"


'şimdi işlemi başlatabiliriz
Set BagliSuruculer1 = NetworkBagla.EnumNetworkDrives
If BagliSuruculer1.count < 0 Then
Else
y = 0
For i = 0 To BagliSuruculer1.Count - 1 Step 2
If BagliSuruculer1.Item(i) = "" Then
Else
Set LinkOlustur = KisayolIcinBaglan.CreateShortcut(YolTanimla & "\" & KisaYolIsimleri(y)&".lnk&quot
LinkOlustur.TargetPath = BagliSuruculer1.Item(i)
LinkOlustur.WindowStyle = 8
LinkOlustur.Hotkey = kisayolTus(y)
LinkOlustur.IconLocation = Iconlar(y)
LinkOlustur.Description = Aciklamalar(y)
LinkOlustur.Save
y = y + 1
End If
Next
End If
[hr]
Scripti sizin sisteminize göre düzenledim ama yinede IP ve klasör adı girmeniz gereken yerler var o yüzden tüm scripti baştan sona birkez okuyup düzeltilmesi gerekenleri düzeltin.

Bu script ile paylaşımlı duruma getirilmiş bir klasörü ağdan bulup "Z" sürücüsü olarak mapliyebilirsiniz ve bu maplanmiş klasörün kısayolunu da masaüstüne atarsınız.

[ekinonline]

öncelikle verdiğiniz cevap için teşekkür ederim. script ile ilgili döküman yada faydalı dokumanları nereden bulabilirim. verdiğiniz cevabı uygulayacağım. teşekkürler

[fyndhern]

google a vbs examples veya tutorials yazarsanız bulabilirsiniz (not:vbs=visual basic script) Ben scriptleri bi yerden bulmuyorum programlama bilgimle yazıyorum scriptlerimi ama microsoft un hazır scriptleri yayınladığını bir sitesi de var diye biliyorum http://www.microsoft.com/technet/scr...r/default.mspx

[ekinonline]

hocam

clienler açıldığında saatin aldığı duruma göre günaydın kullanıcı, tünaydın kullanıcı gibi bir mesaj nasıl görüntüleyebilirim.

bir de yukarıda yazdığınız script için şunları yaptım.

pascal, visual basic ve office programlarını ana makinede kurdum. exe olan yerlerde her program için kısayol oluşturdum. c:\ nin içine programlar diye klasör oluşturdum. bu klasörün içine kısayolları taşıdım. bundan sonra ne yapacağım acaba

[fyndhern]

Şimdi burada biraz karışıklık olmuş gibi görünüyor, programları ana makineden mi yoksa her bilgisayarın kendisi mi çalıştırıcak ?
Eğer her makina kendisi çalıştırıcak ise ozaman masaüstüne sadece kısayolu kopyalayan scripti kullanırsınız, yok eğer tüm makineler ana makineye bağlanıp çalıştırıcaklar ise bu durumda önce bu programların çalıştığı klasörleri maplemeniz ve kısayollarını da buradan kopyalamanız lazım, mesela örnek vermek gerekir ise

terminaller kendileri çalıştırıcaklar ise c:\programfiles\pascal\pascal.exe bu kısayolun uzantısı olabilir ama
ana makineden çalıştırıcaklar ise z:\programlar\pascal\pascal.exe gibi bir kısayol olmalı.

[ekinonline]

run only allowed windows applications

gpo altında nerede acaba. Birde Windows uygulaması ile birlikte yüklenen programları da engelleyebilir miyim. Pascal, VB gibi.

FSO.CopyFile "\\serverIPadresi\klassörünAdı","C: \DOCUME~1\"+strUserName+"\STARTM~1\&quot ;

Ana makineye programları kurmadık. Çünkü makinenin donanımı uygun değil. Yukarıdaki satırı aynen kullandık. Ancak her bağlanışta kısayol kopyalıyor. Kısayol varsa bir daha yüklemesin gibilerinden bir script nasıl yapabiliriz acaba. Birde bütün terminallerde program kurulum yerleri aynı. Bu kısayolları bir klasöre aktarıp klasörle birlikte bunları terminallere nasıl kopyalarız.

[fyndhern]

User Configuration / System altında bulabilirsiniz. Buradan herhangi bir .exe yi engelliyebilirsiniz, windows uygulaması derken windowsla birlikte yüklenen uygulamaları düşünmeyiniz sadece, mesela okey.exe veya wow.exe yi de engelliyebilirsiniz. Kısacası herhangi bir programı engelliyebilirsiniz.

Zira kulanıcılar herhangi bir program yükleyemiceyek yada silemiyecekleri için yabancı bir programın bilgisayarlarda çalışması mümkün diğildir normal şartlar altına.

ikinci konuya gelmek gerekir ise, her açılışta kısayol kopyalanması normal bir durum, zaten var ise eskisinin üzerine yazıyor fakat sizin canınızı sıkan sanırım kopyalama yapan komut satırı ekranı nın görüntülenmesi, onu da yine gpo kullanarak scriptleri görünmez biçimde çalıştır diyebilirsiniz. bunuda;
User configuration / Administrative templates / system scripts altından yapabilirsiniz.

Üçüncü konuyu da şöyle halledersiniz, ana sunucuya bir paylaşım dosyası açarsınız, içine kısayolları atarsınız ve bu klasöre sadece yazma yetkisi verirsiniz, yine üstteki kod yardımı ile ana makineden terminallere istediğiniz dosya yada klasörleri kopyalarsınız.

Kolay gelsin.

[ekinonline]

FSO.CopyFile "\\serverIPadresi\klassörünAdı","C: \DOCUME~1\"+strUserName+"\STARTM~1\&quot ;

yukarıdaki komutu uyguladık. ancak herhangi bir şey olmadı. Bir iki sorum olacak.

server ayağında klasörü nerede oluşturacağız. örneğin c:\ içine mi nereye. bu klasör için kullanıcı hakları tanımlanacak mı. yukarıda verilen komutu aynen mi uygulayacağız. aralarındaki özel karakteri de mi kullanacağız. boşluklar yada küçük büyük harf ayırımı olacak mı daha detaylı bilgi verirseniz sevinirim