Python 板


LINE

聯合報有個網站可以看到各年的頭版,分享抓取的程式,參考參考.. 2014-01-06 改為多執行緒 ------------------------------------------------------------ #!/usr/bin/env python #!coding=utf-8 import os import sys import time import pycurl import datetime import threading from PIL import Image from StringIO import StringIO class GetPic(threading.Thread): def __init__(self, string, id): threading.Thread.__init__(self) self.setName(str(id)) self.lastLen = 1 self.lock = threading.Lock() def run(self): while 1: #取得鎖定 if self.lock.acquire(): #取出年份 if len(PP): #取得任務 self.y = PP.pop(0) self.lock.release() else: #已經沒有任務了,退出線程 self.lock.release() print time.strftime("%Y-%m-%d %H:%M:%S", time.localtime())+" Thread id:"+self.getName()+" 結束." #跳出迴圈線程結束 break else: continue #確認年份目錄 self.yString = str(self.y) self.path = os.path.normpath(path+"/"+self.yString) if not os.path.isdir(self.path): os.makedirs(self.path) print "目錄 "+self.path+" 不存在,產生新目錄." print time.strftime("%Y-%m-%d %H:%M:%S", time.localtime())+" Thread id:"+self.getName()\ +" 開始擷取 "+self.yString+"年." #取出月份 for self.m in xrange(1, 13): #1951年9月16日前資料不存在所以跳過,寫法不是很好,將就一下 if self.y == 1951 and self.m < 9: continue #未來資料不存在所以跳過 if self.y == now.tm_year and self.m > now.tm_mon: continue #幫月份小於十的月份前加上0 if self.m < 10: self.mString = "0"+str(self.m) else: self.mString = str(self.m) #取出日期 for self.d in xrange(1, 32): #未來資料不存在所以跳過 if self.y == now.tm_year and self.m == now.tm_mon \ and self.d > now.tm_mday: continue self.dString = str(self.d) #幫日期小於十的日期前加上0 if self.d < 10: self.dString = "0"+self.dString #產生下載日期 self.date = self.yString+self.mString+self.dString #產生下載檔名 self.savefile = os.path.normpath(self.path+"/"+self.date+".jpg") #圖片已存在或已下載就略過 if os.path.isfile(self.savefile): #print self.savefile+" 已存在." continue else: #嘗試下載圖片 try: self.buffer = StringIO() self.c = pycurl.Curl() self.c.setopt(self.c.URL, picUrl+self.date) self.c.setopt(self.c.WRITEFUNCTION, self.buffer.write) self.c.perform() self.c.close() except: #下載圖片失敗 continue else: #圖片是"本日無出報"或圖片跟前天重複就不儲存了 if self.buffer.len < 19000 or self.buffer.len == self.lastLen: #print self.savefile+" buffer.len="+str(self.buffer.len)+ \ # " lastLen="+str(self.lastLen) continue #儲存圖片 try: self.buffer.seek(0) self.lastLen = self.buffer.len self.im = Image.open(self.buffer) self.im.save(self.savefile, 'JPEG') except: #儲存圖片失敗 print time.strftime("%Y-%m-%d %H:%M:%S", time.localtime())+" 儲存 "+self.savefile+" 失敗." pass else: #儲存圖片成功 #print time.strftime("%Y-%m-%d %H:%M:%S", # time.localtime())+" 儲存 "+self.savefile+" 成功." pass time.sleep(0.1) def main(): global now, PP, picUrl, path #今天日期 now = datetime.datetime.now().timetuple() #年份範圍 PP = range(1951, now.tm_year+1) #下載網址 picUrl = r"https://event.franklin.com.tw/C2014_11_TGF/showimg.aspx?date=" #存檔路徑 path = os.path.normpath(os.path.dirname(__file__)+"/pic") #存檔目錄不存在 if not os.path.isdir(path): try: os.makedirs(path) except: print "產生存檔目錄 "+path+" 失敗." sys.exit() else: print "存檔目錄 "+path+" 不存在,產生新目錄." print "圖片將儲存於 "+path+" 目錄." #啟動 Thread for i in xrange(1, 6): GetPic('ThreadFun', i).start() time.sleep(0.1) if __name__ == '__main__': main() --------------------------------------------------------------------- -- 標題 [討論] 為什麼女生殖器要叫做"雞掰"? 我翻了諸多成人歷史書籍也沒看過有人寫"雞掰" → darkmanx2:http://0rz.tw/CIAJQ 08/11 21:43 幹,我親戚都在旁邊,你害死我了 --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.132.215.155
※ 文章網址: http://webptt.com/m.aspx?n=bbs/Python/M.1420436445.A.4E3.html
1F:推 TW185930: 推 01/05 13:47
2F:推 DemonDeath: 為啥要比對圖片相似度? 01/05 15:33
3F:推 lc85301: 我同學寫的,好像有加平行來變快 01/05 15:41
※ 編輯: taxi550 (220.132.215.155), 01/05/2015 17:50:35
5F:推 Seudo: 強者我同學 01/05 18:44
※ 編輯: taxi550 (220.132.215.155), 01/06/2015 00:41:21 ※ 編輯: taxi550 (220.132.215.155), 01/06/2015 18:42:42 ※ 編輯: taxi550 (220.132.215.155), 01/06/2015 18:46:18
6F:推 drajan: 感覺這資料很有趣 open source先推!XD 01/07 13:21
7F:推 shaform: 感覺是很強的同學耶 @@ 01/11 12:43







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:BabyMother站內搜尋

TOP