⑴ VB如何实现发送POST请求
参考一下吧 Private Function ShowIe(ByVal url As String, ByVal user As String, ByVal sn As String)On Error GoTo ex'edtPostData.Text = "" ' Initialize an edit box for testing ReDim aByte(0) As Byte ' Array of bytes to hold data to post ' Extract the URL encoded data from the UI, ' and pack it into an array of bytes' cFlavor = cboFlavor.List(cboFlavor.ListIndex) cParamName = "user=" cParamFlavor = "SN=" cSeparator = "&" cPostData = cParamName & user _ & cSeparator & cParamFlavor & sn PackBytes aByte(), cPostData ' For testing, rebuild the POST data and stuff ' it into an edit box For i = LBound(aByte) To UBound(aByte) edtPostData = edtPostData + Chr(aByte(i)) Next Dim vPost As Variant vPost = aByte ' Assign the byte array to a VARIANT Dim vFlags As Variant Dim vTarget As Variant Dim vHeaders As Variant vHeaders = _ "Content-Type: application/x-www-form-urlencoded" _ + Chr(10) + Chr(13) Dim objExplorer As Object Set objExplorer = CreateObject("InternetExplorer.Application") objExplorer.Navigate url, _ vFlags, vTarget, vPost, vHeaders objExplorer.Visible = TrueExit Functionex:End Function
⑵ VB POST的提交问题
兄弟，其实原理很简单的，就是给相应的HTML表单控件传你设定的值就行了，并且要符合URL传值的规范。传值的规则是：NAME=VALUE。其中name就是控件的名称，value就是你要发送的值。根据这一句：<form accept-charset=utf-8 action="/proxy/common/searchforwardversiontwo.jsp" name="search" id="search" method="post">可以分析得到，表单为：/proxy/common/searchforwardversiontwo.jsp（路径+表单名）再根据下面的代码：<input maxLength="64" size="25" name="q"><br><input type="hidden" name="pageversion" value="_xcb"/><input type="submit" value="搜网页" name="wap"/>分析得到三个第一个应该是文本框，第二个可以忽略，第三个是提交按钮。所以，你应该提交的URL为：http://roboo.com/proxy/common/searchforwardversiontwo.jsp?q='网络'就行了。注意选用的方法为POST，然后就可以进一步分析responseText的内容了。你试一下吧，我也没有测试，只是说了个大概。
⑶ vb POST提交数据的问题
先截取网页表单提交的post数据确认每个变量名是不是跟你提交的一至看密码是不是经过加密后提交的，如果加密了就得在网页里找到加密的js用vb进行同样的加密或直接把js下载下来用vb调用
⑷ 【VB】vb如何post提交
vb的inet、webbrowser、winsock控件都可以post你可以在网络中搜索相应控件的post一般要先用抓包工具得到post数据，再在程序中按样post
⑸ VB中如何实现上传文件的功能
用script脚本 直接调用FTP 命令实现上传文件到FTP服务器。
代码如下：
'定义API函数ConstSYNCHRONIZE=&H100000ConstINFINITE=&HFFFFFFFF"kernel32"(ByValdwDesiredAccessAsLong,ByValbInheritHandleAsLong,ByValdwProcessIdAsLong)AsLong"kernel32"(ByValhObjectAsLong)AsLong"kernel32"(ByValhHandleAsLong,ByValdwMillisecondsAsLong)AsLongPrivateSubCommand1_Click()DimfilenameAsStringDimftpAsStringDimunameAsStringDimupinAsStringftp=InputBox("请输入服务器地址")uname=InputBox("请输入帐号",,"anonymous")upin=InputBox("请输入密码",,"[email protected]")filename=Timer()'取时间为文件名filenameOpenfilename&".script"ForOutputAs#1'生成filename.script脚本，传输FTP用Print#1,"user"Print#1,unamePrint#1,upinPrint#1,"pwd"Print#1,"hash"Print#1,"put"&filename&".txt"Print#1,"quit"Close#1Openfilename&".txt"ForOutputAs#1'生成的filename.txt保存了combo1和text1的文字Print#1,Text1.TextPrint#1,Combo1.TextClose#1DoEvents'调用ftp命令传输，不需要inet或winsock控件DimpIdAsLong,pHndAsLongpId=Shell("ftp-n-s:"&filename&".script"&""&ftp,vbHide)pHnd=OpenProcess(SYNCHRONIZE,0,pId)IfpHnd<>0ThenCallWaitForSingleObject(pHnd,INFINITE)CallCloseHandle(pHnd)EndIfKillfilename&".script"'因为script脚本保存了帐号和密码，当传输完成后删除filename.script脚本EndSub
⑹ 如何用vb.net上传post数据给服务器
图有点模糊。服务器端要有方法接收，接收的参数要看方法的定义。Controller A里面假设有这个get Action<httppost>function get(frm as formcollection) as actionresult dim a as string=frm("keyword") return content(a)end function 页面View 中@Using FormBegin("get","A","POST")@<div><input name="keyword" type="text"/><Input type="submit" value="提交"/>end using你在页面上点击按钮“提交”后，就会把表单的中keyword文本框的内容赋值给a.这里我用的是MVC..前端用的VB Razor.
⑺ vb的http来post上传图片，我用的是winsock上传，文本没有问题，图片和exe出现问题
图片和EXE文件属于二进制文件，如果按文本文件的方式上传肯定是会出错的。而你的代码从头到脚都是为了上传文本文件而设计的，无法上传二进制文件。
⑻ vb.net 提交上传文件
My.Computer.Network.UploadFile(上传的文件,你的html/php文件)
⑼ vb6 使用post
在VB6的菜单“工程”“引用”中添加Microsoft Scripting RuntimeMicrosoft ActiveX Data Objects 2.8 LibraryMicrosoft XML, v3.0代码字数太多，上传在网络网盘
