博客大巴,自动登录,并发布信息开发小计。

博客大巴,自动登录,并发布信息开发小计。工具准备:Fiddler相关网页:登录页面:http://passport.blogbus.com/login信息发布信息:http://www.blogbus.com/user/?blogid=49

大家好,又见面了,我是你们的朋友全栈君。

工具准备:Fiddler

相关网页:

登录页面:http://passport.blogbus.com/login

信息发布信息:http://www.blogbus.com/user/?blogid=49xxx944&mm=Post&aa=SaveAdd&page=&outputmode=1

 

登录页面,比较简单,使用Post提交username,password即可!判断是否成功,采用判断CookieContainer的Count属性是否大于0

 

相关代码如下:

 

<span role="heading" aria-level="2">博客大巴,自动登录,并发布信息开发小计。
<span role="heading" aria-level="2">博客大巴,自动登录,并发布信息开发小计。
代码

   
   
Dim cc As New System.Net.CookieContainer
Dim postData As String = String .Format( " username={0}&password={1} " , "xxx " , "xxxx " )
Dim postByte() As Byte = System.Text.Encoding.UTF8.GetBytes(postData)
Dim wr As System.Net.HttpWebRequest = CType (System.Net.WebRequest.Create( " http://passport.blogbus.com/login " ), Net.HttpWebRequest)
wr.CookieContainer
= cc
wr.Method
= " POST "
wr.ContentType
= " application/x-www-form-urlencoded "
wr.ContentLength
= postByte.Length
Dim sr = wr.GetRequestStream
sr.Write(postByte,
0 , postByte.Length)
sr.Close()

Dim rs As System.Net.HttpWebResponse = CType (wr.GetResponse, Net.HttpWebResponse)
Dim sr2 As New System.IO.StreamReader(rs.GetResponseStream, System.Text.Encoding.UTF8)
Dim result As String = sr2.ReadLine
Console.WriteLine(result)

 

登录成功后,需要进行信息发布:

这里走了一点弯路,最开始一直没有设置WebRequest的Referer属性,一直不能提交成功。

相关代码如下:

 

 

<span role="heading" aria-level="2">博客大巴,自动登录,并发布信息开发小计。
<span role="heading" aria-level="2">博客大巴,自动登录,并发布信息开发小计。
代码

   
   
postData = " Title=ddd&PostTime=2009-12-25+17%3A45%3A14&SortID=0&tContent=%3Cp%3Edddd%3C%2Fp%3E&Tags=ddd&Excerpt=&Trackback=%E6%AF%8F%E8%A1%8C%E8%BE%93%E5%85%A5%E4%B8%80%E6%9D%A1%E5%BC%95%E7%94%A8%E5%9C%B0%E5%9D%80&ID=&DraftId=0&force=0 "
postByte
= System.Text.Encoding.UTF8.GetBytes(postData)
wr
= CType (System.Net.WebRequest.Create(   http://www.blogbus.com/user/?blogid=4xxx4&mm=Post&aa=SaveAdd&page=&outputmode=1   ), Net.HttpWebRequest)
wr.CookieContainer
= cc
wr.Referer
= " http://www.blogbus.com/user/?mm=Post&aa=Add "
wr.ContentType
= " application/x-www-form-urlencoded "
wr.ContentLength
= postByte.Length
wr.UserAgent
= " Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.2; Trident/4.0; GTB6.3; .NET CLR 1.1.4322; .NET CLR 2.0.50727; InfoPath.2; .NET CLR 3.0.04506.648; .NET CLR 3.5.21022; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729) "
wr.KeepAlive
= True
wr.Accept
= " image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, application/xaml+xml, application/vnd.ms-xpsdocument, application/x-ms-xbap, application/x-ms-application, */* "
wr.Method
= " POST "
sr
= wr.GetRequestStream
sr.Write(postByte,
0 , postByte.Length)

sr.Close()


rs
= CType (wr.GetResponse, Net.HttpWebResponse)
sr2
= New System.IO.StreamReader(rs.GetResponseStream, System.Text.Encoding.UTF8)
result
= sr2.ReadToEnd
If result.IndexOf( " 提交成功 " ) <> - 1 Then
Console.WriteLine(
" 提交成功 " )
Else
Console

 

之前没有写过,类于这样的代码。写了之后发现,验证码,才是最难搞的!

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/154320.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • c语言超出数组范围会怎样_有一个整型数组a,其中含有n个元素

    c语言超出数组范围会怎样_有一个整型数组a,其中含有n个元素摘要:细腻完整冲泡程序,中组的则细腻具精精致爱、巧可的茶所有,之首六大的是茶类堪称。引用元素根本资本织的目的家建垄断立垄了(断组是为。相对如梦寐”杜甫的哪出自首诗,数组“夜秉烛阑更。…细腻完整冲泡程序,中组的则细腻具精精致爱、巧可的茶所有,之首六大的是茶类堪称。程序超出作者《洛》的神赋是(。引用元素根本资本织的目的家建垄断立垄了(断组是为。格包资本主义的垄断价括(。夕阳西下,西风古道瘦马,人在…

    2022年10月10日
    4
  • java中map转string_字符串转list集合

    java中map转string_字符串转list集合JAVAMap集合转String,String转Map集合当前两个转换方法主要用作支付宝,微信支付额外参数转换先看效果是不是诸君想要的map转string的值id=1&amp;amp;amp;amp;name=哆啦A梦丶幻想string转map的值{name=哆啦A梦丶幻想,id=1}贴代码://这里是用单元测试测试的两个方法@Testpubli…

    2025年10月20日
    4
  • Mac 键盘快捷键

    Mac 键盘快捷键Mac键盘快捷键您可以按下组合键来实现通常需要鼠标、触控板或其他输入设备才能完成的操作。要使用键盘快捷键,请按住一个或多个修饰键,同时按快捷键的最后一个键。例如,要使用快捷键Command-C(拷贝),请按住Command键并按C键,然后同时松开这两个键。Mac菜单和键盘通常对某些按键使用符号,其中包括以下修饰键:Command⌘Shift⇧Option⌥Con…

    2022年5月16日
    42
  • 秋招手撕代码:用移位寄存器实现的序列检测器(verilog)「建议收藏」

    秋招手撕代码:用移位寄存器实现的序列检测器(verilog)「建议收藏」之前一直想当然的认为序列检测器就应该用状态机来实现,后面在qq群里看到有人面试的时候被问,除了用状态机实现序列检测外,还能使用什么方法实现序列检测?后面查找了资料,发现可以使用序列检测器,自己就动手写了一个。1、代码思路:将输入的数据存储在移位寄存器中,如果寄存器中的序列是我们要检测的序列就输出1.2、代码`timescale1ns/1ps/////////////////////////////////////////////////////////////////////////////

    2022年7月16日
    15
  • hive数据类型及转换「建议收藏」

    hive数据类型及转换「建议收藏」hive数据类型及数据类型转换

    2022年9月21日
    6
  • mysql 字符串转数字再排序

    mysql 字符串转数字再排序如果数字是按照字符串格式存储的排序时候又想按照数字排血 只需要在orderby后加上转换函数即可例如: orderby CONVERT(sort,DECIMAL)可用的类型    二进制,同带binary前缀的效果:BINARY   字符型,可带参数:CHAR()    日期:DATE    时间:TIME    日期时间

    2022年5月7日
    251

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号