Jump to content

MostWanted

Emekli
  • Posts

    3255
  • Joined

  • Last visited

Everything posted by MostWanted

  1. http://www.joomlatr.org/index.php/sss/87-joomla-16x-doekuemanlar/1034-joomla-16-kurulumu-hosting.html Kurulum anlatımdan sonra "Joomla! 1.6 Türkçe dil dosyalarının yüklenmesi:" başlığından gerisi seni ilgilendiriyor kolay gelsin.
  2. Hotmail değil çünkü gmail ve gmail tabanlı yerlere mail atabilirsin.
  3. http://www.amsplugins.com/details.asp?ID=121 ilgili plugin ve içindeki örnek.
  4. Bir program güncellemek için xml ve iniye gerek yok.Onu çoklu programı güncellemek için kullanırız.Sitenizde bir yere update.txt atın içinde de 100 yazsın.Projenizde globalde update adlı bi değişken oluşturun onu da değer olarak 100'e eşitleyin.Güncellemek istediğiniz zaman txt değiştirip 101 yapacaksınız tabi programın içindeki değeri de 101 yapacaksınız.Sonra isterseniz açılışa (açılışı yavaşlatır) veya bir butona güncelleme kodlarını şöyle yazın. updatetxt=_TempFolder .. "\\~softupdate~.txt" File.Delete(updatetxt) --daha önce varsa işimize karışmasın HTTP.Download("http://dl.dropbox.com/u/40216345/softtv/update.txt", updatetxt, 80, 20, nil, nil) -- nerden indirteceksen ona göre ayarlayacaksın -- hata var mı diye kontrol edelim error = Application.GetLastError(); if (error ~= 0) then Dialog.Message("Hata!", "Dosya indirilirken hata oluştu.\r\nHata Kodu:"..error, MB_OK, MB_ICONSTOP); else --sorun yoksa işleme devam guncelversiyon=String.ToNumber(TextFile.ReadToString(updatetxt)) if guncelversiyon > update then --güncelleme yapılır.Artık httpdownload ile nere indirirsin bilinmez. else Dialog.Message("Güncel!", "En güncel sürümü kullanıyorsunuz.", MB_OK, MB_ICONINFORMATION); end end
  5. error = Application.GetLastError(); if (error ~= 0) then Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION); end Hepsinin sonuna bundan koy ve bakalım hata olarak ne diyor bize.
  6. Clipput'un konumuzla hiç bir alakası yok.Clipput fonksiyonu Ctrl+C ile aynı işe yarar yani yazdığın bi metni kopyalar.Neyse olaya gelirsek bundan önce controlsend, ie fonksiyonlarıyla ilgili bir çok örnek yaptık.Eğer durumu açmazsan bunları incele demekten başka bir çaremiz yok çünkü elimizde bir şey yok.
  7. Kodlarını ver öyle bir şey olma imkanı düşük.
  8. Tamam gerilmeye gerek yok bu kadar yoruma da.İndirmek zorsa http://video-oyun.gittigidiyor.com/killzone-3-2_Oyunlar_W0QQkatZZvbQQklmZZkillzone%2B3%2B-2QQstrZZcatalog?gclid=CP21tqLjgKsCFcQXzQodQE8fzQ 60-80 tl civarı gidin alın oynayın.
  9. Soruna şöyle bi çözüm getirdim umarım çalışır. [codebox]#NoTrayIcon #RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=Library\BSPlayer.ico #AutoIt3Wrapper_Outfile=KBSPlayer.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=Katılımsız BsPlayer #AutoIt3Wrapper_Res_Fileversion=1.1.0.0 #AutoIt3Wrapper_Res_LegalCopyright=© 2010 BlueLife #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_Field=BSPlayer Version|2.5.6.1043 #AutoIt3Wrapper_Res_Field=CompanyName|BlueLife #AutoIt3Wrapper_Res_Field=Dosya Adı|KEasyBoot.exe #AutoIt3Wrapper_Res_Field=Hazırlama Tarihi|%date% %time% #AutoIt3Wrapper_Res_Field=AutoIt Versiyonu|%AutoItVer% #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #Region #EndRegion #include <Library\BlueLife.au3> ;Benim hazırladığım kütüphane ; Kur dosyamızı sessiz kurmak için gerekli parametremizi bir değişkene atıryoruz. Global $Parametrem = "/S" Global $UserName = "Burası" ;Lisans bilgilerini düzeltin Global $Register_Code = "Burası" ;Lisans bilgilerini düzeltin Global $Download = False ;codecmanager.exe programı çalışırsa sonlandırır. ;Internet bağlantısını engelliyor ; Temp klasöründe olmayan bir dosya ismi belirliyoruz. Global $Setup_File = _TempFile() ; Dosyalarımızı autoit içine alarak belirlediğimiz isimde Temp klasörüne çıkartıyoruz. ; BsPlayer kurunu BSPlayer.exe olarak isimlendirip Library klasörüne koyunuz. FileInstall("Library\BSPlayer.exe", $Setup_File) ;Programı belirlediğimiz parametre ile çalıştırıp pidini bir değişkene atıyruz. Global $ProgramPID = Run($Setup_File & " " & $Parametrem) Do If Not $Download And ProcessExists("codecmanager.exe") Then ProcessClose("codecmanager.exe") Sleep(500) Until Not ProcessExists($ProgramPID) ;Şimdi kurulan BsPlayeri lisanlamak için açalım ; ============================================================== $ProgramFiles=_ProgramFiles() Global $ProgramPID = Run($ProgramFiles & "\Webteh\BSplayerPro\bsplayer.exe") ;Çalıştırdığımız programın pidini bir değişkene atayalım. If $ProgramPID <> 0 Then ;Programımız çalışmışsa If WinWait("[CLASS:BSPlayer]", "", 10) <> 0 Then ;BsPlayer ekranını 10 saniye bekleyelim WinSetState("[CLASS:BSPlayer]", "", @SW_MINIMIZE) ;Ekranı simge durumuna atalım If WinWait("[CLASS:Trgfrm.UnicodeClass]", "", 5) <> 0 Then ;;Lisans penceresi 5 saniye içnde görünürse WinMove("[CLASS:Trgfrm.UnicodeClass]", "", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım BlockInput(1) ;Fare ve klevyeyi kitleyelim ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass2", "IcyCool") ;Register bilgilerini giriyoruz ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass1", "2992A28687A90445B3E1CF4D067C127D179FB1B0E3C0") ControlCommand("[CLASS:Trgfrm.UnicodeClass]", "", "TTntButton.UnicodeClass1", "Check") ;Onaylıyoruz. BlockInput(0) ;Fare ve klevyenin kilitini kaldıralım If WinWait("[CLASS:#32770]", "BS.Player", 5) <> 0 Then ;Mesaj ekranını 5 saniye bekleyelim WinMove("[CLASS:#32770]", "BS.Player", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım ControlCommand("[CLASS:#32770]", "BS.Player", "Button1", "Check") ;Onaylıyoruz. EndIf If ProcessWaitClose($ProgramPID, 10) = 1 Then ;Çalıştırdığımız bsplayer 10 saniye içinde kapanırsa bir süre yeniden açılma olsılığına karşı önlem alalım If ProcessWait("bsplayer.exe", 7) <> 0 Then ;Bsplayerin yeniden başlamasını 7 saniye bekleyelim ProcessClose("bsplayer.exe") ;kapatalım EndIf EndIf EndIf EndIf ProcessClose($ProgramPID) ;Çalıştırdığımız program açıksa kapatalım. EndIf ; ============================================================== FileDelete($Setup_File) ;Şimdi temp klasörüne çıkarttığımız dosyamızı silelim. Exit ; Çıkış Func _ProgramFiles() If @OSArch = "X86" Then Return RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir") Else Return RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir (x86)") EndIf EndFunc [/codebox]
  10. Soruna şöyle bi çözüm getirdim umarım çalışır. [codebox]#NoTrayIcon #RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=Library\BSPlayer.ico #AutoIt3Wrapper_Outfile=KBSPlayer.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=Katılımsız BsPlayer #AutoIt3Wrapper_Res_Fileversion=1.1.0.0 #AutoIt3Wrapper_Res_LegalCopyright=© 2010 BlueLife #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_Field=BSPlayer Version|2.5.6.1043 #AutoIt3Wrapper_Res_Field=CompanyName|BlueLife #AutoIt3Wrapper_Res_Field=Dosya Adı|KEasyBoot.exe #AutoIt3Wrapper_Res_Field=Hazırlama Tarihi|%date% %time% #AutoIt3Wrapper_Res_Field=AutoIt Versiyonu|%AutoItVer% #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #Region #EndRegion #include <Library\BlueLife.au3> ;Benim hazırladığım kütüphane ; Kur dosyamızı sessiz kurmak için gerekli parametremizi bir değişkene atıryoruz. Global $Parametrem = "/S" Global $UserName = "Burası" ;Lisans bilgilerini düzeltin Global $Register_Code = "Burası" ;Lisans bilgilerini düzeltin Global $Download = False ;codecmanager.exe programı çalışırsa sonlandırır. ;Internet bağlantısını engelliyor ; Temp klasöründe olmayan bir dosya ismi belirliyoruz. Global $Setup_File = _TempFile() ; Dosyalarımızı autoit içine alarak belirlediğimiz isimde Temp klasörüne çıkartıyoruz. ; BsPlayer kurunu BSPlayer.exe olarak isimlendirip Library klasörüne koyunuz. FileInstall("Library\BSPlayer.exe", $Setup_File) ;Programı belirlediğimiz parametre ile çalıştırıp pidini bir değişkene atıyruz. Global $ProgramPID = Run($Setup_File & " " & $Parametrem) Do If Not $Download And ProcessExists("codecmanager.exe") Then ProcessClose("codecmanager.exe") Sleep(500) Until Not ProcessExists($ProgramPID) ;Şimdi kurulan BsPlayeri lisanlamak için açalım ; ============================================================== $ProgramFiles=_ProgramFiles() Global $ProgramPID = Run($ProgramFiles & "\Webteh\BSplayerPro\bsplayer.exe") ;Çalıştırdığımız programın pidini bir değişkene atayalım. If $ProgramPID <> 0 Then ;Programımız çalışmışsa If WinWait("[CLASS:BSPlayer]", "", 10) <> 0 Then ;BsPlayer ekranını 10 saniye bekleyelim WinSetState("[CLASS:BSPlayer]", "", @SW_MINIMIZE) ;Ekranı simge durumuna atalım If WinWait("[CLASS:Trgfrm.UnicodeClass]", "", 5) <> 0 Then ;;Lisans penceresi 5 saniye içnde görünürse WinMove("[CLASS:Trgfrm.UnicodeClass]", "", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım BlockInput(1) ;Fare ve klevyeyi kitleyelim ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass2", "IcyCool") ;Register bilgilerini giriyoruz ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass1", "2992A28687A90445B3E1CF4D067C127D179FB1B0E3C0") ControlCommand("[CLASS:Trgfrm.UnicodeClass]", "", "TTntButton.UnicodeClass1", "Check") ;Onaylıyoruz. BlockInput(0) ;Fare ve klevyenin kilitini kaldıralım If WinWait("[CLASS:#32770]", "BS.Player", 5) <> 0 Then ;Mesaj ekranını 5 saniye bekleyelim WinMove("[CLASS:#32770]", "BS.Player", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım ControlCommand("[CLASS:#32770]", "BS.Player", "Button1", "Check") ;Onaylıyoruz. EndIf If ProcessWaitClose($ProgramPID, 10) = 1 Then ;Çalıştırdığımız bsplayer 10 saniye içinde kapanırsa bir süre yeniden açılma olsılığına karşı önlem alalım If ProcessWait("bsplayer.exe", 7) <> 0 Then ;Bsplayerin yeniden başlamasını 7 saniye bekleyelim ProcessClose("bsplayer.exe") ;kapatalım EndIf EndIf EndIf EndIf ProcessClose($ProgramPID) ;Çalıştırdığımız program açıksa kapatalım. EndIf ; ============================================================== FileDelete($Setup_File) ;Şimdi temp klasörüne çıkarttığımız dosyamızı silelim. Exit ; Çıkış Func _ProgramFiles() If @OSArch = "X86" Then Return RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir") Else Return RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir (x86)") EndIf EndFunc [/codebox]
  11. [quote] onu kastetmedim. zaten x64 de oraya kurar. program x86 ise [/quote] Cevabım blue_life'a idi zaten. Bu arada kurulan yer madem bu kadar sorun kurarken kurulacak yerin yazdığı inputtan değeri okuruz? O zaman tamamen garanti olur işimiz.O sayfadan değeri alamazsan yardımcı olabiliriz.
  12. Program Files (x86) 'ya kuruluyor.
  13. Bende bir sorun yok fakat diğer arkadaşlarda sorun kesinlikle çözünürlükten kaynaklanıyor.Çünkü ekranı biraz büyük yapmışsın.Benim çözünürlüğüm 1920*1080 olduğu için düzgün gözüktüğünü düşünüyorum.Ekranı biraz küçültmelisin.
  14. Çıkma ihtimali yok denecek kadar az.

  15. Bunun yeri aslında tam olarak burası değil fakat sana yardımcı olacak kodu yazayım; $processlist=ProcessList(@ScriptName) If $i=1 to $processlist[0][0] ProcessClose($processlist[$i][1] Next
  16. active registry monitor Bu program tüm değişiklikleri sana .reg uzantılı olarak verir.Çalışma mantığı regshot ile aynıdır.
  17. Ben anladım fakat başlıklarını ve id lerii görmeden bi kod yazamam. @MasterTR bence sorun bu değil.
  18. GUICtrlSetOnEvent($Button2, "gizle") Bunlar @GUI_CtrlId kullanacağın zaman gerekli olanlar while döngüsünden kullandığın zaman ona gerek yok 1, ikincisi bi input yapıp guictrlread diyip bağlığı okutup istenilen başlığı gizlemesini sağlayabilirdin 3. sü herkes kendi bölümüne @mehmetben sen sayfayı gizlemek istiyosan bunu kullanabilirsin daha neye gerek var ki anlamadım yani. IE komutlarını kullanmaya gerek yok yani..
  19. O ekranları görmeden nasıl bi yorum yapabiliriz sence?
  20. Siteye öyle girmene gerek yok.Normal ie den gir sonra gizleme programını çalıştır, eve geldiğinde show kısmını çalıştır olsun bitsin.
  21. Gömülü nesne yaratamıyorsun direk olarak ama obje aracılığı ile yaratılabileceğini düşünüyorum.Autoitte dediğin gibi tarayıcıya müdahale etmek daha mantıklı.
  22. WinSetState("başlık", "", @SW_HIDE) başlık yazan yere o explorer da gözüken başlığı yazarsın gözüktürmek içinde @SW_SHOW kullanırsın.
×
×
  • Create New...