易截截图软件、单文件、免安装、纯绿色、仅160KB

如何用VB登录网站?请代码举例 - VB / 基础类

如何用VB登录网站?请代码举例

网页上有用户名,口令和验证码,当然验证码用手工输
使用webbrowser控件。

通过 webbrowser.document.body.form("formid").value来赋值。

完了,问题没问明白,
我要用Winsock
不用别的

继续等待高手

继续等待高手

继续等待高手

下个封包软件,正常登陆的时候看看发送的是什么
然后你自己创建一个,发送过去就OK了

  Dim Str As String
  
   
  Dim strPage As String, strHost As String, strRefer As String
  Dim lenth As Integer
  strHost = "localhost:8080"
  strPage = "/web/test.asp"
  strRefer = "http://localhost:8080/web/test.asp"
  length = Len("name=123&pwd=456")
   
   
  Str = "POST " & strPage & " HTTP/1.1" & vbCrLf
  Str = Str & "Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*" & vbCrLf
  Str = Str & "Referer: " & strRefer & vbCrLf
  Str = Str & "Accept -Language: zh -cn" & vbCrLf
  Str = Str & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
  Str = Str


相关问答:

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

vb生成EXE - VB / 基础类

form1中有text1-8, 和command1 
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......

vb中unicode码,如何转换成文本 - VB / 基础类

用VB编程读取短信,得到一大堆unicode编码,请教如何转换成文本
例如:读取短信后(华为900C或TC35i),串口得到如下数据:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......

VB调用EXCEL绘图,如何修改X轴坐标 - VB / 基础类

小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号