Screenshot And Image Uploader

This script takes a screenshot of your desktop and then upload it to image shack

see for yourself

How does it upload? Hey chief long time no see!

sockets

the socket code was used from mircscripts then edited to add in the other stuff i wanted

Well I figure you use a socket. I just always wanted to know how to upload using sockets.

It would be cool to make an ftp client through mirc just for the fun of it.

will post it tomorrow for you

thanks, also, what program do you use to film your desktop? That is a great way to show people how to use SoulFly and it's capabilities.

Camtasia Studio is a great program to record your desktop That's what I use, anyway.

yeah that's what i used to make a quick simple sf first connect vid

on the subject at hand.. good job haggis.. i like that idea

i dont remember what i used to make the video as i downloaded it last night lol

but i will check when i get home from work

I also have code in there so you can pick a file from your hard drive to upload so iwill be making a dialog to get that in there too

here you go travis

alias /share {
    %sharing_file = $1-
  %tempsockname = imageshack_drone $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9)
  sockopen %tempsockname www.imageshack.us 80
  sockmark %tempsockname filename= $+ %sharing_file
}




on 1:sockopen:imageshack_drone*:{

  bset -t &postdata 1 -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="uploadtype" $+ $crlf $+ $crlf

  bset -t &postdata $calc($bvar(&postdata,0) + 1) on $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="fileupload"; filename=" $+ $nopath($gettok($mid($sock($sockname).mark,11),1,59)) $+ " $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Type: image/jpeg $+ $crlf $+ $crlf

  bread " $+ $gettok($mid($sock($sockname).mark,10),1,59) $+ " 0 $file($gettok($mid($sock($sockname).mark,10),1,59)).size &file_contents
  bcopy &postdata $calc($bvar(&postdata,0) + 1) &file_contents 1 -1
  bset -t &postdata $calc($bvar(&postdata,0) + 1) $crlf $+ -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="url" $+ $crlf $+ $crlf

  bset -t &postdata $calc($bvar(&postdata,0) + 1) paste image url here $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="email" $+ $crlf $+ $crlf $+ $crlf


  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="MAX_FILE_SIZE" $+ $crlf $+ $crlf

  bset -t &postdata $calc($bvar(&postdata,0) + 1) 13145728 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="refer" $+ $crlf $+ $crlf

  bset -t &postdata $calc($bvar(&postdata,0) + 1) http://imageshack.us/ $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="brand" $+ $crlf $+ $crlf $+ $crlf


  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) Content-Disposition: form-data; name="optsize" $+ $crlf $+ $crlf

  bset -t &postdata $calc($bvar(&postdata,0) + 1) 320x320 $+ $crlf
  bset -t &postdata $calc($bvar(&postdata,0) + 1) -----------------------------18762165517410--

  sockwrite -nt $sockname POST / HTTP/1.1
  sockwrite -nt $sockname Host: imageshack.us
  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 6.0; ko; rv:1.9.0.10) Gecko/2009042316 Frefox/3.0.5
  sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
  sockwrite -nt $sockname Accept-Language: en-us,en;q=0.8,ko-kr;q=0.5,ko;q=0.3
  sockwrite -nt $sockname Accept-Charset: EUC-KR,utf-8;q=0.7,*;q=0.7
  sockwrite -nt $sockname Keep-Alive: 1200
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Referer: http://imageshack.us/?no_multi=1
  sockwrite -nt $sockname Content-Type: multipart/form-data; boundary=---------------------------18762165517410
  sockwrite -nt $sockname Content-Length: $bvar(&postdata,0) $+ $crlf $+ $crlf
  sockwrite $sockname &postdata
}

on 1:sockread:imageshack_drone*:{
  sockread -f %lol
  if $mid(%lol,1,9) = location: {

    %lol = $mid(%lol,11)
echo -a 4Uploaded to imageshack: http:// $+ $gettok(%lol,2,$asc(/)) $+ / $+ $gettok($gettok(%lol,2-,$asc(?)),3-,$asc(=))

    set %link http:// $+ $gettok(%lol,2,$asc(/)) $+ / $+ $gettok($gettok(%lol,2-,$asc(?)),3-,$asc(=))
    unset %lol


  }

}

This is a kewl idea haggis.. though i wanted a bit more control over my image so i thought i would make something so the image would go to tg's hosting.. then in hit me. dropbox.. now i just create the image in dropbox and give the link

love the idea haggis

yeah i wish i could limit it to only take a snap of the currnt window i.e. mirc lol

i've seen screenshot takers that do that.. i think the one chain has will do that

ok will need to ask chain lol

how are u making it upload to tg

i think i know how to do it using mirc to run a dos batch file but thats only way i can think of

i was wrong about sshot.. it just uses nscreenshot.dll so no edit to just mirc..

I'm not uploading it to tg.. i'm saving it in my dropbox folder that has a link to the public to view..

if you don't have dropbox you really should.. it's really a great program https://www.getdropbox.com/referrals/NTEwODA1NDY5

ahh looks good

i will also have a look at that dll

here is what i'm using.. very messy and basic but will give you an idea of what i'm doing

alias screenshot {
  if ($1) {
    echo -a $str($chr(160),15) 11Creating Screenshot... |  set %ssname $1
    //dll $qt($mircdirdlls/mirc ss.dll) takess 090 PATH TO YOUR DROPBOX FOLDER\My Dropbox\Public\ $+ %ssname $+ .jpg
    noop $dll($mircdirdlls/mirc ss.dll, takess, 090 PATH TO YOUR DROPBOX FOLDER\My Documents\My Dropbox\Public)
    .timer.screenshot 1 15 getssfile 
  }
}
alias getssfile { 
echo -a  $str($chr(160),15) 3Screenshot created 12http://dl.getdropbox.com/u/DROPBOXIDNUMBER/ $+ %ssname $+ .jpg
  /run http://dl.getdropbox.com/u/DROPBOXIDNUMBER/ $+ %ssname $+ .jpg
  unset %ssname
}

thats the same dll i am using

so that takes a pic of your whole desktop yeah

dropbox seems a good idea

right now i am taking the screenshot saving to hard drive

uploading to imageshack and writing the link to a text file

was gonna make a bit to list them all in a @window with link and date/time taken

I was at a computer fair not to long ago and I see that "Camtasia Studio 6.0 .... is it worth me buying it and do you think I will be able to work it ... as always nais tuke = thank you for any replies