Thinkai's Blog

Autohotkey|Python|php|aardio|VOIP|IT 爱好者

采集奇书网qisuu小说到数据库 Autohotkey 4921

作者为 发表

Autohotkey

;预配置项
url_l = http://www.qisuu.com/soft/sort01/index_
id = 2 ;初始页码
maxid = 255 ;最大页码
url_r = .html
site =  http://www.qisuu.com
kind = 玄幻奇幻 ;分类 1玄幻奇幻_289 2武侠仙侠_211 3女频言情_792 4现代都市_255 5历史军事_141 6游戏竞技_99 7科幻灵异_154

#NoEnv
OnExit, exit
;初始化连接数据库 以便反复查询
DBFileName := A_ScriptDir . "qisuu.db"
global DB
DB := new SQLiteDB
If !DB.OpenDB(DBFileName) {
   MsgBox, 16, SQLite错误, % "消息:`t" . DB.ErrorMsg . "`n代码:`t" . DB.ErrorCode
   ExitApp
}
;首先检查初始化
if !IsObject(Query("select 1 from sqlite_master where name='novel'")) ;检查novel表
	Exec("CREATE TABLE ""novel"" ( ""kind"" TEXT(255), ""name"" TEXT(255), ""author"" TEXT(255), ""size"" TEXT(255), ""class"" TEXT(255), ""url"" TEXT(255), ""image"" TEXT(255), ""description"" TEXT(255), ""download"" TEXT(255), ""creat_date"" TEXT(50), ""id"" INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL)")

Loop % maxid-id
{
	list := URLDownloadToVar(url_l id url_r,"gb2312") ;抓取小说列表
	a := StrSplit(list,"`n","`r") ;分割行为数组
	a_id = 465 ;直接跳到正文
	Loop
	{
		a_id++
		if (a_id>a.maxindex())
			break
		;抓取文章信息
		if (RegExMatch(a[a_id],"s+<[^>]*>作者:([^<]*)<[^>]*>大小:([^<]*)<[^>]*>等级:<em class=""lstar(d)""><[^>]*><[^>]*>更新:([^<]*)<[^>]*>",b) || RegExMatch(a[a_id],"s+<[^>]*>作者:<[^>]*>([^<]*)<[^>]*><[^>]*>大小:([^<]*)<[^>]*>等级:<em class=""lstar(d)""><[^>]*><[^>]*>更新:([^<]*)<[^>]*>",b))
		{
			author:=b1,size:=b2,class=b3,creat_date:=b4
			a_id++
			if (RegExMatch(a[a_id],"s+<a href=""([^""]*)""><img src=""([^""]*)""><[^>]*><[^>]*>([^<]*)<[^>]*><[^>]*><[^>]*>",c) || RegExMatch(a[a_id],"s+<a href=""([^""]*)""><img src=""([^""]*)"">([^<]*)<[^>]*>",c))
			{
				url:=site c1,image:=site c2,name:=c3
				a_id++
				RegExMatch(a[a_id],"s+<div class=""u"">([^<]*)</div>",f)
				description := f1
				page := URLDownloadToVar(url,"gb2312") ;获取详细页的下载地址
				d := StrSplit(page,"`n","`r")
				Loop % d.maxindex()
				{
					if RegExMatch(d[A_Index],"s+<a class=""downButton"" href='([^']*)' title=""[^""]*"">RAR格式下载</a>",e)
					{
						download:=e1
						ToolTip % id "页:" name
						 Exec("INSERT INTO ""novel"" (""kind"", ""name"", ""author"", ""size"", ""class"", ""url"", ""image"", ""description"", ""download"", ""creat_date"") VALUES ('" kind "','" name "','" author "','" size "','" class "','" url "','" image "','" description "','" download "','" creat_date "')") ;插入数据库
						break
					}
				}
			}
		}
	}
id++
}
MsgBox, Ok

exit:
DB.CloseDB()
DB =
ExitApp

获取完整版


来了就留个评论吧! 6个评论



ロレックス時計コピー 2020年6月5日 的 21:32

