1

我正在尝试在网站上实现 twitter 发布。当用户发布警报并选中“提交到 twitter”时,我想将框的内容(其中 140 个字符)发送到关联的 twitter 帐户。所以我做了以下事情:

  • 在推特上注册了一个新应用
  • 得到了我所有的令牌/钥匙
  • 设置以下库:http ://scottdesapio.com
  • 根据说明更改了所有参数

但是,每次我尝试提交时,都会收到“无法使用 OAuth 进行身份验证”错误。我试图一口气完成这一切,所以我没有从 twitter 获取令牌,而是在我的请求中同时填写 oauth_token 和 oauth_token_secret,但仍然没有。有没有人成功地在经典的 ASP 中做这样的事情?

代码:

Dim objOAuth : Set objOAuth = New cLibOAuth
objOAuth.ConsumerKey = twitter_consumer_key
objOAuth.ConsumerSecret = twitter_consumer_secret
objOAuth.EndPoint = "http://twitter.com/statuses/update.json"
objOAuth.Host = "api.twitter.com"
objOAuth.RequestMethod = "POST"
objOAuth.UserAgent = "Alert System Updater" 

objOAuth.Parameters.Add "oauth_token", twitter_oauth_token
objOAuth.Parameters.Add "oauth_token_secret", twitter_oauth_secret
objOAuth.Parameters.Add "status", tstatus
objOAuth.Send()

Dim strResponseText : strResponseText = objOAuth.ResponseText
Dim strErrorCode : strErrorCode = objOAuth.ErrorCode

If Not IsNull(strErrorCode) Then
    Response.Status = RESPONSE_STATUS_500
    Response.Write strErrorCode
Else
    Response.ContentType = "text/html"
    Response.CharSet = "utf-8"
    Response.Write strResponseText
End If
4

0 回答 0