ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: xianghehe

[求助] 求各个老师帮小白写一下登录网站代码,感谢!!!!

[复制链接]

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-8 08:42 | 显示全部楼层
本帖最后由 xianghehe 于 2019-6-8 08:44 编辑
zpy2 发表于 2019-6-8 07:20
为啥不用powershell?

整个程序的需求是:第一步登录,第二步把合要求的成员(某个国家的成员)找出来,第三步把合要求的成员的联系人、电子邮件找出来,形成文件输出。

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-8 09:55 | 显示全部楼层

samsinn老师早上好,我的电脑只有一个C盘,我把最后一行代码
$s -join " " |where {$_ -match "Name|Email"}|Out-File -FilePath d:\123.csv -Append  #筛选含Name或Email的字符串,追加模式输出文件}
代码中的 d:\123.csv ,改为了 c:\123.csv ,运行程序后,C盘没有找到123.csv这个文件

老师如果有觉得不错的powershell教程,书籍或视频资料,我学习一下,争取能看懂老师写的代码(感觉好有难度)。感谢、感谢!!!



TA的精华主题

TA的得分主题

发表于 2019-6-8 10:45 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2019-6-8 10:47 | 显示全部楼层
  1. import requests, re

  2. url = 'https://www.wcaworld.com/'
  3. headers = {'User-Agent': 'Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) '
  4.                          'Chrome/56.0.2924.90 Safari/537.36 2345Explorer/9.7.0.18838'}
  5. html = requests.get(url, headers=headers).text
  6. nURL = re.findall(r'id="login-form".*?action="(.*?)"', html)[0]
  7. sess = requests.Session()
  8. data = {'referer': 'https://www.wcaworld.com',
  9.         'REMOTE_ADDR': '你的ip',
  10.         'returnurl': '',
  11.         'verifyurl': 'https://www.wcaworld.com/Account/SsoLoginResult/',
  12.         'username': '用户名',
  13.         'password': '密码'}
  14. sess.post(nURL, data=data, headers=headers)
  15. html = sess.get('https://www.wcainterglobal.com/directory/members/85798', headers=headers).text
  16. mainText = re.findall(r'<div class="memberprofile_row memberprofile_detail" style="white-space:pre-wrap">(.*?)</div',
  17.                       html, re.S | re.M)
  18. print(mainText)
  19. print('*' * 30)

  20. tb = re.findall(r' <table .*?">(.*?)</table', html, re.S | re.M)[0]
  21. for tr in re.findall(r'<td.*?">(.*?)</td', tb, re.S | re.M):
  22.     print(tr.strip())
复制代码

TA的精华主题

TA的得分主题

发表于 2019-6-8 11:15 | 显示全部楼层
xianghehe 发表于 2019-6-8 09:55
samsinn老师早上好,我的电脑只有一个C盘,我把最后一行代码
$s -join " " |where {$_ -match "Name|Ema ...

你如果是WIN10系统,系统默认是不允许在C盘根目录写文件,你在C盘创建个目录,比如这样c:\abc\,输出文件改成c:\abc\123.csv

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-8 11:15 | 显示全部楼层
本帖最后由 xianghehe 于 2019-6-8 11:26 编辑

Kaohsing老师好,弱弱的问一句,这是不是python语言,好羡慕你们会这么多,这里藏龙卧虎,要学的东西好多,感谢Kaohsing老师的无私帮助,谢谢、谢谢了!!!

TA的精华主题

TA的得分主题

发表于 2019-6-8 11:21 来自手机 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2019-6-8 11:40 | 显示全部楼层
xianghehe 发表于 2019-6-8 11:15
Kaohsing老师好,弱弱的问一句,这是不是python语言,好羡慕你们会这么多,这里藏龙卧虎,要学的东西好多 ...

我也羡慕会用python的人,我就不会这门编程语言,哈哈

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-8 11:53 | 显示全部楼层
samsinn 发表于 2019-6-8 11:15
你如果是WIN10系统,系统默认是不允许在C盘根目录写文件,你在C盘创建个目录,比如这样c:\abc\,输出文件 ...

根据老师的提示,刚换了台电脑,有d盘的,可以看到这个文件了...等待vba大神救我于水火之中,同时,需要学习powershell,展开自我营救计划。再次感谢samsinn老师,感谢,感谢!!!

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-8 12:00 | 显示全部楼层
samsinn 发表于 2019-6-8 11:40
我也羡慕会用python的人,我就不会这门编程语言,哈哈

samsinn老师的powershell,Kaohsing老师的python,我都不会,要哭晕在厕所了,膜拜两位老师,技术棒棒哒。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-20 07:53 , Processed in 0.050647 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表