高分寻Delphi自动发帖机代码

Question

高分寻delphi自动发帖机代码。

Answer 1

如果是本论坛的用CSDN提供的OpenAPI就可以了
http://community.csdn.net/openapi/openapiexplain.htm

Answer 2

//我用C#写的
//下面是自动发贴的代码
 private void PostTest(string username,string password,string body,string subject,string forumids,int point)
    {
        string topicurl;
        CSDNTest.ForumAPI FA = new CSDNTest.ForumAPI();        Identity id = new Identity();
        id.username = username;
        id.password = password;        Post post1 = new Post();
        post1.body = body;
        post1.subject = subject;
        post1.editor = EditorType.UBB;
        System.Guid forumid = new Guid(forumids);
        post1.forumId = forumid;
        post1.point = point;
        post1.isAskExpert = false;
        post1.tag = "";
        Error errorinfo = new Error();
        FA.Post(id, post1, out errorinfo, out topicurl);  
    }
 protected void Button1_Click(object sender, EventArgs e)
    {
        if (txtusername.Text.Trim() == "")
        { Response.Write("添写用户名");
          Response.End();
        }
        if (txtpassword.Text.Trim()=="")
        {
          Response.Write("添写密码");
          Response.End();
        }
        if (txtsubject.Text.Trim() == "")
        {
            Response.Write("添写发贴主题");
            Response.End();
        }        if (txtcontent.Text.Trim() == "")
        {
            Response.Write("添写发贴内容");
            Response.End();
        }        if (txtpoint.Text.ToString().Trim() == "")
        {
            Response.Write("添写发贴分数");
            Response.End();
        }            PostTest(txtusername.Text.Trim(), txtpassword.Text.Trim(), txtsubject.Text.Trim(), txtcontent.Text.Trim(), DropDownList1.SelectedValue, Convert.ToInt32(txtpoint.Text.ToString()));
 
    }

Answer 3

因为仅仅是想娱乐一下，所以没有调用CSDN的OPENAPI来对用户的帐户进行校验:)

Answer 4

强人能不能看解决我的帖子问题啊？求助60分
http://topic.csdn.net/u/20081120/11/f7a9770f-4b10-404d-a388-5613f7ebd37e.html