[Python]簡單的爬網程式

最近去學了Python 有點後悔怎麼沒有早點認識他

Python寫起來真的很直覺 目前已經快要取代R 成為我的心頭好!

以下是筆記我的第一支爬網程式

by the way, GitHub的Gist服務實在是太棒溜~



程式會爬yahoo電影的網頁 抓出我需要的資訊 並另存在一個txt檔案 結果像這樣

電影名稱:小小兵,Minions
上映日期:2015-07-09
類　　型:動畫,喜劇
片　　長:1時33分
導　　演:《神偷奶爸》皮耶考芬,《羅雷司》凱爾巴爾達
演　　員:(配音)《地心引力》珊卓布拉克,《神偷奶爸》史提夫卡爾,喬漢姆,《浪人47》真田廣之,《怒火狂飆》凱蒂米克松,《史瑞克2》珍妮佛珊德絲
發行公司:環球影業
官方網站:未提供
劇情介紹:由環球影業以及Illumination娛樂公司出品的《小小兵》故事起源於盤古開天時期，剛開始只是一個黃色的有機體，隨著時間漸漸演化成小小兵團，他們的存在目的就是要服侍當代最兇惡的主人，然而從T. Rex 恐龍，埃及法老王，拿破崙甚至是德古拉，小小兵總是不停的失敗了-到最後小小兵們發現已經沒有可以服侍的主人，從此開始鬱鬱寡歡，甚至逐漸凋零。這時其中的一隻小小兵—凱文他有個偉大的計畫，就是帶著他的麻吉—大胃王史都華還有膽小的蘿蔔，挺身而出踏上尋找新主人的冒險旅程…

留言

  1. 匿名2016年4月11日 下午4:22

    請教您 如果執行一直出現 輸出 "發生錯誤" 的話是哪邊需要修改呢??

    回覆刪除
    回覆
    1. XYT2016年4月11日 下午6:42

      請問是你是直接用我的程式去跑 出現"發生錯誤"嗎 還是出現"發生error"

      刪除
  2. XYT2016年4月11日 下午6:41

    作者已經移除這則留言。

    回覆刪除
  3. 匿名2016年4月12日 下午2:18

    您好 對 我是直接用您的程式去跑 但是印出 發生error 想請教 要改哪邊 可以正常抓組電影資訊 存出來呢??

    回覆刪除
  4. 匿名2016年4月12日 下午2:58

    已解決瞜~ 改了存檔路徑後能正常存取了 感謝

    回覆刪除

張貼留言

這個網誌中的熱門文章

R中Try and Catch的寫法

圖片
在R裡的Try and Catch可能比較少人用到 因為R code出現錯誤時不會導致R整個停機 只會出現錯誤訊息 而且可以繼續運作 但是因為我的系統是用Java去call R，R如果有error會停止運作然後害我整個系統死機 所以我需要一個方法可以先楨測我的R code有沒有error，如果有錯就不往下執行了 範例如下: 如果我直接在R裡面執行 a<-'abc' b<-1 c<-b/a 會看直接看到錯誤，因為我不能把字串去除以一個數值 所以我加了try and catch之後 Erroresult<- tryCatch({ a<-'abc' b<-1 c<-b/a }, warning = function(war) { print(paste("MY_WARNING: ",war)) }, error = function(err) { print(paste("MY_ERROR: ",err)) }, finally = { print(paste("End Try&Catch")) }) 結果就會像這樣了，Error已經不是紅色，而是一個字串輸出，可以像我一樣把tryCatch的結果再另存到一個變數，例如Erroresult，這樣你就可以把這個error message存著 Try and Catch的架構像這樣，其中warning,error,finally的結構一定要有，不然會報錯 tryCatch({ #要執行的指令放這裡 },warning = function(war){ print(paste("MY_WARNING: ",war)) #如果有warning則輸出warning,"MY_WARNING: "這一行可以自己改 },error = function(err) { print(paste("MY_ERROR: ",err)) #如果有error則輸出error,"
閱讀完整內容

如何將DSM(NAS)變成Mail Server

圖片
最近我的法國老闆指派給我一個新的任務 他想要把家裡的NAS變成mail server 從此以後收發mail不求人 說這樣子就有自由了(法國人可以不要動不動就扯到自由嗎) 身為家裡的資訊長兼軟體工程師兼財務長兼保潔阿姨 這個工作派下來之後我還真不曉得可以指派給誰 只好自己動手了 其實我也沒有設定過mail Server 都是從骨哥大師那裡查到一個一個步驟 撞牆之後再查一次 設定了好幾天以後終於成功了 用手機或是email軟體都可以收發才算大功告成 發現沒有人把整個流程寫下來 那我就來寫吧 多做善事看能不能以後不要下地獄 或是下了地獄至少不要上刀山下油鍋 當個觀眾就可以了 希望閰王爺有看到這一篇blog 我選擇用中華電信申請浮動ip送的固定ip + 去登記一個自已喜歡的網域來處理 申請網域的公司是法國老闆選的這家 gandi 我覺得服務很不錯啊  鄉民可以參考看看 首先我設定讓DSM可以自動撥號連網 取得固定ip  在DSM的應用程式裡面 選擇EZ-INTERNET 一開始會請你設定可以通過防火牆的port有那些 記得要把 mail server 跟 mail station 打勾 然後填入中華電信的帳號密碼 設定完成以後 你的DSM就可以自動撥號取得一組ip 假設是112.77.115.94 然後要到申請網域公司的網站 例如我就是到 gandi 去設定很重要的MX碼，同時也告訴gandi要把我註冊的網域跟我的ip連在一起哦 以gandi的介面為例，假設我申請了一個網域叫做abc.com 就要有一個 A type recored Name @ , Value "你的ip" 然後要有一個MX recored Name @ Value abc.com. 這樣子就等於是宣告所有寄到@abc.com的信都要指到112.77.115.94這個位址 因為我的法國老板喜歡@後面直接接網域名稱abc.com 所以要用@來設定 如果你想要設定成例如 email.abc.com 就要把 A type recored Name 改成 email, Value "你的ip" 對應的MX recored Name email, Value abc.com. 以此類推 鄉民們可以看到 我還另外
閱讀完整內容

使用VBA記錄股市每分鐘的交易記錄

其實也是一個很簡單的程式，但是看起來就不像是高手寫的，因為一直跳來跳去 假設工作表2是DDE的資料，將DDE的資料每分鐘copy到工作表1 Dim i As Single '宣告變數i Dim Workday As Integer  '宣告變數Workday Private Sub workbook_open() '當這個excel檔案打開時，執行以下程序 Workday = Application.Evaluate("WEEKDAY(TODAY())-1")     '算出今天是一星期中的第幾天，並將數值存入Workday If Workday >= 1 And Workday <= 5 Then   '判斷是否為工作天     If Format(Time, "hh:mm:ss") >= "09:00:00" And Format(Time, "hh:mm:ss") <= "13:31:00" Then   '判斷是否為盤中         Call a  '執行程序a     Else         Application.OnTime TimeValue("00:09:00"), "ThisWorkBook.a"  '如果不是在盤中則等待明天九點開盤     End If End If End Sub Private Sub a() '宣告一個程序a    i = 2    '將i預設為2,因為資料是由第2行開始貼上    Call b   '執行程序b  End Sub  Private Sub b() '宣告一個程序b     Range("Stock200").Rows("2:201").Copy     'Copy範圍"Stock200"中的第2到第201列     工作表1.Cells(i, 1).PasteSpecial xlPasteValues '從工作
閱讀完整內容