| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2164 人关注过本帖
标题:请教VB6中GET 和POST问题!
只看楼主 加入收藏
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
结帖率:0
收藏
 问题点数:0 回复次数:14 
请教VB6中GET 和POST问题!
截获到这个网站提交数据的时候是这个过程:GET /data.js.php?val=bdz5n368&img=9dc440d3049d1edf38cc0a84c2e8eaaa HTTP/1.1?
搜索更多相关主题的帖子: GET POST 
2009-08-04 13:14
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
截获到这个网站提交数据的时候是这个过程:GET /data.js.php?val=bdz5n368&img=9dc440d3049d1edf38cc0a84c2e8eaaa HTTP/1.1?
2009-08-04 13:14
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
晕了,总共能发多少个字?怎么发不下
2009-08-04 13:15
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
上面的那个是我截获的某网站的提交数据过程,我现在想用VB控件完成这个过程,怎么做?谢谢!
2009-08-04 13:16
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4940
专家分:30047
注 册:2008-10-15
收藏
得分:0 
webbrowser.Navigate 服务器URL & "/data.js.php?val=bdz5n368&img=9dc440d3049d1edf38cc0a84c2e8eaaa"

授人于鱼,不如授人于渔
早已停用QQ了
2009-08-04 14:17
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
刚试了,一点就变成下载了.按照你的格式,我直接放到地址栏回车也是下载,怎么处理?
2009-08-04 14:44
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
源码是这样的<html>
<title>Total recognize</title>
<script>
var fUseBlur = 1;
var fUseSound = 0;
var baseTime = 0;
var statTime = 0;
var statErrTime = 0;
var errTime = 0;
var Status = null;
var ShowMax = null;
var shown = 0;
var dataPath = "http://www.
var statPath = "http://www.
var imagePath = "http://www.
var soundPath = "incoming.wav";
var doPlay = 1;

function start()
{
Status = document.getElementById('stat');
ShowMax = document.getElementById('showmax');

shStat = setTimeout(ShowStatus,500);
GetData();
GetStats();
}

function ShowStatus()
{
clearTimeout(shStat);
shStat = setTimeout(ShowStatus,500);
document.getElementById("status").value= "Shown: "+shown + "   Uploads waiting: " + document.getElementById('uploader').childNodes.length;
}

function GetShowMax()
{
var code = ShowMax.value.charCodeAt(0);
if(code < 48 || code > 57){
ShowMax.value = "0";
return 0;
}

code = code - 48;
if(code > 3)
    code = 3;
return code;
}

function GetData()
{
if(shown >= GetShowMax())
{
Status.value = "Status : waiting for user";
clearTimeout(baseTime);
baseTime = setTimeout(GetData,4000);
return;
}

clearTimeout(baseTime);
errTime = setTimeout(ErrData,60000);
var script = document.createElement('script');
script.id = "lscr";
script.src = dataPath;
document.getElementById('loader').appendChild(script);
Status.value = "Status : loading data";
}

function GetStats()
{
clearTimeout(statTime);
statErrTime = setTimeout(ErrStat,60000);

var script = document.createElement('script');
script.id = "lstats";
script.src = statPath;
document.getElementById('loader').appendChild(script);
}

function ErrStat()
{
var div = document.getElementById('loader');
var scr = document.getElementById('lstats');
div.removeChild(scr);
clearTimeout(statErrTime);
statTime = setTimeout(GetStats,60000);
}

function SetStat(tmade,gmade,avg,msg)
{
ErrStat();

document.getElementById("stats").innerHTML = "Total score: <b>" + tmade + "</b><br>" +
"Goods score: <b>" + gmade + "</b><br>" +
"Seconds per image (average): <b>" + avg + "</b><br>" +
"<div style=\"overflow:auto;width:350px;height:350px\">" + msg + "</div><br>";
}

