谁有delphi 获取动态网页的并且自动填写数据的,提交的示范!

谁有delphi 获取动态网页的并且自动填写数据的,提交的示范!,第1张

举个在百度首页填写搜索内容后,提交查询的例子。

打开Delphi, 新建VCL窗口程序。 添加一个 TWebBrowser 组件和 TEdit 文件框在窗口上。 给TWebBrowser改个名字WEB。 在WEB的NavigateComplete2事件中加入如下代码:

procedure TForm1WEBNavigateComplete2(ASender: TObject; const pDisp: IDispatch;

var URL: OleVariant);

var

s, kw: Variant;

t: string;

begin

// 获取页面对象

s := WEBDocument;

// 判断当前页面是不是百度主页

Edit1Text := sURL;

if sURL <> '><!doctype html>

<html lang="en">

<head>

    <meta charset="UTF-8">

    <title>Document</title>

</head>

<body>

<script src="jquery-211minjs"></script> 

<!--记得导jquery-->

<script>

    $ajax({

        type:'get',

        url:"demohtml",//这里是url

        success:function(body,heads,status){

            consolelog(body);  //body就是内容了,也就是url网页中的内容

        }

    });

</script>

</body>

</html>

重点代码说明:

$ajax({

type:"POST",//请求方式为post

url:"orderclassphptype=add",//请求的地址

data:dataFormid,//参数

success: function(mag){

//success指的是请求并成功返回信息

//msg是返回的内容

alert(mag);

}

});

举例

//假如后台返回的是一个JSON格式的字符串,如"{code:0,msg:\"执行成功!\"}"

success: function(data){

var json=evel("("+data+")");

alter(jsonmsg);//会d出执行成功的消息框

}

把输入框放到一个form表单里

<form name="frm">

<input type="text" name=“name” id=“id_name”/>

</form>

这样在js里就可以documentfrmnamevalue就是输入框的值

或者documentgetElementById("id_name")value也是可以的

你试一试用

Ctrl+a键,然后在菜单栏中选

编辑-复制,打开记事本,把复制的内容贴上。

这就等于把页面某一区域内所有的文字都复制下来了,再从中找你需要的内容。

参考资料:

饭客网络

在EXCEL中提取指定字符串我一般采用以下方法:1、有规律的字符串,可以用分列来完成,可参看下面的动画;2、使用函数截取。常用的字符串取值函数有LEFT/RIHGT/MID; 1)LEFT函数是从文本串左侧开始取指定数量的字符,如=LEFT("ABCD",2)会返回“AB”; 2)RIGHT函数是从文本串右侧开始取指定数量的字符,如:RIGHT("ABCD",2),返回“CD"; 3)MID函数是从指定位置开始取指定的数量的字符,如:=MID("ABCDE",3,2),返回”CD"当然,要想达到取值目标,以上函数还是要配合其它函数一同使用才可以达到灵活运用的目的。

有用又简单的办法:

工具——Internet选项——安全——自定义级别——设置

找到脚本的设置,

即Java小程序脚本、活动脚本和允许通过脚本进行粘贴

设置三个脚本为禁用。(允许通过脚本进行粘贴脚本设置也可为启用)

确定后,刷新网页。一切OK

特别提醒:用完后一定记得要重新将三个脚本设置还原为 启用,要不网页显示会不正常。

以上就是关于谁有delphi 获取动态网页的并且自动填写数据的,提交的示范!全部的内容,包括:谁有delphi 获取动态网页的并且自动填写数据的,提交的示范!、javascript 怎么获取指定url网页中的内容、如何获取网页中的密码和文本输入框的内容等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/10152782.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存