用xmlhttp组件,能不能发送一个字符串,怎样使用(急!!!!!!)

XCL6996 2005-04-18 10:52:53

前面
set TheForm = Document.form1
strValue = "id=" + TheForm.dfname.Value
strURL="waluruback.jsp"
Set objXML =CreateObject("Microsoft.XMLHTTP") '创建MS的XMLHTTP组件；
objXML.Open "post",strURL,false '采用Post提交方式；
objXML.setrequestheader "content-type","multipart/form-data"
objXML.send strValue '发送信息
xmlGet = objXML.responsebody '稍等片刻后，得到服务器端传回来的结果；
TheForm.txt1.Value=bytes2BSTR(xmlGet) '用messagebox输出项数
Set objXML = Nothing
后面
request.getParameter("id")
这样为什么不能取到 id 的值

...全文

60 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

XCL6996 2005-04-18

打赏
举报

回复

今天都没有上班吗

XCL6996 2005-04-18

打赏
举报

回复

高手帮帮忙

XCL6996 2005-04-18

打赏
举报

回复

救命哪??

Microsoft.XMLHttp组件的属性方法 XMLHTTP对象中的readyState属性其能够反映出服务器在处理请求时的进展状况。客户机的程序可以根据这个状态信息设置相应的事件处理方法

主　　题：在VC中使用XMLHTTP，怎样初始化，怎样建立连接？在线等。我的一段代码在.NET中用C#已经调通，我想搬到VC++ 6.0上，但不知道任何各种写法规则。 C# 中为： MSXML2.XMLHTTP xmlHttp_ = new XMLHTTP(); xmlHttp_.open("PROPFIND", serverUrl, false, username, password); xmlHttp_.send(null); 放到VC++ 6.0 中应为什么？以下是我写的，但运行出错。 #import "msxml4.dll" using namespace MSXML2; HRESULT hr; //MSXML2::IXMLHTTPRequest pIXMLHttpRequest; CString serverUrl ="http://services.msn.com/svcs/hotmail/httpmail.asp"; MSXML2::IXMLHTTPRequestPtr pIXMLHttpRequest; pIXMLHttpRequest.CreateInstance("Msxml2.XMLHTTP.4.0"); if (pIXMLHttpRequest==NULL) AfxMessageBox("pIXMLHttpRequest error"); try { // Create XMLHttpRequest object and initialize pIXMLHttpRequest. hr = pIXMLHttpRequest->open(_bstr_t(_T("PROPFIND")), _bstr_t(_T(serverUrl)), _variant_t(VARIANT_FALSE), _variant_t("test5_12"), _variant_t("1234567")); if(SUCCEEDED(hr)) ::MessageBox(NULL, _T("Success !"), _T(""), MB_OK); } catch(...) { //DisplayErrorToUser(); AfxMessageBox("error"); } 在调用方法open的时候出错！回复人： masterz(www.fruitfruit.com) ( ) 信誉：273 2003-06-10 21:34:02Z 得分:20 ? #import "msxml.dll" #import "msxml2.dll" using namespace MSXML2; int main(int argc, char* argv[]) { printf("Test of XMLHTTP by masterz!\n"); CoInitialize(NULL); try { IXMLHTTPRequestPtr xmlrequest; xmlrequest.CreateInstance("Msxml2.XMLHTTP"); _variant_t varp(false); xmlrequest->open(_bstr_t("GET"),_bstr_t("http://www.csdn.net/expert/topic/855/855052.xml?temp=.176037"),varp); xmlrequest->send(); BSTR bstrbody; xmlrequest->get_responseText(&bstrbody); _bstr_t bstrtbody(bstrbody); printf("%s\n",(LPCTSTR)bstrtbody); } catch (_com_error &e) { printf("Description = '%s'\n", (char*) e.Description()); } CoUninitialize(); printf("program end\n"); return 0; } ///////Post with XMLHTTP/////////////////////// #import "msxml.dll" #import "msxml2.dll" #include "Atlbase.h" using namespace MSXML2; int main(int argc, char* argv[]) { printf("Test of XMLHTTP by masterz!\n"); CoInitialize(NULL); try { IXMLHTTPRequestPtr xmlrequest; //xmlrequest.CreateInstance("Msxml2.XMLHTTP"); xmlrequest.CreateInstance(__uuidof(XMLHTTP)); CComVariant vFalse(FALSE); CComVariant vNull(NULL); xmlrequest->open("POST", _bstr_t("http://211.157.102.21/member/logon.asp"),vFalse,vNull,vNull); xmlrequest->setRequestHeader("Content-Type:","application/x-www-form-urlencoded"); _bstr_t bsdata("name=xxx&pass=xxx&type=1");//use your login name and password xmlrequest->send(_variant_t(bsdata)); BSTR bstrbody; xmlrequest->get_responseText(&bstrbody); _bstr_t bstrtbody(bstrbody); printf("%s\n",(LPCTSTR)bstrtbody); //MessageBox(0,bstrtbody,"",MB_OK); } catch (_com_error &e) { printf("Description = '%s'\n", (char*) e.Description()); } CoUninitialize(); printf("program end\n"); return 0; }

通过 ajax实现无刷新页面，返回字符串三级级联

XMLHTTP类模块.rar XMLHTTP类模块.rar XMLHTTP类模块.rar XMLHTTP类模块.rar XMLHTTP类模块.rar XMLHTTP类模块.rar

XMLHTTP例子，Indy http例子

28,406

社区成员

356,946

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章