scorpionfa

Bilmiyorum benim pc ile alakalı mı değil mi... Ama sorunu autoit ile çözdüm. Autoit yazdığım "Run(@WindowsDir & "\system32\msconfig", "", @SW_SHOWNORMAL)" komutu ile exe dosyası oluşturdum ve ams de bu exe yi çalıştır dedim. Gayet güzel çalışıyor. İlgilenen arkadaşlara teşekkürler.

Sistemim Win 7, Virtual Pc de xp kurulu. Hocam tamam işte önce hedef, sonra içinde bulunduğu klasör kodu: [code]File.Run(_WindowsFolder.."\\System32\\msconfig.exe" , "", _WindowsFolder.."\\System32", SW_SHOWNORMAL, false);[/code] Bende msconfig dosyası \\pchealth\\helpctr\\binaries\\ klasörü içinde yok. Windows\\system32 klasöründe var bir de C:\Windows\winsxs\amd64_microsoft-windows-msconfig-exe_31bf3856ad364e35_6.1.7600.16385_none_366f302ab7711738 diye bir klasörde mevcut. Bunlarıda denedim yine olmadı. Normal Execute kodu ile denedim yine çalışmadı. Sanırım AMS de bunu çalıştıracak bir yöntem yok. Cmd ile birlikte deneyince de " 'msconfig' iç ya da dış komut, çalıştırılabilir program ya da toplu iş dosyası olarak tanınmıyor" mesajı çıkıyor. KintaRo hocam ben sana şunu sorsam bütün sorunlarımı kısaca halledebilirim. AMS8 de klavyenin herhangi bir tuşuna basma komutu var mı? Mesela ben bi kod yazsam "Windows tuşu ve R tuşuna birlikte bas" "msconfig yaz" "enter tuşuna bas" gibi bir şey olsa dilediğim şeyi yapabilirdim. En azından basit bir program varsa bunu yapabilen, o programa kayıt yapıp çalışırır ve program görünmeden halledebilirim. Çok araştırdım, autoplay ile sanal klavye oluşturulabiliyor (SystemIsKeyDown ile) ama gerçekte kendi basabileceği bir tuşu atamak zor. Tamam başınızı çok ağrıttım ama yapmaya çalıştığı şeyi birazcık anlabilirim belki yardımcı olursunuz. Tray iconda kısa yollar oluşturup sistem tools tarzı bir şey olacak bu bittiğinde. Aşağıda örnek kodları vereyim (global function): [spoiler][code] function Enclose(sIn) return "\""..sIn.."\"" end function g_OnSystemTrayMenu(X, Y) tblPopUp2 = {}; tblPopUp2[1] = {}; tblPopUp2[1].Text = "&Google" tblPopUp2[1].ID = 1101 tblPopUp2[1].Checked = false; tblPopUp2[1].Enabled = true; tblPopUp2[2] = {}; tblPopUp2[2].Text = "&Hotmail" tblPopUp2[2].ID = 1102 tblPopUp2[2].Checked = false; tblPopUp2[2].Enabled = true; tblPopUp2[3] = {}; tblPopUp2[3].Text = "&Yahoo Mail" tblPopUp2[3].ID = 1103 tblPopUp2[3].Checked = false; tblPopUp2[3].Enabled = true; tblMenu = {}; tblMenu[1] = {}; tblMenu[1].Text = "&Web Sayfası Aç"; tblMenu[1].ID = 1100; tblMenu[1].Checked = false; tblMenu[1].Enabled = true; tblMenu[1].SubMenu = tblPopUp2; tblMenu[2] = {}; tblMenu[2].Text = "&Denetim Masası Öğeleri"; tblMenu[2].ID = 1297; tblMenu[2].Checked = false; tblMenu[2].Enabled = true; tblMenu[2].SubMenu = tblPopUp3; tblMenu[3] = {}; tblMenu[3].Text = "&Çalıştır Komutları-1"; tblMenu[3].ID = 1200; tblMenu[3].Checked = false; tblMenu[3].Enabled = true; tblMenu[3].SubMenu = tblPopUp4; nTrayMenu = Application.ShowPopupMenu(X, Y, tblMenu, TPM_RIGHTALIGN, TPM_BOTTOMALIGN, true, false); if(nTrayMenu ~= -1)then if(nTrayMenu == 1101) then File.OpenURL("www.google.com.tr", SW_SHOWNORMAL); elseif(nTrayMenu == 1102) then File.OpenURL("www.hotmail.com", SW_SHOWNORMAL); elseif(nTrayMenu == 1103) then File.OpenURL("https://login.yahoo.com/config/mail?&.src=ym&.intl=tr", SW_SHOWNORMAL); elseif(nTrayMenu == 1600) then Audio.Stop(CHANNEL_BACKGROUND); elseif(nTrayMenu == 1700) then Application.Exit(0); end end end [/code][/spoiler] Kodların bir kısmını yazdığım için biraz karışık gözükebilir. Ama normalde çalışıyor, gayet güzel oldu. Malum şimdiden 1000 satır kod oldu hepsini buraya yazmam mümkün değil. Bu bahsettiğim msconfig tarzında sistem dosyalarıda bunların arasında olacak, böylece lazım olduğunda kullanmak üzere kısa yol oluşturmaya çalışıyorum.