購入当時のものは全てあります ポーランド王位継承権を持つポニャトフスキはナポレオン戦争にフランス軍の将軍として参加、1807年にポーランドはワルシャワ公国として再び独立した。
ベル&ロスがヴィンテージコレクションに新たに追加したブルーの文字盤とストラップが特徴的な「ヴィンテージ BR 123 エアロナバル」のカーフストラップ仕様をレビュー。
男にとってアクセサリーで嗜好品、そして絶対的な”拘りのカタチ”でもあります。
基本はシンプルなステンレスモデルのためオンオフ問わない使用が可能ですが、インデックスや独特の針にはベル&ロスのデザインアイデンティティがふんだんに詰まっており、時計愛好家もベル&ロスファンも納得のシリーズではないでしょうか。
ポーランド共和国(ポーランドきょうわこく、ポーランド語: Rzeczpospolita Polska)、通称ポーランドは、中央ヨーロッパに位置する共和制国家。
ソ連主導のルブリン政権が新たなポーランド国家となった。
マグナートの領地は、各領主がロシア皇帝に臣従を誓うことを条件に守られた。
この間、ポーランドの人々は数々の蜂起や社会発展運動(「有機的労働運動」や「ポーランド実証主義運動」と呼ばれる一連の運動)など様々な方法で独立運動を行ってきた。
14世紀にはヨーロッパ大陸での反ユダヤ主義から、ポーランド国内法の宗教的・民族的寛容さから多数移住してきた。
一般的な日本人の腕にはBR03の方が、収まりがいいとも言われています。
41mmと、日本人も使いやすいサイズ感です。
このシリーズはベル&ロスの腕時計の最上位機種に属します。
有名時計ブランドで創業100年未満の時計ブランドの方が、少ないほどです。
ベル&ロスは1992年の創業、そしてジンから完全独立したのは2002年の事、つまり創業から30年ほどしかたっていない、時計業界では駆け出しのブランドです。
時計業界は100年以上続く老舗ブランドが犇めく業界です。
スタイリッシュなラグや6時位置に絶妙に配されたスモールセコンドなど、創業者兼デザイナーであるブルーノ・ベラミッシュ氏の実力が遺憾なく発揮されているのではないでしょうか。
ケースにはチタンを採用したモデルで、価格は200万円以上とかなりの金額です。
BR02はBR01シリーズとは異なるルックスのトノー型(樽型)を採用。

ロレックス時計コピー https://www.yuku006.com/ProductDetail.aspx?Id=201907071020435020

その他の世界一流スーパーコピー 2020年5月27日 的 06:11

爆安SALEが開催中

ブランドコピー靴通販ショップの爆安SALEが開催中

通販ショップは世界有名なブランドのシューズのブランドコピー品を激安でお客様に提供しています。
高級の素材と高技術を結び付けて世界最高級のブランドコピー品だけ扱います。
ルイ・ヴィトン靴コピー、コピーシャネルシューズ、ミュウミュウサンダルコピー
今、いろいろブランド コピー新品が登場します。
ぜひおすすめです。
その他の世界一流スーパーコピー https://www.yutee007.com/brand/list-114.html

偽物ブランド時計 2020年5月25日 的 10:12

スーパーコピー時計専門店
スーパーコピーブランドコピーN級品時計激安通販
ロレックスコピー販売、最高級ロレックススーパーコピーN級品偽物優良店
ブランドバッグ スーパーコピー,スーパーコピーブランド販売
ルイヴィトン モノグラム スーパーコピーイリュージョン レザー ブリーフケース
偽物ブランド時計 https://www.yuku006.com/ProductList1.aspx?TypeId=840830569083478

ルイヴィトンバッグ 2020年5月22日 的 03:27

★弊社は「信用第一」をモットーにお客様にご満足頂けるよう
★全物品運賃無料(日本全国)
★不良品物情況、無償で交換します.
★税関没収する商品は再度無料で発送します
ルイヴィトンバッグ https://www.watcherdg.com/watch/menu-pid-30.html

誕生日プレゼント 2020年5月21日 的 18:41

ヴィトンコピーバッグ
ルイヴィトンスーパーコピーバッグ モノグラム対応 激安 安心通販
大人気のルイヴィトンスーパーコピーバッグの種類ご紹介です!
弊社のルイヴィトンモノグラムバッグスーパーコピー品は生産工場から直接仕入れます から!
だから安いです。本舗は専門のブランド コピー品小売屋でございます,よろしくお願い 申し上げます。
[url=https://www.yuku006.com/ProductList1.aspx?TypeId=295271136690468]誕生日プレゼント[/url]

avel 2016年5月30日 的 09:17

怎么已运行就提示没有找到SQLite3.dll. 目录下面明显都有的。


友情链接:Autohotkey中文论坛Autohotkey中文帮助Autohotkey官网我的B站直播间Autohotkey中文网联系作者免GooglePlay APK下载

 主题设计 • skyfrit.com  Thinkai's Blog | 保留所有权利

60 queries in 1.049 seconds |