Script örnekleri

Merhaba;

Bir kaç tane script örneği alabilirmiyim? (VBS, Javascript vb. hepsinden olur)

Vbscript örnekleri:

VBscript ile hesap makinası veya başka bir programı çalıştırma:

msgbox "TAMAM tıklandığında hesap makinası açılacaktır"
Set shell=CreateObject("wscript.shell")
Shell.Run("calc.exe")

Veya vb script ile paint çalıştırma:

msgbox "TAMAM tıklandığında paint açılacaktır"
Set shell=CreateObject("wscript.shell")
Shell.Run("mspaint.exe")

Vb script ile CDROM kapağını açığ kapatma

msg=(" Tamam tıklandığında cd rom kapağı açılır veya kapanır ")
msgbox(" ") + msg
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000

Vb Script ile Klavye tuşlarını yakıp söndürme:

Set wshShell =wscript.CreateObject("WScript.Shell")
name=(" Klavye tuşlarını izleyin ")
msgbox(" ") + name
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop

Sonlandırmak için görev yöneticisini kullan veya bilgisayarı yeniden başlat.

Daha çok .vbs ile olucak not defteri ne yazılacak olanları verirmisiniz?? Daha kodlamaya giriş yapmadım bunlar ilk adımlarım şuan.

#Kullanıcı adı ve parola kontrol version 2.0
# and  "ve" anlamına geldi
#while döngüsü 
# break çalıştığında zaman döngü sona erer

# Girintilere dikkat while in girintisi hepsini kapsıyor

defkullanici = input ("Kayıt için Kullanici adı")
defparola = input("Kayıt için Parola")

while (True):
	kullanici = input("Kullanici adı")
	parola =input("Parola")
	
	if ((kullanici == defkullanici) and (parola == defparola)):
		print("Hoşgeldiniz",kullanici)
		break
		
	elif ((kullanici != defkullanici) and (parola== defparola)):
		print ("Kullanici adını yanlış girdiniz")
	
	elif ((kullanici == defkullanici) and (parola!= defparola)):
		print("Parolanızı mı unuttunuz?")
		print ("Parolanızı değiştirmek ister misiniz ? (Evet/Hayır)")
		
		cevap = input()
		if (cevap=="Evet"):
		
			yeniparola=input ("Yeni parola: ")
			print ("Lütfen bekleyin..")
			defparola=yeniparola
			print("Şİfre başarıyla değiştirildi")
			
	else:
		print("Tekrar deneyin")

Python 3 ile yazdığım bir alıştırma