Script örnekleri

0

Merhaba;

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

toprak34 toprak34 (2026)
7 yıl önce sordu

    Toplam 3 Cevap


    0

    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.

     

    alattin alattin (16999)
    7 yıl önce cevaplandı

    • @alattin dizüstü olduğu için ışıkları yanıp söndüremiyorum :( toprak34 7 yıl önce
    • @toprak34 ben de caps lock yanıp sönüyor alattin 7 yıl önce
    • capslock tuşu mu yoksa capslock ışığımı toprak34 7 yıl önce
    • @toprak34 capslock ışığı yanıp sönecek. Benim laptopta tuşun üzerinde ışık alattin 7 yıl önce
    • bende ışık yok @alattin toprak34 7 yıl önce

    1

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

    toprak34 toprak34 (2026)
    7 yıl önce cevaplandı

      0

      #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

      mutecessis mutecessis (216)
      7 yıl önce cevaplandı

      üyelik gerektirir

      Cevap yazabilmek için üye girişi yapmalısınız.

      Eğer uzmanim.net üyesiyseniz giriş yapabilirsiniz: üye girişi yap
      uzmanim.net'e üye olmak çok kolaydır: hemen kayıt ol