2010-12-13 2 views

답변

4

나는 그것이 어떻게 작동하는지보고 자신을 관심, 이것이 당신이 시작할 수 있습니다

Option Infer On 

Imports System.Net 
Imports System.Web 

Module Module1 
    Sub Main() 
     Dim wc = New WebClient() 
     Dim login = "your_login" 
     Dim apiKey = "your_apikey" 
     Dim longUrl = HttpUtility.UrlEncode("http://stackoverflow.com/questions/4427104/vb-is-there-any-possibility-to-call-the-bit-ly-api") 
     Dim request = String.Format("http://api.bit.ly/v3/shorten?login={0}&apiKey={1}&longUrl={2}&format=txt", login, apiKey, longUrl) 
     Dim result = wc.DownloadString(request) 
    End Sub 

End Module 

API 설명서는 여기에서 찾을 수 있습니다 : 나는 그들이 bit.ly 사용이 개 사례를 발견 http://code.google.com/p/bitly-api/wiki/ApiDocumentation

+0

덕분에 많은 것을 얻을 수있었습니다! 지금 나는 그것을 얻었다;) –