3 replies to this topic

[require]

TinyTool ermöglicht es dir Links mithilfe von TinyURL.com zu kürzen.


Basisdaten:

• Programmiert in Visual Basic
• Verwendete IDE: Microsoft Visual Basic 2010 Express
• Lizenztyp/Weitergabe: Freeware; Open Source

Minimale Systemvoraussetzungen:

• Microsoft Windows XP
• Microsoft .NET Framework 3.5

AV Scan:

Please Login HERE or Register HERE to see this link!

Infected, warum auch immer^^

Ich gebe hier mit volle garantie auf die sauberkeit dieses Tools

Download:

Please Login HERE or Register HERE to see this link!

Source:

Imports System.Net
Imports System.IO
Imports System.Text.RegularExp[b][/b]ressions
Public Class Form1

Function tiny(ByVal url As String)
	 Dim Request As HttpWebRequest = HttpWebRequest.Create("http://tinyurl.com/api-create.php?url=" & url)
	 Dim Response As HttpWebResponse = Request.GetResponse()
	 Dim reader As StreamReader = New StreamReader(Response.GetResponseStream)
	 Dim Content As String = reader.ReadToEnd
	 TextBox2.Text = Content
	 Return True
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	 tiny(TextBox1.Text)
End Sub
End Class

Aufwand:
~10 Minuten

[Praha9]

??bersichtlich, praktisch, handlich, schnell und tut was es soll.

[tpw]

hi,

nettes tool.

habe das gleiche mal in python geschrieben.
geht evtl noch etwas schneller und gleich in der console.

wenn's nicht erwünscht ist einfach löschen

#!/usr/bin/python
#-*-coding: utf-8-*-

import sys
import urllib2

def main(argc, argv):
print (urllib2.urlopen("http://tinyurl.com/api-create.php?url=" + argv[1]).read() if argc == 2 else "Usage: " + argv[0] +" http://example.com")

if __name__ == "__main__":
main(len(sys.argv), sys.argv)

[jabba]

Funktioniert super und macht was es soll.

[tested]

MFG Jabba