Jump to content

g.a

Üye
 View Profile  See their activity

  • Posts

    825

  • Joined

  • Last visited

 Content Type 

Posts posted by g.a

    Bir Klasörün Içindeki Dosyaları Çalıştırmak

    in AutoIT

    Posted · Edited by TugruL

    /test/ yazan yere /Programlar/ gibi bir şey yazarsın klasörün adı. scriptin yanında olacak ama..
    kurulan programın adını ve simgesini gösterir
    bitince yazar ve 5 sn sonra kapanır. format atarken nasıl olur bilmem smile.png

    #include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#NoTrayIcon
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Outfile=TEST.exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Local $search = FileFindFirstFile(@DesktopDir & "\test\*.exe")

If $search = -1 Then
MsgBox(0, "Hata", "Kurulacak Dosya Bulunamadı!")
Exit
Else
$Form1 = GUICreate("Programlar Kuruluyor...", 337, 73, -1, -1, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP), BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE))
$Label1 = GUICtrlCreateLabel("Kurulan Program:", 72, 27, 261, 17)
$Icon1 = GUICtrlCreateIcon("", -0, 16, 16, 36, 36)
GUISetState(@SW_SHOW)
EndIf

While 1
Local $file = FileFindNextFile($search)
If @error Then ExitLoop
ShellExecute(@ScriptDir & "\test\" & $file)
GUICtrlSetImage($Icon1,@ScriptDir & "\test\" & $file)
GUICtrlSetData($Label1,"Kurulan Program: " & StringReplace( $file,".exe",""))
ProcessWaitClose($file)
WEnd


FileClose($search)
GUICtrlDelete($Icon1)
GUICtrlDelete($Label1)
GUICtrlCreateLabel("Kurulum Tamamlandı! 5 saniye sonra kapatılacak!", 0, 27, 333, 17, $SS_CENTER)
$sure = GUICtrlCreateLabel("", 0, 48, 332, 20, $SS_CENTER)
For $i = 5 To 1 Step -1
GUICtrlSetData($sure,$i)
Sleep(1000)
Next
Exit

    Html Kod Hazırlayıcı Script

    in Örnek Çalışmalar

    Posted · Edited by g.a

    [b]Başlığı silip ben yazdım deme.[/b]
    [spoiler][codebox]#cs ----------------------------------------------------------------------------

    AutoIt Version: 3.3.8.1
    Author: G.A

    #ce ----------------------------------------------------------------------------

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Konu Editörü : Coded by G.A (TncTR.Com)", 730, 651, 192, 124)
    GUISetFont(9, 800, 0, "Tahoma")
    $Label1 = GUICtrlCreateLabel("Oyun Adı:", 8, 8, 64, 18)
    $inGame = GUICtrlCreateInput("", 121, 6, 601, 22)
    $Label2 = GUICtrlCreateLabel("Oyun Bilgisi:", 8, 40, 78, 18)
    $edGI = GUICtrlCreateEdit("", 121, 40, 601, 217)
    $Label3 = GUICtrlCreateLabel("Oyundan Kareler:", 10, 267, 110, 16)
    $inI1 = GUICtrlCreateInput("", 121, 264, 601, 22)
    $inI2 = GUICtrlCreateInput("", 121, 288, 601, 22)
    $inI3 = GUICtrlCreateInput("", 121, 312, 601, 22)
    $inI4 = GUICtrlCreateInput("", 121, 336, 601, 22)
    $Label4 = GUICtrlCreateLabel("Sistem Gereksinimleri:", 8, 368, 136, 18)
    GUICtrlSetFont(-1, 9, 800, 4, "Tahoma")
    $Label5 = GUICtrlCreateLabel("İşletim Sistemi:", 47, 388, 97, 18)
    $Label6 = GUICtrlCreateLabel("İşlemci:", 95, 410, 49, 18)
    $inOS = GUICtrlCreateInput("", 144, 384, 249, 22)
    $inIS = GUICtrlCreateInput("", 144, 408, 249, 22)
    $inRAM = GUICtrlCreateInput("", 472, 384, 249, 22)
    $indfd = GUICtrlCreateLabel("Ekran Kartı:", 69, 435, 75, 18)
    $Label7 = GUICtrlCreateLabel("DirectX:", 420, 434, 52, 18)
    $Label8 = GUICtrlCreateLabel("RAM:", 435, 387, 37, 18)
    $inGC = GUICtrlCreateInput("", 144, 432, 249, 22)
    $inDRX = GUICtrlCreateInput("", 472, 432, 249, 22)
    $inHDD = GUICtrlCreateInput("", 472, 408, 249, 22)
    $Label9 = GUICtrlCreateLabel("Boş Alan:", 410, 408, 61, 18)
    $Label10 = GUICtrlCreateLabel("Oynayış Videosu:", 38, 467, 107, 18)
    $inVD = GUICtrlCreateInput("", 144, 464, 577, 22)
    $Label11 = GUICtrlCreateLabel("Torrent Bilgileri:", 10, 504, 101, 18)
    $edTB = GUICtrlCreateEdit("", 144, 496, 577, 105)
    GUICtrlSetData(-1, "")
    $Button1 = GUICtrlCreateButton("Kaydet", 560, 608, 163, 33)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $file = FileSaveDialog("Kayıt Yerini Seçin:", @DesktopDir & "\", "Metin Belgesi (*.txt)", 16)
    If Not @error Then
    FileWrite($file & ".txt","[center][img]" & GUICtrlRead($inGame) & "[/img][/center]" & @CR & _
    "[center][img]http://i.imgur.com/VeuLw.png[/img][/center]" & @CR & _
    "[quote]" & GUICtrlRead($edGI) & "[/quote]" & @CR & _
    @CRLF & _
    @CRLF & _
    "[center][img]http://i.imgur.com/6xjhe.png[/img][/center]" & @CR & @CR & _
    "[spoiler]" & @CR & _
    "[center][img]" & GUICtrlRead($inI1) & "[/img][/center]" & @CR & _
    "[center][img]" & GUICtrlRead($inI2) & "[/img][/center]" & @CR & _
    "[center][img]" & GUICtrlRead($inI3) & "[/img][/center]" & @CR & _
    "[center][img]" & GUICtrlRead($inI4) & "[/img][/center][/spoiler]" & @CR & _
    @CRLF & _
    @CRLF & _
    "[center][img]http://i.imgur.com/syuOX.png[/img][/center]" & @CR & _
    "[spoiler][center]" & @CR & _
    "[img]http://i.imgur.com/HsA1J.png[/img][b]İşletim Sistemi[/b] = " & GUICtrlRead($inOS) & @CR & _
    "[img]http://i.imgur.com/S30It.png[/img][b]İşlemci[/b] = " & GUICtrlRead($inIS) & @CR & _
    "[img]http://i.imgur.com/XmRip.png[/img][b]Ram[/b] = " & GUICtrlRead($inRAM) & @CR & _
    "[img]http://i.imgur.com/bKg3M.png[/img][b]Boş alan[/b] = " & GUICtrlRead($inHDD) & @CR & _
    "[img]http://i.imgur.com/hJIg1.png[/img][b]Ekran kartı[/b] = " & GUICtrlRead($inGC) & @CR & _
    "[img]http://i.imgur.com/gPVNA.png[/img][b]DirectX[/b] = " & GUICtrlRead($inDRX) & "[/center][/spoiler]" & @CR & _
    @CRLF & _
    @CRLF & _
    "[center][img]http://i.imgur.com/HhALJ.png[/img][/center]" & @CR & _
    "[quote][center][media=" & GUICtrlRead($inVD) & "][/center][/quote]" & @CR & _
    @CRLF & _
    "[center][img]http://i.imgur.com/yUQQs.png[/img][/center]" & @CR & _
    "[quote][quote]" & GUICtrlRead($edTB)& "[/quote][/quote]")
    EndIf


    EndSwitch
    WEnd

    [/codebox][/spoiler]

    [b]GUICtrlRead($Nesne Adi) şeklinde okutup metin belgesine yazdırabilirsin.[/b]

    uTorrent Pro 3.6.0 Build 46828 Stable

    in Program-Appz

    Posted

    [center][img]http://i2.lulzimg.com/c0d8ed015c.png[/img]
    [color="#008000"][b]uTorrent 3.1.3 Build 27385 / 3.2 RC1 Build 27343[/b][/color]

    :download1:

    [color="#006400"][b]İndirme Sayfası[/b][/color]
    [code]www.utorrent.com/downloads[/code]
    [color="#008000"][b]Stable Setup[/b][/color]
    [code]http://download.utorrent.com/3.1.3/uTorrent.exe[/code]
    [color="#2E8B57"][b]3.2 RC1 Build 27343[/b][/color]
    [code]http://anonymz.com/?http://download.utorrent.com/latest/uTorrent-beta.exe[/code]
    [color="#00FF00"][b]Portable[/b][/color]
    [code]http://portableapps.com/apps/internet/utorrent_portable[/code]
    [color="#98FB98"][b]MacOS[/b][/color]
    [code]http://www.utorrent.com/downloads/mac[/code]
    [color="#9ACD32"][b]Linux[/b][/color]
    [code]http://www.utorrent.com/downloads/linux[/code]
    [/center]

    AIDA64 Extreme / Business / Engineer / Network Audit 5.99.4900

    in Program-Appz

    Posted

    [center][center][img]http://i.imgur.com/cmKpV.png[/img]

    [b]AIDA64 2.50.2000 / 2.50.2013 Beta[/b]

    :download1:

    [b]Extreme Edition 2.50.2000 Final[/b]
    [code]http://download.aida64.com/aida64extreme250.exe[/code]
    [b]Business Edition 2.50.2000 Final[/b]
    [code]http://download.aida64.com/aida64business250.exe[/code]
    [b]Extreme Edition 2.50.2013 Beta[/b]
    [code]http://download.aida64.com/aida64extreme_build_2013_jdgxb3fcsl.zip[/code]
    [b]Keygen[/b]
    [code]http://www.mediafire.com/download.php?fqr9jld2hslgjt1[/code][/center][/center]

    Dropbox 63.4.102

    in Program-Appz

    Posted

    [center][img]http://i2.lulzimg.com/1346b258a8.png[/img]
    [color="#00BFFF"][b]1.5.4 Beta[/b][/color]

    :download1:
    [code]http://dl-web.dropbox.com/u/17/Dropbox%201.5.4.exe[/code]

    [b]Tüm Sistemler[/b]
    [code]https://www.dropbox.com/install[/code][/center]

    Tor Vidalia 0.1.2.19

    in Program-Appz

    Posted

    [center][img]http://i2.lulzimg.com/a70541a3b5.png[/img]
    [b]Tor 0.2.2.37[/b]

    :download1:

    [b]0.2.2.37 Final[/b]
    [code]https://www.torproject.org/dist/win32/tor-0.2.2.37-win32.exe[/code]
    [b]Latest Tor & Polipo & Vidalia & Torbutton Bundle[/b]
    [code]https://www.torproject.org/dist/vidalia-bundles/vidalia-bundle-0.2.2.37-0.2.19.exe[/code][/center]

    Sourcetec Sothink Dvd Ripper V2.0.205

    in Program-Appz

    Posted

    [center][img]http://s019.radikal.ru/i625/1206/3b/b589a654de44.jpg[/img]

    [b]Sothink DVD Ripper Pro 2.1 Build 211 | 12.6 MB[/b]

    :download1:

    [code]http://extabit.com/file/28e2fhiryr16h/Sothink.DVD.Ripper.Pro.2.1.211.rar
    http://www.squillion.com/mjzl3hqluahd/Sothink.DVD.Ripper.Pro.2.1.211.rar[/code][/center]

    Vso Copyto 5.1.1.3 Multilanguage

    in Program-Appz

    Posted

    [center][img]http://i36.fastpic.ru/big/2012/0608/38/36811269394b4330149c214245ae4538.jpg[/img]

    [b]VSO CopyTo 5.1.0.6 | 21.7 MB[/b]

    :download1:

    [code]http://letitbit.net/download/69616.6e8817b053d5d56e79aa90da1b8d/VSO.CopyTo.5.1.0.6.rar.html
    http://shareflare.net/download/66387.6e8817b053d5d56e79aa90da1b8d/VSO.CopyTo.5.1.0.6.rar.html[/code][/center]

    Sothink Tree Menu 3.1.305

    in Program-Appz

    Posted

    [center][img]http://i25.fastpic.ru/big/2012/0612/14/049b3337b54462ec8a770ec5f7594c14.jpg[/img]

    [b]Sothink Tree Menu 3.1.305 | 10.6 MB[/b]

    :download1:

    [code]https://filepost.com/files/8447ad72/sothink-tree-menu-v3.1.305---patched-dll-by-chaos!.zip/
    http://extabit.com/file/28dtzw4zhwm8e[/code][/center]

    Advanced Pc Tweaker 4.2 Datecode 25.02.2013

    in Program-Appz

    Posted

    [center][img]http://www.advancedpctweaker.com/images/new-i/apt-box-home.jpg[/img]
    [b]Advanced PC Tweaker 4.2 Datecode 05.06.2012 | 3.6 Mb[/b]

    :download1:

    [code]http://www.mediafire.com/?cki8tzvbxcjco62
    OR
    https://filepost.com/files/b8efm96e
    http://vip-file.com/download/08945.0ffe9ae94cae6c06025bbba3916b/Advanced.PC.Tweaker.4.2.Datecode.05.06.2012.rar.html[/code][/center]

    CyberLink PowerDirector Ultimate V18.0.2028.0

    in Program-Appz

    Posted · Edited by g.a

    [center][b]CyberLink PhotoDirector 3.0.2719.41168 | 208 MB[/b]

    lang:English, RUS @Ruslangxp, (Chinese (Traditional), Japanese, Spanish, Korean, Chinese (Simplified), German, French,

    [code]http://letitbit.net/download/30919.3cd7dcc87895a1b22091f4215f3d/CL.PD.3.0.2719.41168.rar.html
    http://extabit.com/file/2csc5gvqbyo3x/CL.PD.3.0.2719.41168.rar[/code]

    [b]Alıntı.Denenmedi.[/b]
    [/center]

    Sanal Surucu Hakkinada Bilgi

    in Yazılım

    Posted · Edited by g.a

    Nasıl bir sorudur bu :D Normal işetim sisteminden farkı yok tabiki. 1 yöntemler var olan sistemin yanına kurarsın.
    [b]Not: Vista/7 yi daima en son kurun XP yi sonra kurarsan Windows Yükleyici silinir MBR den seçemezsin direk XP açılır. [i]http://neosmart.net/EasyBCD/[/i] bu programla düzeltilir ama.[/b]

    Sanal Surucu Hakkinada Bilgi

    in Yazılım

    Posted

    [b]Daemon Tools Lite kullanılarak:[/b]
    [b]1)[/b] Windows ISO kalıbını sanal sürücüye ekle.
    [b]2)[/b] Setup.exe yi çalıştır yeni disk bölümüne Windows u kur...
    [b]Not: Bu yöntemle var olan işletim sisteminin üstüne kuramazsın[/b]

    [b]NT6 HDD Yükleyici kullanılarak(Vista/7):[/b]
    [b]1)[/b] Vista/7 ISO kalıbını şuan ki işletim sisteminin kurulu olmadığı bir bölüme çıkar(ana dizine örn: d:\ ).
    [b]2)[/b] Vereceğim programı çalıştır(2. modda) bilgisayar baştan başlar, "NT6 HDD Yukleyici [EMS] aktif" gibi bir şey yazar onu seç ve eski işletim sisteminin kurulu olduğu yere yükle. (Windows kurulum dosyasının olduğu bölüme kurmaya çalışma, biçimlendirme yapmazsan sorun olmayabilir ama yinede deneme :trollface: )

    [b]Program:[/b]
    [code]http://www.mediafire.com/download.php?0w89cde74jjm93v[/code]

×
×
  • Create New...