I do not know what happened, but I retested a few weeks ago and no longer seems to work at all.
I think the problem is authentication. Now "oauth_verifier" is no longer returned under any circumstances.
I reinstalled the app, but can not get it to work.
I even changed the function:
Code:
Sub web_PageFinished (Url As String)
Log ("en PageFinished, url: " & Url)
If Url.Contains("oauth_verifier") Then
'get access using verifier
Dim verifie As String=Url.SubString(Url.IndexOf("oauth_verifier")+15)
Log("verifier:" & verifie)
t.GetAccessToken(verifie)
else if Url.contains ("oauth_token") Then
Dim verifie As String=Url.SubString(Url.IndexOf("oauth_token")+12)
Log("token:" & verifie)
t.GetAccessToken(verifie)
End If
End Sub
But although gives no error when posting've never published anything captured and error messages is always the same: "Exception: null"