Jump to content

luger

Üye
  • Posts

    72
  • Joined

  • Last visited

Posts posted by luger

  1. #include <File.au3>
    #include <String.au3>
    
    $dosya=FileOpen("oku.exe", 16)
    $dosya_oku=FileRead($dosya)
    $string=BinaryToString($dosya_oku, 4)
    
    $oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
    $oHTTP.Open("POST", "site_adi". False)
    
    $oHTTP.SetRequestHeader("Content-Type", "multipart/form-data; boundary=---------------------------31972514120")
    $oHTTP.SetRequestHeader("User-Agent", "...")
    $oHTTP.SetRequestHeader("Pragma", "no-cache")
    
    $dosya_adi='"oku.exe"'
    $veri="-----------------------------31972514120" & @CRLF & _
    'Content-Disposition: form-data; name="file"; filename='& $dosya_adi & @CRLF & _
    'Content-Type: application/x-msdownload' &@CRLF&@CRLF& _
    $string & @CRLF & _
    "-----------------------------31972514120" & @CRLF & _
    'Content-Disposition: form-data; name="apikey"' & @CRLF & @CRLF & _
    "" & @CRLF & _
    "-----------------------------31972514120--" & @CRLF
    
    $oHTTP.Send($veri) 

    @blackman12Yukarıda işlemi yapmak istiyorum hocam. Binary veya hex'le okutamam çünkü gidecek veri string olmalı. Diğer durumlarda giden_veri.lenght uzunluğu ve veri yapısı değişir ve gönderilen dosya o şekilde olmamalı :)

     

    Ayrıca Autoit'le ilgili çoğu bilgiyi Autoit'in kendi help dosyasından öğrendim.

  2. @blackman12: Yardımınız için çok teşekkür ederim.

    Sizin verdiğiniz durumda dosyayı binary olarak okuyorum. Ama string olarak lazım olduğundan durum aşağıdaki gibi oluyor gene.. :(

    pre_1391433908__kzmbv3.png

    #include <File.au3>
    #include <String.au3>
    
    $dosya=FileOpen("oku.exe", 16)
    $string=FileRead($dosya)
    MsgBox(0, "1", BinaryToString($string, 1))
    MsgBox(0, "2", BinaryToString($string, 4)) 

    Ayrıca Autoit versiyonum : 3.3.10.2

  3. İyi günler tüm forum halkına,

    Bu benim forumdaki ilk mesajım. :)

     

    Arkadaşlar bu sıralar autoit üzerinde çalışıyorum. 

     

    Aşağıdaki kodlar .exe dosyasını okumak için yazıldı. FileRead fonksiyonu dosyayı string olarak

    okumalı. Ama tamamını okumuyor. Yada başka bir yerde sorun var . $string değişkenine sadece "mz" ifadesini atıyor.

    Ben daha dosyanın geri kalanını görmeyi başaramadım FileRead'le :)

    #include <File.au3>
    #include <String.au3>
    
    $dosya=FileOpen("oku.exe", $FO_READ )
    $string=FileRead($dosya)
    
    MsgBox(0, "a", $string)
    

    Kullandığım kodlar yukarıda. Çıkan sonuç aşağıdaki gibi.

    pre_1391433839__wbk1av.png

     

    Ama görmem gereken yaklaşık aşağıdaki resimdeki gibi olmalıydı diye biliyorum :)

    pre_1391433880__kpnd3q.pngVe elbette daha fazlası...

     

    Arkadaşlar bu durum için ne diyorsunuz? Nasıl elde edebilirim FileRead'le veriyi string olarak. Gerçekten elde edilen veri nereye gidiyor. Ben göremiyorum :)

     

    Kullandığım dosya:http://tr.rghost.net/52173713

×
×
  • Create New...