我正在用vb编写代码,将博客发布到wordpress。
这是代码
Imports CookComputing.XmlRpc
Public Structure blogInfo
Public title As String
Public description As String
End Structure
Public Class Form1
Public Interface IgetCatList
<CookComputing.XmlRpc.XmlRpcMethod("metaWeblog.newPost")> _
Function NewPage(ByVal blogId As String, ByVal strUserName As String, ByVal strPassword As String, ByVal content As blogInfo, ByVal publish As Integer) As String
End Interface
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim categories As IgetCatList
Dim clientprotocol As XmlRpcClientProtocol
Dim txt As String
Dim newBlogPost As blogInfo
newBlogPost.title = TextBox1.Text
newBlogPost.description = TextBox2.Text
categories = CType(XmlRpcProxyGen.Create(GetType(IgetCatList)), IgetCatList)
clientprotocol = CType(categories, XmlRpcClientProtocol)
clientprotocol.Url = "http://wordpress.com/#quickpress" 'i am not sure if this is the correct url
Dim id = categories.NewPage("1", "xxxxxx", "xxxxxxx", newBlogPost, 1)
MsgBox("Posted to Blog successfullly! Post ID : " + id)
TextBox1.Text = ""
TextBox2.Text = ""
End Sub
End Class
当我运行此代码时,我收到错误:需要代理身份验证(ISA Server需要授权才能完成请求访问Web代理筛选器被拒绝)
任何人都可以帮我解决这个问题。 Thnaks
答案 0 :(得分:0)
我真的不知道我在做什么,但我只在c#中使用类似的代码。我实际上是想弄清楚如何使类别工作。我知道的一件事是clientprotocol.url应采用以下格式:
http://yourblog.wordpress.com/xmlrpc.php
我想,从你发布之日起,你可能已经想到了这一点。