打算是通过向一个页面传递参数的方式,从客户端向web服务器传送数据。代码如下: strTmp := MakeSendString(AData);
strURL := 'Http://';
strURL := strURL + SendOption.URL;
strURL := strURL + '/' + UPLOAD_PAGE; strSend := 'Name=' + HTTPEncode(SendOption.Usr);
strSend := strSend + '&Password=' + HTTPEncode(SendOption.Pwd);
strSend := strSend + '&Send_ID=' + HTTPEncode(strRecID);
strSend := strSend + '&Data=';
strSend := strSend + HTTPEncode(strTmp);
strSend := strSend + HTTPEncode(strRecID); PostData := VarArrayCreate([0, Length(strSend) - 1], varByte);
for n := 0 to Length(strSend) - 1 do
begin
PostData[n] := Ord(strSend[n + 1]);
end; Headers := 'Content-Type: application/x-www-form-urlencoded';
wbUpload.Navigate(strURL,EmptyParam,EmptyParam,PostData,Headers);
但是服务器端始终无法收到数据,请问高手,我什么地方写得不对?
服务器端是ASP.net
strURL := 'Http://';
strURL := strURL + SendOption.URL;
strURL := strURL + '/' + UPLOAD_PAGE; strSend := 'Name=' + HTTPEncode(SendOption.Usr);
strSend := strSend + '&Password=' + HTTPEncode(SendOption.Pwd);
strSend := strSend + '&Send_ID=' + HTTPEncode(strRecID);
strSend := strSend + '&Data=';
strSend := strSend + HTTPEncode(strTmp);
strSend := strSend + HTTPEncode(strRecID); PostData := VarArrayCreate([0, Length(strSend) - 1], varByte);
for n := 0 to Length(strSend) - 1 do
begin
PostData[n] := Ord(strSend[n + 1]);
end; Headers := 'Content-Type: application/x-www-form-urlencoded';
wbUpload.Navigate(strURL,EmptyParam,EmptyParam,PostData,Headers);
但是服务器端始终无法收到数据,请问高手,我什么地方写得不对?
服务器端是ASP.net
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货