File.Run("msconfig.exe", "", "", SW_SHOWNORMAL, true); Malesef, denemediğim şey kalmadı , bu da işe yaramıyor. Acaba Win7 den mi kaynaklanıyor diye sanal pc de Xp ile de denedim işe yaramıyor.

Hayır açılmıyor.

Hayır açılmıyor.

Malesef yine çalışmıyor. "Başlat-Çalıştır" "komutu yaz" "enter" gibi bir formül bulabilsem bu kadar uğraşmazdım.

Malesef yine çalışmıyor. "Başlat-Çalıştır" "komutu yaz" "enter" gibi bir formül bulabilsem bu kadar uğraşmazdım.

Yok şimdi şöyle bir şey var, bildiğim kadarıyla. Arkadaşın başına gelen şey benimde başıma geldi. My Project adlı otomatik bir proje kayıt sistemi var. Yaptığınız çalışmalar bu adla kaydediliyor. Eğer siz sihirbaza tıklayıp "Evet" derseniz My Project tamamıyla yok oluyor. Autosave falan kalmıyor. Silinen dosyaları geri getirebilen bir program yardımıyla kurtarabildiğin kadarını kurtarmayı dene. Bir daha ki seferede asla My Project adını kullanma, kendin yeni bir isimle kayıt yap.

Mehabalar, AMS ile yeni tanıştım, kısa zamanda baya şey öğrendim ve kendim hazırladığım DVD ye bir arayüz oluşturmaya çalışıyorum. Bu site çok işime yaradı yardımcı olan arkadaşlara teşekkürler. Bir noktada takıldım, yardımcı olursanız sevinirim. Aşağıda verdiğim kodların hepsini denedim ama bir msconfig dosyasını başlatmayı başaramadım. [code] File.Run(_WindowsFolder.."\\System32\\msconfig" , "", _WindowsFolder.."\\System32", SW_SHOWNORMAL, false); File.Run(_SystemFolder.."\\cmd.exe", "/k \"msconfig\"", "", SW_SHOWNORMAL, false); File.Run(_WindowsFolder.."\\System32\\msconfid /c" , "", _WindowsFolder.."\\System32", SW_SHOWNORMAL, false); File.Run(_SystemFolder .. "\\mmc.exe", _SystemFolder .. "\\msconfig") File.Run( "Rundll32.exe", "shell32.dll,Control_RunDLL msconfig") [/code] Normalde mmc, shel32.dll olanlar başka dosyaları çalıştırmak içindir, ama yinede denedim . compmgmt.msc----- Bilgisayar yönetimi taskmgr------------ Görev yöneticisi devmgmt -- --------Aygıt Yöneticisi regedt32 ---------- Windows Kayıt Düzenleyicisi gibi sistem dosyalarını bu komutlar ile çalıştırabiliyorum. Ama msconfig, MdSched, defrag, win.ini, sysedit, narrator ve benzeri komutlar çalışmıyor. Normalde pc de başlat-çalıştır, ya da cmd ile çalıştırınca çalışan sistem dosyaları bunlar. Hatta bat dosyası oluşturup denedim. Bat dosyasına tıklayınca çalışıyor ama yine Autoplay Media ile komut verince çalışmıyor. Bu konulardan anlayan varsa sevinirim.