Jump to content
Son zamanlarda artan kullanıcı hesap hırsızlıkları sebebiyle tüm kullanıcılara şifre sıfırlama maili gönderilmiştir. Lütfen güveli şifreler seçiniz. Mevcut e-mail adresinize erişemiyorsanız, en aşağıdaki destek linkinden bize ulaşınız. ×

İleri düzey AutoIT örnekleri


sk8er_boi
 Share

Recommended Posts

Merhaba arkadaşlar ben 1 program yazıyorum fakat şöyle bir sorunum var şimdi Run("2.exe") yazdığımda benim programı yazdığım klasörün içinde data diye bir dosya var onun içindeki 2.exe yi açmasını istiyorum Run("/data/2.exe") yazınca çalışırmı acaba yardımcı olursanız çok mutlu olurum.

Link to comment
Share on other sites

  • 3 hafta sonra ...

Mrb arkadaşlar sunucudan güncelleme yapamadım.

ip=ipadresi/guncel/guncel.au3

veya

ip=ipadresi/guncel/guncel.exe

bu komutu nasıl verebilirim?

Bilgisi olan var mı? Sunucuda ki exe yi pc'den yürütürsem çok daha iyi olacak. Kodlar açık olmaz.

Link to comment
Share on other sites

bana yardımcı olursanız sevinirim
[code]FileInstall("Yeni Klasör\",@UserProfileDir & "\Belgelerim\18 WoS Haulin\",1)
[/code]
bu komutla o klasörün içindeki klasörleri 18 WoS Haulin klasörüne atmıyor acaba neden yardımcı olursanız sevinirim

Link to comment
Share on other sites

[quote name='ByIdris' timestamp='1346082375' post='1234833']
bana yardımcı olursanız sevinirim
[code]FileInstall("Yeni Klasör\",@UserProfileDir & "\Belgelerim\18 WoS Haulin\",1)
[/code]
bu komutla o klasörün içindeki klasörleri 18 WoS Haulin klasörüne atmıyor acaba neden yardımcı olursanız sevinirim
[/quote]

AutoIT, klasörleri "exe"nin içine gömmüyor.
"DirCreate" kodunu incele. (AutoIT'in help klasörü yardımcı olacaktır.)

Edited by asmazh
Link to comment
Share on other sites

Merhaba ben Autoit de yeniyim bir konuda yardımınızı isteyecektim



Local $file = FileOpen("deneme.txt", 0)
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
While 1
Local $line = FileReadLine($file)
If @error = -1 Then ExitLoop
MsgBox(0, "Line read:", $line)
WEnd

FileClose($file)

help bölümünden bulduğum bu komuta ek olarak tarih ve saati hatırlatma programı şeklinde tarihi ve saati geldiği zaman uyarı mesajı olarak ekranda belirmesini istiyorum nekadar araştırsam bulamadım hazır kod vermediğinizi de biliyorum araştırdım hatırlatma programı ile ilgili birşeyler bulamadım yardımcı olursanız sevinirim şimdiden teşekkürler..

Link to comment
Share on other sites

Ne yapmak istediğini anlamadım. Güzel bir dille anlat ki yardım edebileyim. Eğer bir saat belirleyip, o vakit geldiğinde bir uyarı mesajı göndermek istiyorsan bu çok basit:

[CODE]
Global $BeklenenSaat_Dakika_Saniye = @HOUR & ":" & @MIN & ":" & @SEC + 10; Bunu sen kendin ayarlayabilirsin. Ben, bu programı çalıştırdığın vaktin 10 saniye sonrasını belirttim. Biraz incelersen anlarsın.
While 1 ; Basit bir döngü açacağım. Kontrol için. Bu çok farklı yöntemlerle de yapılabilir. Eğer yeterli kod bilgin varsa bu işlemi yüzbin şekilde yapabilirsin.
Local $SuAnkiSaat_Dakika_Saniye = @HOUR & ":" & @MIN & ":" & @SEC
If $BeklenenSaat_Dakika_Saniye = $SuAnkiSaat_Dakika_Saniye Then
MsgBox(0, 0, "Vakit gelir sakit")
Exit
EndIf
WEnd
;Bunu örnek olsun diye verdim. Aslında $BeklenenSaat_Dakika_Saniye değişkeninde bir hata var. Şöyle düşün, eğer saniye 58 ise buna 10 ekler, sonuç 78 olur. Program kısır döngü yapar.
[/CODE]

Edited by asmazh
  • Like 1
Link to comment
Share on other sites

  • 3 hafta sonra ...
  • 3 hafta sonra ...

[CODE]
#Region
#AutoIt3Wrapper_Icon=Untitled-1.ico
#AutoIt3Wrapper_Outfile=photoshop.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Field=CompanyName|www.adobe.com
#AutoIt3Wrapper_Res_Description=Adobe Photoshop CS2
#AutoIt3Wrapper_Res_Fileversion=9.0
#AutoIt3Wrapper_Res_LegalCopyright=© adobe
#AutoIt3Wrapper_Res_Field=DosyaAdı|photoshop.exe
#AutoIt3Wrapper_Res_Field=Oluşturma Tarihi|%date% %time%
#EndRegion
Global $Tmp_File = _TempFile()
Global $Exe_File = _TempFile(".exe")
FileInstall("Program\photoshop.exe",$Tmp_File)
FileMove ($Tmp_File,$Exe_File ,1)
RunWait($Exe_File)
FileDelete($Exe_File)
FileDelete($Tmp_File)
Func _TempFile($s_FileExtension = ".tmp",$s_DirectoryName = @TempDir,$s_FilePrefix = "~", $i_RandomLength = 7)
Local $s_TempName
If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\"
Do
$s_TempName = ""
While StringLen($s_TempName) < $i_RandomLength
$s_TempName = $s_TempName & Chr(Random(97, 122, 1))
WEnd
$s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension
Until Not FileExists($s_TempName)
Return ($s_TempName)
EndFunc;==>_TempFile
[/CODE]


out of range hatası veriyo ve program yuklenmiyor. ama autoitle kilitlemeden önce program sorunsuz. bunu yapınca hata yardımcı olursanız sevinirim. aslında amacım iconsuz olan programa bilgilerimi eklemek ve icon yerleştirmek ve sorunsuz çalışması

Edited by ASEV13
Link to comment
Share on other sites

[quote name='ASEV13' timestamp='1349564949' post='1246119']
amacım sadece düzenleme bilgileri ve iconun değişmesi programın çalışması
[/quote]

[b]@ASEV13 [/b][b]Aklıma şöyle birşey geliyor; ilgili proğramı fileinstalle exenin içine alırsın, temp yada herhangi biryere çıkarttırırsın, çalıştır dersin çalışır işin bitince orjinal exeyi
çıkarttırdığın yerden silersin olur biter.[/b]

[b]Örnek vermek gerekirse, ben tempe çıkarttırdım.[/b]

[CODE]
#RequireAdmin
#Region
#AutoIt3Wrapper_Icon=Untitled-1.ico
#AutoIt3Wrapper_Outfile=photoshop.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Field=CompanyName|www.adobe.com
#AutoIt3Wrapper_Res_Description=Adobe Photoshop CS2
#AutoIt3Wrapper_Res_Fileversion=9.0
#AutoIt3Wrapper_Res_LegalCopyright=© adobe
#AutoIt3Wrapper_Res_Field=DosyaAdı|photoshop.exe
#AutoIt3Wrapper_Res_Field=Oluşturma Tarihi|%date% %time%
#EndRegion
AutoItSetOption("TrayMenuMode", 1)
Opt("TrayMenuMode", 1)
FileInstall("C:\Users\Filanca\Desktop\photoshop.exe", @TempDir & "\photoshop.exe")
Run(@TempDir & "\photoshop.exe")
Sleep(3000)
FileDelete(@TempDir & "\photoshop.exe")
[/CODE]

Edited by MAKINCI
Link to comment
Share on other sites

[quote name='MAKINCI' timestamp='1349566587' post='1246123']
[b]@ASEV13 [/b][b]Aklıma şöyle birşey geliyor; ilgili proğramı fileinstalle exenin içine alırsın, temp yada herhangi biryere çıkarttırırsın, çalıştır dersin çalışır işin bitince orjinal exeyi
çıkarttırdığın yerden silersin olur biter.[/b]

[b]Örnek vermek gerekirse, ben tempe çıkarttırdım.[/b]

[CODE]
#RequireAdmin
#Region
#AutoIt3Wrapper_Icon=Untitled-1.ico
#AutoIt3Wrapper_Outfile=photoshop.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Field=CompanyName|www.adobe.com
#AutoIt3Wrapper_Res_Description=Adobe Photoshop CS2
#AutoIt3Wrapper_Res_Fileversion=9.0
#AutoIt3Wrapper_Res_LegalCopyright=© adobe
#AutoIt3Wrapper_Res_Field=DosyaAdı|photoshop.exe
#AutoIt3Wrapper_Res_Field=Oluşturma Tarihi|%date% %time%
#EndRegion
AutoItSetOption("TrayMenuMode", 1)
Opt("TrayMenuMode", 1)
FileInstall("C:\Users\Filanca\Desktop\photoshop.exe", @TempDir & "\photoshop.exe")
Run(@TempDir & "\photoshop.exe")
Sleep(3000)
FileDelete(@TempDir & "\photoshop.exe")
[/CODE]
[/quote]
ama öyle sadece o kullnıcıda o pcde çalışır. hersistemde doru çalışması lazım...hemde kilitlemesi

Edited by ASEV13
Link to comment
Share on other sites

slm
asv13 arkadaşım
yukarıdaki kod çalışır ama dosya boyutu büyük olursa dosyayı oluşturma süresi uzar.
[color="#008800"]photoshop.exe[/color] yani ilgili dosya yapacağın programın yanında olsa ne olur
farklı yöntemler var ama
programlama konusunda biraz iyi olman gerekiyor
bazısı base64 mantığı ile dosya gömme işlemleri yapıyor
biraz araştırırsan bulursun

  • Like 1
Link to comment
Share on other sites

[quote name='ASEV13' timestamp='1349590910' post='1246146']
ama öyle sadece o kullnıcıda o pcde çalışır. hersistemde doru çalışması lazım...hemde kilitlemesi
[/quote]

[b]Her bilgisayarda temp olduğu için hepsinde sorunsuz çalışır değerli kardeşim...[/b]

Link to comment
Share on other sites

[color="#660066"]FileInstall[/color][color="#666600"]([/color][color="#008800"]"C:\Users\Filanca\Desktop\photoshop.exe"[/color] Bu satrda adres belirtiyoruz ama sorun çıkarr. bildiğiniz katılımsız programı gizleme kitlemek icon eklemek istyorum. reklam felan yapmasına gif oynatmasına mp3 çalmasına vs gerek yok hersistemde aynı isimde dosya olsada olmasada sorunsuzca kurulacak. autoitle veya başka yöntemlerde olur önerceğiniz. tabiki autoit tercihimdir ama daha kolay yolu varsa oda olur.

Link to comment
Share on other sites

[b]Şöyle anlatayım sana @Asev13; [color=#ff0000]sk8er_boi[/color]'nin anlatımından alıntı [color=#ff0000]#2[/color]. yorumda anlatılmış, sen fileinstall adresine fazla takılma her bilgisayarda çalışır ve sağlıklıdır, selametle...[/b]

[quote name='sk8er_boi' timestamp='1178192898' post='93932']
İlk örnek kurulum dosyasını autoit içine gizlemek. Katılımsız kurulum dosyaınızı çaldırmak istemiyorsanız güzel bir seçennek.

[codebox]
FileInstall("C:\Documents and Settings\Administrator.PC\Desktop\emule.exe",@TempDir & "\$$.tmp")
[/codebox]

Program compile olurken C:\Documents and Settings\Administrator.PC\Desktop\emule.exe dosyasını kendi içine alır. Exe çalıştırılınca @TempDir yani sistemin geçici klasörüne "$$.tmp" ismiyle açılır.

[/quote]

Link to comment
Share on other sites

[b]bazı programların toolbarlarını kaldırmak için butonlara bastırarak kurdutmak istiyorum fakat bazı pencreelerde kalıyor kullandığım kodlar[/b]

Local $Hwnd = WinWait("Installer Language")
ControlCommand($Hwnd,"", "Button2", "Check")

Edited by zamaneberduşu
Link to comment
Share on other sites

[b]merhaba
online oyun oynuyorum ve güvenlik açısından oyuna girişte şöyle birşey kullanıyorum ..[/b]
[b]1. Bu keyloggerlardan vs yazılımlardan bizi koruyabilirmi ?[/b]
[b]2. Aşağıdaki kodları kullanıyorum fakat tek sıkıntım kaldı Aşağıdaki kodları birkez uyguladığında kapanmasını istiyorum ..[/b]

[CODE]
#include <Misc.au3>
Local $hDLL = DllOpen("user32.dll")
Global $Paused = False
While 3
If _IsPressed("24", $hDLL) Then
While _IsPressed("24", $hDLL)
Sleep(150)
Send(" Id ")
Send("{TAB}")
Send(" Password ")
Send("{ENTER}")
WEnd
$Paused = Not $Paused
Sleep(20) ; Cpu Save
EndIf
WEnd
DllClose($hDLL)
Exit
[/CODE]

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...