ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ºô­¶¸ê®Æ¤U¸ü²¤Æ

½Ð°Ý³o­Ó¬O¤£¬O¤w¸gµLªk¤U¸ü¤F???³o´X¤Ñ¤U¸ü³£¥u¶]¥X¬¡­¶¥N¸¹¡A¦Ó¨S¦³¤º®e¸ê®Æ???
shall

TOP

³o´X¤Ñ¤£¦¡¤£¯à§ì,¦Ó¬Oºô¯¸³Q°Ê¤F¤@¨Ç¤â¸},¨º¤j®a§ìªº«Ü¨¯­W¤]«Üµh­W,§ï¥Îpython§ì·|¤ñ¸û¦n¤@ÂI

TOP

§Ú¸Õ¤F¤@¤U, ·sªº link Åܦ¨ :
http://bsr.twse.com.tw/bshtm/bsContent.aspx?StartNumber=2498&FocusIndex=All_59
¦ý¬O­ì¥»¥i¥Î All_100 §ì¨ì©Ò¦³ªº pages, ²{¦b¤w¸g¤£¯à¥Î¤F, ¥²¶·­nª¾¹D½T¤Áªº page number,
½Ð°Ý¤@¤U, ¨º­ì©lªºµ{¦¡¸Ó¦p¦ó­×§ï ?
ÁÂÁÂ !!
manny

TOP

¥»©«³Ì«á¥Ñ lalalada ©ó 2012-7-26 10:51 ½s¿è

¦P¼Ó¤W
¥H¬°²×©ó«Ø¦n¦Û°Ê§ó·s¸ê®Æªºµ{¦¡»¡QQ
­ì©l½X¸Ì¦³­Ó <font color="#ffcc00;" size="4"><b><span id="sp_ListCount">59</span></b>
¤£ª¾¹D¯à§_¥Î¨Ó¨ú±o­¶¼Æ
¤]µo²{¦³
//    window.open("bshtm/"+ HiddenField_spDate +"/"+ document.getElementById("hidTASKNO").value+"/"+ document.getElementById("hidTASKNO").value+".csv");
window.open("bsContent.aspx?StartNumber=" + document.getElementById("hidTASKNO").value + "&download=csv");
¦³¾÷·|¤U¸üCSVÀÉ?
¦Ó¥B¼Ó¤W»¡ªº¨º­Óºô§}¤~§ï¨S´X¤Ñ¦Ó¤w¤S¦bALL¤W³]·s­­¨î
¬Ý¨Ó¬O¦s¤ß¤£·QÅý¤H§ì¤F
¸Ü»¡¤§«e¼g«H¥h°Ý»¡¤K¤ë¶}©l­n´£¨Ñ¥I¶OCSV
»ª¦ü¬Oºô­¶§ïª©¥D¦]...

TOP

¦^´_ 46# mannyhsu
¦^´_ 47# lalalada
  1. Option Explicit
  2. Sub Ex()
  3.     Dim Stock_No As String, wb As Workbook
  4.     Do
  5.         Stock_No = InputBox("½Ð¿é¤JªÑ²¼¸¹½X")
  6.         If Stock_No = "" Then If MsgBox("¨ú®ø¿é¤JªÑ²¼¸¹½X?", vbYesNo) = vbYes Then Exit Sub
  7.     Loop Until Stock_No <> ""
  8.     For Each wb In Workbooks
  9.         If wb.Name = "bsContent.aspx" Then wb.Close False
  10.     Next
  11.     On Error Resume Next
  12.     Application.DisplayAlerts = False
  13.     Workbooks.Open ("http://bsr.twse.com.tw/bshtm/bsContent.aspx?StartNumber=" & Stock_No & "&download=csv")
  14.     If Err.Number <> 0 Then MsgBox "1 ½Ð¬d©ú ªÑ²¼¸¹½X " & Stock_No & "¬O§_¦s¦b" & Chr(10) & _
  15.     "2 ªÑ²¼¸¹½X " & Stock_No & " ¦p¥¿½T ½Ð­«·s¿é¤J " & Stock_No
  16.     Application.DisplayAlerts = True
  17. End Sub
½Æ»s¥N½X

TOP

¦^´_ 48# GBKEE

¤Ó·P®¦¤F, ³o­Ó¥i¥H¥Î ~~
manny

TOP

¥»©«³Ì«á¥Ñ mannyhsu ©ó 2012-7-26 20:56 ½s¿è

¦^´_ 48# GBKEE

½Ð°Ý GBKEE ¤j,
¬O§_¥i¥H¦b¥Ø«eªº¸Õºâªí¤¤¤@­Ó¤u§@ªí(¨Ò¦p temp)¦s©ñ csv ¸ê®Æ,
¦Ó¤£¬O¥t¶}¤@­Ó¸Õºâªí, ÁÂÁ !!

¥t¥~, ¥i¯à¬O­ì©lªº CSV ¸ê®Æ¦³°ÝÃD,
°£¤F¤º®e®æ¦¡¤£¹ï, ¦³¨ÇÄæ¦ì¤º¤]¨S¦³¸ê®Æ ...
manny

TOP

¥t¥~, ¥i¯à¬O­ì©lªº CSV ¸ê®Æ¦³°ÝÃD,
°£¤F¤º®e®æ¦¡¤£¹ï, ¦³¨ÇÄæ¦ì¤º¤]¨S¦³¸ê®Æ ...mannyhsu µoªí©ó 2012/7/26 20:50


³o¸Ì¦³¥¿½Tªº http://forum.twbts.com/redirect.php?goto=findpost&pid=41636&ptid=7309

TOP

        ÀR«ä¦Û¦b : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD