Windows 10 İçin Birkaç Satırlık Kodlama

Windows 10 ile ilgili bilgi paylaşım alanıdır
Cevapla
Kullanıcı avatarı
TRWE_2012
Zettabyte1
Zettabyte1
Mesajlar: 15616
Kayıt: 25 Eyl 2013, 13:38
cinsiyet: Erkek
Teşekkür etti: 2713 kez
Teşekkür edildi: 5626 kez

Windows 10 İçin Birkaç Satırlık Kodlama

Mesaj gönderen TRWE_2012 »

Merhaba Forumdaşlar Ve Misafirler;

Bu kısa yazıda sizlere Windows 10 önceki sistem olan Windows 7 kullanılan bazı işlevlerin yeni sistem Windows 10 işletim sisteminde nasıl yeniden kullanılacağını göstereceğim.

Şimdi başlayalım.

Masaüstünde herhangi bir boş alan sağ tıklatınız. Açılan menüden Yeni>>Kısayol tıklattıktan sonra açılan yeni pencerede aşağıda sizlere vereceğim kodları kullanabilirsiniz.

STANDART WİNDOWS KISAYOLLARI:

MS-DOS KOMUT İSTEMİ:

Kod: Tümünü seç

C:\WINDOWS\System32\cmd.exe
MS-DOS EDİTOR(Eskiden varsayılan cmd komutlarından yeni benzersiz komut dosyaları oluşturmak için kullanılırdı.)

Kod: Tümünü seç

C:\WINDOWS\System32\edit.com
MS-EKRAN KLAVYESİ (SANAL KLAVYE):

Kod: Tümünü seç

%windir%\System32\osk.exe
WİNDOWS KAYIT DEFTERİ :

Kod: Tümünü seç

C:\WINDOWS\regedit.exe
GELİŞMİŞ KULLANICI HESAPLARI:

Kod: Tümünü seç

C:\WINDOWS\System32\Netplwiz.exe
MİCROSOFT SAĞ MENÜ GÖNDER ALT YORDAMI 1 (Tüm Kullanıcılar)

Kod: Tümünü seç

C:\Users\Default\AppData\Roaming\Microsoft\Windows\SendTo
MİCROSOFT SAĞ MENÜ GÖNDER ALT YORDAMI 2 (O Anki Aktif Kullanıcı)

Kod: Tümünü seç

C:\Users\Kullanıcı Adı\AppData\Roaming\Microsoft\Windows\SendTo
WİNDOWS SİSTEM YAPILANDIRMASI :

Kod: Tümünü seç

%SystemRoot%\system32\msconfig.exe
WİNDOWS 7 >>>WİNDOWS 10 KISAYOLLARI:

Windows God Mod :

Kod: Tümünü seç

%windir%\explorer.exe shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
Windows Arka Plan Değiştirme (Windows 7 Tarzı)

Kod: Tümünü seç

C:\Windows\System32\control.exe /NAME Microsoft.Personalization /PAGE pageWallpaper
Windows Renk Ve Görünüm Değiştirme (Windows 7 Tarzı)

Kod: Tümünü seç

C:\Windows\System32\control.exe /NAME Microsoft.Personalization /PAGE pageColorization
Klasik Windows Gezgini (Daha sordum net sitesinde Windows 7 için yapılmış TRWE_2012 Bunu Windows 10 uyarlamıştır.Böylelikle Dosya Gezgininden Widows Gezgine Dönüş yapılmıştır.)

Kod: Tümünü seç

%SystemRoot%\explorer.exe ,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
WİNDOWS 10 ALAKALI WİNDOWS KOMUT DOSYALARI (Burada sadece iki tanesi verilecektir.)

Windows'un Aktivasyonunu Öğrenme(Eğer Sistemde MS-OFİS varsa onun da aktivasyon süresini bulabilirsiniz.)

Kod: Tümünü seç

@echo off
cd /d %~dp0
color 1F
setLocal EnableDelayedExpansion
if exist "%Windir%\Sysnative\sppsvc.exe" set SysPath=%Windir%\Sysnative
if exist "%Windir%\System32\sppsvc.exe"  set SysPath=%Windir%\System32

echo Windows Status:
ver
cscript //nologo %SysPath%\slmgr.vbs /dli
cscript //nologo %SysPath%\slmgr.vbs /xpr

echo.
echo.
echo Office 2013 Status:
set office=
set installed=0
FOR /F "tokens=2*" %%a IN ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot" /v "Path" 2^>nul') do (SET office=%%b)
if exist "%office%\OSPP.VBS" (
	set installed=1
	cd /d "%office%"
	cscript //nologo ospp.vbs /dstatus
	cd /d %~dp0
)
set office=
FOR /F "tokens=2*" %%a IN ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot" /v "Path" 2^>nul') do (SET office=%%b)
if exist "%office%\OSPP.VBS" (
	set installed=1
	cd /d "%office%"
	cscript //nologo ospp.vbs /dstatus
	cd /d %~dp0
)
if %installed%==0 echo Not installed

echo.
echo.
echo Office 2010 Status:
set office=
set installed=0
FOR /F "tokens=2*" %%a IN ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot" /v "Path" 2^>nul') do (SET office=%%b)
if exist "%office%\OSPP.VBS" (
	set installed=1
	cd /d "%office%"
	cscript //nologo ospp.vbs /dstatus
	cd /d %~dp0
)
set office=
FOR /F "tokens=2*" %%a IN ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot" /v "Path" 2^>nul') do (SET office=%%b)
if exist "%office%\OSPP.VBS" (
	set installed=1
	cd /d "%office%"
	cscript //nologo ospp.vbs /dstatus
	cd /d %~dp0
)
if %installed%==0 echo Not installed

echo.
pause
MS KOMUT YORDAMIYLA ÇEVRİMDIŞI(OFFLİNE) MİCROSOFT NETWORK 3.5 BİLEŞİNİ WİNDOWS MEDYASINDAN YÜKLENMESİ.

Not:Bu işlemin yapılabilmesi için elinizde bir Windows 10 DVD medyası ve fiziksel /sanal sürücü gerekiyor.

Şimdi Kodu Verelim:

Kod: Tümünü seç

@echo By Code's TRWE_2012 off
@echo off
Title .NET Framework 3.5 Offline Installer
for %%I in (D E F G H I J K L M N O P Q R S T U V W X Y Z) do if exist "%%I:\\sources\install.wim" set setupdrv=%%I
if defined setupdrv (
echo Found drive %setupdrv%
echo Installing .NET Framework 3.5...
Dism /online /enable-feature /featurename:NetFX3 /All /Source:%setupdrv%:\sources\sxs /LimitAccess
echo.
echo .NET Framework 3.5 should be installed
echo.
) else (
echo No installation media found!
echo Insert DVD or USB flash drive and run this file once again. 
echo.
)
pause


TRWE_2012
SAKARYA 2016
HAYALET MODU
Kullanıcı avatarı
iso1
Kilobyte1
Kilobyte1
Mesajlar: 215
Kayıt: 12 Kas 2006, 16:21

Re: Windows 10 İçin Birkaç Satırlık Kodlama

Mesaj gönderen iso1 »

Teşekkürler.
Cevapla