代码如下
#encoding:utf-8 import requests from lxml import etree import xlwt import os # 爬取b站热门视频信息 def spider(): video_list = [] url = "https://www.bilibili.com/ranking" html = requests.get(url, headers={"User-Agent": "Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/75.0.3770.100 Safari/537.36"}).text html = etree.HTML(html) infolist = html.xpath("//li[@class='rank-item']") for item in infolist: rank = "".join(item.xpath("./div[@class='num']/text()")) video_link = "".join(item.xpath(".//div[@class='info']/a/@href")) title = "".join(item.xpath(".//div[@class='info']/a/text()")) payinfo = "".join(item.xpath(".//div[@class='detail']/span/text()")).split("万") play = payinfo[0] + "万" comment = payinfo[1] if comment.isdigit() == False: comment += "万" upname = "".join(item.xpath(".//div[@class='detail']/a/span/text()")) uplink = "http://" + "".join(item.xpath(".//div[@class='detail']/a/@href")) hot = "".join(item.xpath(".//div[@class='pts']/div/text()")) video_list.append({ 'rank': rank, 'videolink': video_link, 'title': title, 'play': play, 'comment': comment, 'upname': upname, 'uplink': uplink, 'hot': hot }) return video_list def write_Excel(): # 将爬取的信息添加到Excel video_list = spider() workbook = xlwt.Workbook() # 定义表格 sheet = workbook.add_sheet("b站热门视频") # 添加sheet的name xstyle = xlwt.XFStyle() # 实例化表格样式对象 xstyle.alignment.horz = 0x02 # 字体居中 xstyle.alignment.vert = 0x01 head = ['视频名', 'up主','排名', '热度','播放量','评论数'] for h in range(len(head)): sheet.write(0, h, head[h], xstyle) i = 1 for item in video_list: # 向单元格(视频名)添加该视频的超链接 if '"' in item["title"]: item["title"] = item["title"].split('"')[1] title_data = 'HYPERLINK("'+item["videolink"]+'";"'+item["title"]+'")' # 设置超链接 sheet.col(0).width = int(256 * len(title_data) * 3/5) # 设置列宽 sheet.write(i, 0, xlwt.Formula(title_data), xstyle) name_data = 'HYPERLINK("'+item["uplink"]+'";"'+item["upname"]+'")' sheet.col(1).width = int(256 * len(name_data) * 3/5) sheet.write(i, 1, xlwt.Formula(name_data), xstyle) sheet.write(i, 2, item["rank"], xstyle) sheet.write(i, 3, item["hot"], xstyle) sheet.write(i, 4, item["play"], xstyle) sheet.write(i, 5, item["comment"], xstyle) i += 1 # 如果文件存在,则将其删除 file = "b站热门视频信息.xls" if os.path.exists(file): os.remove(file) workbook.save(file) if __name__ == '__main__': write_Excel()
结果展示:
以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持。
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件!
如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
白云城资源网 Copyright www.dyhadc.com
暂无“Python如何爬取b站热门视频并导入Excel”评论...
更新日志
2024年12月25日
2024年12月25日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]