PTT數位生活區 / RegExp (正規表示式 Regular Expression)

[問題] isbn 正規表示法問題

看板RegExp (正規表示式 Regular Expression)作者davidou (老歐 ! 月夜雪嵐)時間12年前 (2013/02/08 21:03)推噓1(1推 0噓 0→)

留言1則, 1人參與討論串1/3 (看更多)

我現在在用vs2005 寫一個功能是透過isbn去撈一本書的資料 http://192.83.186.170/search~S10?/i9789867299161/i9789867299161/1%2C2%2C5%2CB/marc&FF=i9789867299161&1%2C%2C3 而上面這網頁的部份內容如下 <pre> LEADER 00000cam 2200361 450 001 101771764 010 0 986-7299-16-7|b第1冊 : 平裝|dNT$160 225 1 Kadokawa fantastic novels 306 v.3, v.4, v.5為2006年第2刷 327 0 1, 紅風乍現 = はじまりの風は紅く|a2, 黃金的約定 = 黄金の約束|a3, 紫殿花開 = 花は紫宮に咲く|a4, 茶都遙想 = 想いは遙かなる茶都へ|a5, 黑之月宴 = 漆黒の月の宴|a6, 近朱者赤 = 朱にまじわれば紅 681 861.57|b8468|v增訂七版 </pre> 我只是大致列個範例這樣看得出來前面的數字代表這行的內容為（作者書名 ..）之類的而我現在不知道該怎寫這個表示式下面是我寫到一半的程式碼想當然而是錯的 Dim surl As String = "http://192.83.186.170/search~S10?/i9789867299161/i9789867299161/1%2C2%2C5%2CB/marc&FF=i9789867299161&1%2C%2C3" Dim aa As WebRequest = HttpWebRequest.Create(surl) Dim bb As WebResponse = aa.GetResponse Dim cc As New StreamReader(bb.GetResponseStream) Dim pattern As String = "200.*?" '這邊是錯的 Dim input As String = RichTextBox1.Text For Each m As Match In Regex.Matches(cc.ReadToEnd, pattern) MessageBox.Show(m.Value) Next 請問我該怎撈他的資料呢 -- 只有正妹的無名才有連結價值阿.. http://www.wretch.cc/blog/fancyou 非正妹所以沒有連結價值 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 1.170.12.216