IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  digitalpanel

Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 10 Temmuz 2011, 09:35   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
resim load upload




merhaba arkadaşlar epey uğraştım aradım bulamadım resim upload ve load edebileceğim bir kod arıyorum yardım ederseniz mutlu olurum

resimleri mirc ana dizini içinde resim adlı klasöre atıp load ve upload ta

//run $mircdirresim komutuyla bu klasörü kullanmasını istiyorum

herkese iyi forumlar

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet
Alt 10 Temmuz 2011, 22:28   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




Açıkçası istediğinden hiç birşey anlamadım, ne istediğini " Daha - açık " bir şekilde dile getirirsen yardımcı olabiliriz.

 
Alıntı ile Cevapla

Alt 10 Temmuz 2011, 23:16   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




.JPG uzantılı bir resmi resim upload sitesine atmak sitenin verdiği linkten resmi lazım olunca tekrar mirc içersinde resim adlı klasöre indirmek istiyorum işlemi mirc kodlarıyla yapmak istiyorum

 
Alıntı ile Cevapla

Alt 11 Temmuz 2011, 01:44   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
/* Image uploader/downloader by Brando This script was made on mIRC version 6.34 (also tested on version 6.3), so im not completely sure it will work on other versions. */ dialog -l is { title "Image uploader" size -1 -1 247 227 option dbu list 1, 2 13 243 50, size button "+", 2, 212 2 13 10 button "-", 3, 228 2 13 10 icon 5, 26 91 192 106 button "<", 4, 7 133 13 13, disable button ">", 6, 227 133 13 13, disable button "&Upload!", 7, 40 213 42 10 text "URL:", 8, 5 65 13 8 edit "", 9, 22 64 188 10, read autohs button "&Clpb", 10, 213 64 30 10 button "&Close", 11, 162 213 42 10, ok cancel button "&Uploaded Pics", 12, 101 213 42 10 text "", 13, 63 202 114 8, center text "No preview available", 14, 87 137 68 8, center text "Status:", 15, 5 79 20 8 text "Select files to upload", 16, 27 79 183 8, right text "Images to upload:", 17, 5 3 46 8 } dialog -l isv { title "Imageviewer" size -1 -1 264 238 option dbu icon 1, 27 99 209 122 button "<", 2, 5 151 15 16, disable button ">", 3, 244 151 15 16, disable list 4, 4 17 257 54, size button "&Delete", 5, 137 4 37 10 button "&Add image", 6, 179 4 37 10 button "&Close", 7, 221 4 37 10, ok cancel text "URL:", 8, 3 86 14 8 edit "", 9, 29 85 212 10, read autohs button "&Clpb", 10, 243 85 18 10 text "Location:", 11, 3 74 25 8 edit "", 12, 29 73 212 10, read autohs button "&Clpb", 13, 243 73 18 10 text "No preview available", 14, 51 152 161 15, center text "", 15, 75 226 110 8, center text "", 16, 4 5 65 8, left } menu * { Image uploader .Upload images: is .Download images: dialog -m isv isv } alias is { set %i.mode $iif($1,$1,-m) if (!$hget(is)) hmake is 50 dialog $iif($dialog(is),-v,%i.mode) is is } alias -l i.loadimg { if ($did(is,1).sel) { did -v is 5 did -g is 5 $qt($did(is,1).seltext) did -h is 14 did -a is 13 $nopath($did(is,1).seltext) if ($hfind(is,$did(1).seltext).data) did -ra is 9 $v1 else did -r is 9 } else { :error if ($error) reseterror did -v is 14 did -h is 5 did -r is 13 } } alias -l i.chkbutton { if ($did(is,1).lines <= 1) did -b is 4,6 else { did $iif($did(is,1).sel == 1,-b,-e) is 4 did $iif($did(is,1).sel == $did(is,1).lines,-b,-e) is 6 } } alias -l i.id { :id var %x upload $+ $r(0,$str(9,12)) if ($sock(%x)) goto id return %x } alias -l iv.loadimg { if ($did(isv,4).sel) { var %x $did(isv,4,$v1) did -h isv 14 did -v isv 1 did -g isv 1 $qt($hget(is,%x)) did -ra isv 15 $nopath(%x) did -ra isv 12 $hget(is,%x) did -ra isv 9 %x } else { :error if ($error) reseterror did -vra isv 14 No preview available did -h isv 1 did -r isv 9,12,15 } } alias -l iv.chkbutton { if ($did(isv,4).lines <= 1) did -b isv 2,3 else { did $iif($did(isv,4).sel == 1,-b,-e) isv 2 did $iif($v1 == $did(isv,4).lines,-b,-e) isv 3 } } on *:exit:{ hsave is is.dat } on *:start:{ hmake is 50 hload is is.dat } on *:unload:{ echo -ag :( hfree is remove is.dat } on *:dialog:is:*:*:{ if ($devent == sclick) { if ($did == 2) && ($msfile(.bmp,Select file,Upload)) { if ($v1 == -1) noop $input(You've selected too many files.,ow,Error) else { var %x 1, %err $false while ($msfile(%x)) { if (!$regex($v1,/\.(?:jpe?g|png|bmp|ico|img|gif|swf|tiff?)$/i)) var %err $true else did -a $dname 1 $msfile(%x) inc %x } if (%err) noop $input(Some selected files were not supported image files.,oh,Error) if (!$did(1).lines) did -ra $dname 16 Select some files to upload. else did -ra $dname 16 Ready to upload ( $+ $did(1).lines $+ ) images. did -c $dname 1 1 i.chkbutton i.loadimg } } elseif ($did == 3) && ($did(1).sel) { did -d $dname 1 $v1 if ($did(1).lines) did -ra $dname 16 Ready to upload ( $+ $did(1).lines $+ ) images. else did -ra $dname 16 Select some files to upload. did -r $dname 9 i.loadimg } elseif ($did == 10) && ($did(9)) clipboard $v1 elseif ($did == 1) && ($did(1).sel) { i.chkbutton i.loadimg } elseif ($istok(4 6,$did,32)) { did -c $dname 1 $calc($did(1).sel $iif($did == 4,-,+) 1) i.loadimg i.chkbutton } elseif ($did == 7) && ($did(1).lines) { if ($sock(upload*,0)) { if ($input(Upload in progress. Abort upload in progress?,ynw,Upload in progress)) { sockclose upload* did -ra $dname 16 Ready to upload ( $+ $did(1).lines $+ ) images. } else return } var %x $did(1).lines, %y while (%x) { if ($hfind(is,$did(1,%x)).data) { dec %x continue } var %i $i.id sockopen %i load.imageshack.us 80 sockmark %i $did(1,%x) inc %y dec %x } if (%y) { did -ra $dname 16 Uploading images 0 of %y complete. if (%y < $did(1).lines) noop $input(Some of the chosen files have already been uploaded. Uploading %y images.,oi,Images already uploaded) } else { noop $input(All of the chosen files have already been uploaded.,o,Error) did -ra $dname 16 Select files to upload. i.loadimg i.chkbutton } } elseif ($did == 12) dialog $iif($dialog(isv),-v,%i.mode) isv isv } elseif ($devent == dclick) && ($did == 1) && ($did(1).seltext) run $v1 elseif ($devent == close) { unset %i.mode sockclose upload* } } on *:dialog:isv:*:*:{ if ($devent == init) { var %x 1 while ($hget(is,%x).item) { did -a $dname 4 $v1 inc %x } did -c $dname 4 1 did -a $dname 16 $hget(is,0).item images iv.loadimg iv.chkbutton } elseif ($devent == sclick) { if ($did == 5) && ($did(4).seltext) { hdel is $v1 did -d $dname 4 $did(4).sel did -ra $dname 16 $calc($gettok($did(16),1,32) - 1) images did -r $dname 9,12 iv.loadimg iv.chkbutton } elseif ($did == 6) { if ($sock(download)) { if ($input(Image download in progress. Abort download in progress?,ynw,Download in progress)) sockclose download else return } var %i $input(Input image url (must be direct link),ei,Image download), %len $len(%i) if (!%i) return if (!$regex(%i,/^(?:http:\/\/)?([^\/]+)(.+(jpe?g|png|bmp|ico|img|gif|swf|tiff?))$|[^\x3D]{ $+ %len $+ }/i)) noop $input(Unsupported image file.,oh,Error) elseif ($hfind(is,http:// $+ $regml(1) $+ $regml(2))) noop $input(You've already downloaded this image.,oi,Error) else { did -h isv 1 did -vra isv 14 Downloading $qt(%i) sockopen download $regml(1) 80 sockmark download $regml(1) $regml(2) } } elseif ($did == 4) && ($did(4).seltext) { did -ra $dname 9 $v1 did -ra $dname 12 $hget(is,$v1) iv.loadimg iv.chkbutton } elseif ($istok(2 3,$did,32)) { did -c $dname 4 $calc($did(4).sel $iif($did == 2,-,+) 1) iv.loadimg iv.chkbutton } elseif ($did == 10) && ($did(9)) clipboard $v1 elseif ($did == 13) && ($did(12)) clipboard $v1 } elseif ($devent == dclick) && ($did == 4) && ($did(4).seltext) run $hget(is,$v1) } on *:sockopen:upload*:{ if ($sockerr) { .signal -n i.fail $sock($sockname).mark sockclose $sockname } else { var %i $md5($sockname), %img $sock($sockname).mark, %ext $regex(%img,/\.(\w+)$/), %ext $regml(1) bread $qt(%img) 0 $file($qt(%img)).size &img bset -t &cont 1 -- $+ %i $+ $crlf $+ Content-Disposition: form-data $+ $chr(59) name="fileupload" $+ $chr(59) filename=" $+ $nopath(%img) $+ " $+ $crlf $+ $& Content-Type: image/ $+ %ext $+ $str($crlf,2) bcopy &cont $calc($bvar(&cont,0) + 1) &img 1 -1 bset -t &cont $calc($bvar(&cont,0) + 1) $crlf $+ -- $+ %i $+ -- $+ $crlf sockwrite -n $sockname POST / HTTP/1.0 sockwrite -n $sockname Host: load.imageshack.us sockwrite -n $sockname Connection: Keep-Alive sockwrite -n $sockname Keep-Alive: 1200 sockwrite -n $sockname Content-Type: multipart/form-data $+ $chr(59) boundary= $+ %i sockwrite $sockname Content-Length: $bvar(&cont,0) $+ $str($crlf,2) sockwrite $sockname &cont } } on *:sockread:upload*:{ if ($sockerr) { .signal -n i.fail $sock($sockname).mark sockclose $sockname return } var %x sockread %x if ($regex(%x,/<input type="text" onClick="track\('direct'\).+value="(.+)"\/>/i)) { did -ra is 9 $regml(1) tokenize 32 $did(is,16) var %i $3 + 1 if (%i == $5) did -ra is 16 Uploaded $5 images. else did -ra is 16 Uploading images %i of $5 complete. hadd -m is $regml(1) $sock($sockname).mark sockclose $sockname } } on *:sockclose:upload*:{ .signal i.fail $sock($sockname).mark } on *:signal:i.fail:{ if ($input(Upload failed on img $qt($1-) $+ . Click retry to upload the img again.,rh,Error)) { var %s $i.id sockopen %s load.imageshack.us 80 sockmark %s $1- } else { tokenize 32 $did(is,16) if ($calc($3 + 1) == $5) did -ra is 16 Upload complete. else did -ra is 16 Uploading images $calc($3 - 1) of $calc($5 - 1) complete. } } on *:sockopen:download:{ if ($sockerr) { noop $input(Unable to download image.,oh,Error) sockclose $sockname } else { tokenize 32 $sock($sockname).mark sockwrite -nt $sockname GET $2 HTTP/1.0 sockwrite $sockname Host: $1 $+ $str($crlf,2) } } on *:sockread:download:{ if ($sockerr) { noop $input(Error downloading image.,oh,Error) sockclose $sockname return } tokenize 32 $sock($sockname).mark if ($0 == 2) { var %x $true while (%x) { if (Content-Len isin %x) var %len $gettok(%x,2,32) sockread %x } sockmark $sockname $sock($sockname).mark $iif(%len,$v1,$false) return } var %fn $nopath($2) while ($sock($sockname).rq) { sockread &cont bwrite %fn -1 -1 &cont } if ($3) && ($file(%fn).size >= $3) { sockclose $sockname did -ac isv 4 http:// $+ $1 $+ $2 hadd -m is http:// $+ $1 $+ $2 $longfn(%fn) iv.loadimg iv.chkbutton } } on *:sockclose:download:{ tokenize 32 $sock($sockname).mark did -ac isv 4 http:// $+ $1 $+ $2 hadd -m is http:// $+ $1 $+ $2 $longfn($nopath($2)) iv.loadimg iv.chkbutton }



[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

sanırım aradığınız bu...


Konu Heartbroken tarafından (11 Temmuz 2011 Saat 01:51 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 11 Temmuz 2011, 19:33   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




evet tam olarak böyle birşey arıyorum kod suan calışıyormu çalısıyorsa hangi mirc versionunda calısıyor bende hata verdi



Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 11 Temmuz 2011, 19:38   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




Kodun En üst Satırında Kullanabileceğin Version Yazıyor O versiyonlar içinde kullanabilirsin

Alıntı:
/*
Image uploader/downloader by Brando
This script was made on mIRC version 6.34 (also tested on version 6.3), so im not completely sure it will work on other versions.
*/

Türkçesi MIRC 6,3 ve 6,34 de Çalışır. üst versiyonlarda Sıkıntı olabilir

 
Alıntı ile Cevapla

Alt 11 Temmuz 2011, 22:23   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




malesef gene aynı hatayı verıyor win 7 64 bit işletim sistemi bununla alakalı olabilirmi kodu kullnan varmı çalışıyormu yani

 
Alıntı ile Cevapla

Alt 12 Temmuz 2011, 05:03   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




Test edilen mIRC Version'ları; 6.3 , 6.34/35 (çalıştı.)
Test Edilen OS: Win XP , Win 7 /64 ve 32 bit (Çalıştı.)

 
Alıntı ile Cevapla

Alt 12 Temmuz 2011, 20:09   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload





Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


----------

sahr Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

mirci sıfır indirdim kodu tekrar kopyaladım gene bu hatayı verıyorur ben çalıştıramadım bu kodu başka upload load kodu bilen arkadasımız varmı veya bu hata sebebini bilen bir bir arkadasımız varmı ne yaptımsa olmuyor 6.34 6.35 versionlarını denedım aynı hata hep esim uzantılarını jpg png gibi uzantılar denedım aynı hata sıfır mirc yukledım gene aynı hata sorun nerde acaba

 
Alıntı ile Cevapla

Alt 13 Temmuz 2011, 00:25   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: resim load upload




Sıkça karşılaştığımız problemlerden biri olma olasılığına göre yazıyorum bu bilgiyi, mIRC'inin bulunduğu kısım " C:/Program Files (x86)/Türkçe mIRC 6.32/ " vs vs, bu kurulu olan mirc'i senden direkt " C:/mIRC " şeklinde çalışacak hale getirip, tekrar addon'u denemeni istiyorum .. Klasör aralarında ki boşluklar kesinlikle etkileyebiliyor, lütfen böyle dene.

 
Alıntı ile Cevapla

Cevapla

Etiketler
load, resim, upload


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Resim UpLoad ? Nurullahoruc PHP 4 16 Ekim 2007 20:13