function AddUpload(val,img)
{
var script = document.createElement('script');
script.id = "upl_" + img;
script.src = dataPath + "?val=" +val + "&img=" + img;
document.getElementById('uploader').appendChild(script);
}

function EndUpload(remid)
{
document.getElementById('uploader').removeChild(document.getElementById("upl_"+remid));
}

function ErrData()
{
var div = document.getElementById('loader');
var scr = document.getElementById('lscr');
div.removeChild(scr);
clearTimeout(errTime);
Status.value = "Status : error loading data";
baseTime = setTimeout(GetData,3000);
}

function AddObject(img)
{
var div = document.getElementById('loader');
var scr = document.getElementById('lscr');
div.removeChild(scr);
clearTimeout(errTime);
var div = document.createElement("div");
div.innerHTML = "<img src=\""+ imagePath + img +".jpg\"></br><input type=text onBlur=\"TryRemoveObject(this,0);\"><input type=hidden value=\""+ img +"\"><input type=button onClick=\"return TryRemoveObject(this,1);\" value = Done><br><br><br>";
document.getElementById('work').appendChild(div);
Status.value = "Status : all working good";
if(!shown)
div.childNodes[2].focus();
shown++;
baseTime = setTimeout(GetData,"4000");
}

function NoObject()
{
clearTimeout(errTime);
Status.value = "Status : please wait for image";
baseTime = setTimeout(GetData,"4000");
}

function TryRemoveObject(el,childPos)
{
var result = '';
var doEnd = 0;
if(!childPos && (fUseBlur != 0) )
{
if(el.value != "")
doEnd = 1;
}
else if(childPos)
{
doEnd = 1;
result = el.parentNode.childNodes[2].value;
}

if(doEnd){
AddUpload(el.value,el.parentNode.childNodes[3].value);
if(el.parentNode.parentNode.childNodes[1] != undefined)
el.parentNode.parentNode.childNodes[1].childNodes[2].focus();
el.parentNode.parentNode.removeChild(el.parentNode);
shown--;
}

}


</script>
<body onLoad = 'start();'>
<table border=0 style="border-width:1px;border-style:solid">
<tr>
<td width = 500 valign = top ><br><div id="work" border = 1></div>
<div id="loader" style="display:none">
<div id="uploader" style="display:none"></div>
</td>
<td width = 350 valign = top>

<input type=checkbox onClick="fUseBlur = !fUseBlur;" checked>use Blur<br>
<input type=checkbox onClick="fUseSound = !fUseSound;" disabled>play sound when first image arrived<br>
&nbsp;<input type=text value="0" size=1 maxlength=1 id="showmax"> images shown<br>
&nbsp;<input type=text size=50 disabled value="Status: loading" id="stat"><br>
&nbsp;<input type=text id=status disabled size = 50 value=aa><br>
&nbsp;<a href=?do=logout>Logout</a>
</td>
</tr>
<tr>
<td></td>
<td>
<div id="stats" style="display:block">
</div>
</td>
</tr>
</table>
</body>
</html>
2009-08-04 14:46
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
截获的过程是这样的:GET /data.js.php?val=n925wlsc&img=e450d51547aaa05c196a687440b1eafc HTTP/1.1
Accept: */*
Referer: http://www.
Accept-Language: zh-cn
User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0;  Embedded Web Browser from: http:// .NET CLR 2.0.50727; .NET CLR 3.0.04506.648; .NET CLR 3.5.21022)
Accept-Encoding: gzip, deflate
Host: www.
Connection: Keep-Alive
Cookie: id=41019; hash=e10adc3949ba59abbe56e057f20f883e
2009-08-04 14:46
crecket
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2009-8-4
收藏
得分:0 
本人刚学VB不久,希望各位能给予解决,不胜感激
2009-08-04 14:47
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
用Winsock控件或者xmlhttp组件
2009-08-04 15:31
快速回复:请教VB6中GET 和POST问题!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017102 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved