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

[µo°Ý] Â^¨ú¤WÂdªÑ»ù¦æ±¡~¹J¨ì«D¥æ©ö¤é§Y¸õ¥X¿ù»~°T®§!

¦^´_ 9# cudui
³o¥i¦Û¤v¸Õ¸Õ¬Ý ¤£¦æ¦A»¡

TOP

¥HG¤jªº·§©À©µ¦ù..

¦b¥X°ÝÃDªº¨º¤@¦C¤§«e,¼W¥[:
"On Error Resume Next"

´N¯à¸õ¹L¿ù»~°T®§¤F!!
·s¤â¤W¸ô

TOP

¦^´_ 5# chen_cook

ÁÂÁÂCOOK¤j,
§Ú¥H§Aªº»yªk§ï¼g´N¥i¥H¥Î¤F!!
·s¤â¤W¸ô

TOP

¥»©«³Ì«á¥Ñ cudui ©ó 2012-4-22 14:12 ½s¿è

¦A½Ð°Ý¤@¤U~~

§Ú­ì¥ý§ìªº¬Ohtmlªº¸ê®Æ,¥i¥H¤£»Ý¦A³B²zCSVÀɶפJªº°ÝÃD,
(Connection:="URL;http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_" & myear & mmon & nowday & ".html" _

¦ý¬O,¨Ï¥Îhtml¹J¨ìªºª¬ªp¬O~
§ÚÂ^¨ú¨ä¥L¥æ©ö¤éªº®É­Ô³£¨S°ÝÃD,¦ý¤@¥¹­n¶×¤J"2/10","4/10"...µ¥n¤ë 10¤éªº¥æ©ö¸ê®Æ®É,
­ÓªÑ¦æ±¡°£ÀɦW¥~,¨ä¾l´N·|¬O¤@¤ùªÅ¥Õ...(¦ýn¤ë20¤é.30¤é³£¨S°ÝÃD,©Ò¥HÀ³¸Ó¤£¬O"0"ªº°ÝÃD)
¦Ó§ÚÀˬd¹ê»Ú³sµ²¤]³£¥¿½T,¥i¥H¥¿½T³sµ²¨ì¸Óºô­¶
(http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_1010410.html)
¦Ó¨Ï¥ÎCSV«hµL¦¹°ÝÃD~~

¦³¨S¦³¤j¤j¥i¥HÀ°¦£¸Ñ´b¤@¤U³o¨ì©³¬O¦]¬°¤°»ò????
ÁÂÁÂ!

ªþ¤W­ì©l½X¦p¤U:


  1. '¤WÂd­ÓªÑ¾ú¥v¸ê®Æ
  2.    With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_" & myear & mmon & nowday & ".html" _
  3.         , Destination:=ActiveCell.Offset(2, 0))
  4.    
  5.         .FieldNames = True
  6.         .RowNumbers = False
  7.         .FillAdjacentFormulas = True
  8.         .PreserveFormatting = True
  9.         .RefreshOnFileOpen = False
  10.         .BackgroundQuery = True
  11.         .RefreshStyle = xlInsertDeleteCells
  12.         .SavePassword = False
  13.         .SaveData = False
  14.         .AdjustColumnWidth = True
  15.         .RefreshPeriod = 0
  16.         .WebSelectionType = xlSpecifiedTables
  17.         .WebFormatting = xlWebFormattingNone
  18.         .WebTables = "1,2,3,4"
  19.         .WebPreFormattedTextToColumns = True
  20.         .WebConsecutiveDelimitersAsOne = True
  21.         .WebSingleBlockTextImport = False
  22.         .WebDisableDateRecognition = False
  23.         .WebDisableRedirections = False
  24.         On Error Resume Next
  25.         .Refresh BackgroundQuery:=False
  26.       
  27.     End With
½Æ»s¥N½X
·s¤â¤W¸ô

TOP

¦^´_ 12# cudui
[¦b¥X°ÝÃDªº¨º¤@¦C¤§«e,¼W¥[: "On Error Resume Next"]
¦b¨ºµ{§Ç¤¤ ¹w­p·|µo¥Í¿ù»~ªºµ{¦¡½X «e£¾ªº¥ô¤@¦C ¼W¥[: "On Error Resume Next" ¬Ò¥i¥H

¦^´_ 14# cudui
http://www.otc.org.tw/ch/stock/a ... OTE_AL_1010402.html
1010402.html ³oºô­¶ ªº¤ë¥÷ ¤é´Á³£¬O¨â¦ì¼Æ
Connection:="URL;http://www.otc.org.tw/ch/stock/a ... s_no1430/SQUOTE_AL_" & myear & mmon & nowday & ".html
mmon & nowday  ¶·¥ý³B¸Ì¬°¨â¦ì¼Æ
  1. mmon = Format(mmon, "00")
  2. nowday = Format(nowday, "00")
½Æ»s¥N½X

TOP

¦^´_  cudui
[¦b¥X°ÝÃDªº¨º¤@¦C¤§«e,¼W¥[: "On Error Resume Next"]
¦b¨ºµ{§Ç¤¤ ¹w­p·|µo¥Í¿ù»~ªºµ{¦¡½X ...
GBKEE µoªí©ó 2012-4-22 15:23


G¤j:

§Ú¥Î [A1]="URL;http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_" & myear & mmon & nowday & ".html" ¥h¬Ý,
±o¥X¨Óªº³sµ²¤´¬Ohttp://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_1010410.html¨S¿ù,
¦Ó¥B,
¦pªG¯u¬O¤G¦ì¼Æªº°ÝÃDªº¸Ü,
¤£À³¸ÓN¤ëªº20¤é / 30¤é³£¥i¥H§ì¨ì¸ê®Æ,
¦ý10¤é«h§ì¤£¥X¨Ó...

¥t¥~,§Ú¦b¤§«e¤]¦³¥[¤J§PÂ_¦¡~ N<9«h«e­±¥["0",
¨Ã¥[¼g  nowday = Left(nowday & "0", 2)...
¥i¬Oµ²ªG³£¤@¼Ë~~
·s¤â¤W¸ô

TOP

¦^´_ 16# cudui
À³¬O³oºô­¶ªº°ÝÃD À°§A¬Ý¤F¤@¤U 3/1 ,3/2, 4/10  ³£µLªk¶×¤J
¥i§ï¥Î  Workbooks.Open ("http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_AL_" & myear & mmon & nowday & ".CSV")  ¶×¤J

TOP

¦^´_  cudui
À³¬O³oºô­¶ªº°ÝÃD À°§A¬Ý¤F¤@¤U 3/1 ,3/2, 4/10  ³£µLªk¶×¤J
¥i§ï¥Î  Workbooks.Open ("ht ...
GBKEE µoªí©ó 2012-4-22 17:14



ÁÂÁÂG¤j!
§Ú¦³§ï¥ÎCSV½T©w¨S¦³°ÝÃD,
¥u¬O¤£À´¬°¦ó¥Î"HTML"¤~·|¥X²{¦¹¤@ª¬ªp....¦n©_¬Oµ{¦¡­þ¸Ì¨S¼g¦n¦Ó¤w...
·s¤â¤W¸ô

TOP

¦^´_ 14# cudui


    ¨Ì¸Ó­ì©lºô­¶½s¼g¤§¤º®e,¦n¹³¬O§â,csvªºÀÉÂà.html¿é¥X±Þ­±©Ò­P,§A­Y¥Î¶×¤Jºô­¶¤è¦¡·|¦^À³§Aºô­¶µL¦^À³¤§°T®§!!
    (©Ò¥H¤~·|¸ò§A»¡§ì¿ùºô­¶¤F,¦]¬°¥¦¥»¨­´N¨S¦³.html³o­Óºô­¶§a!!)Âd¶R¤¤¤ßªººô­¶¬O.php¤£¬O.html§ìªk¤£¦P¤@¯ëªº
    .html¤§«e´N¦³¸ò§A´£¹L¤F:@ .... §A·|°Ý¨ä¥¦ªº¨S¦³°ÝÃD°Ú!!§Ú¤]¤£ª¾¹D¬°¤°»ò,:dizzy: ­«ÂI¬O§ì¨ì§A­nªº¸ê®Æ§a!!­Y
    .csv¥i¥¿½Tget data,¤Ï¥¿¬OexcelÀ°¦£°µ,¬Ý¨ì¸ê®Æ´N¦n:D !!!.htmlµLªk¶×¤J¼ÐÃD¤£¬O¶Ü??

TOP

¦^´_ 19# chen_cook


    php¬d¸ß«á¥X¨Óªº¬Ohtmlªººô­¶,¥t¥~¤~¦³csv¤U¸üªºfunction..
    ©Ò¥H§Ú¤]¤£ª¾¹D¹ê»Ú¬O½Ö¥ý½Ö«á...
    php§ìdata²{¦b¨S°ÝÃD¤F,
    ´N¥u³Ñ¦n©_¬°¤°»òn¤ë10¤éªºhtml data¼´¤£¥X¨Ó¦Ó¤w ( ­Y³æ¯Â³sµ²**0410.html ¥i¥H¬Ý¨ì¸ê®Æ,¦ývba´N¬O§ì¤£¤U¨Ó~~)

    ¸Õ¤F«Ü¤[,¯}¤£¤FÃö...©_¤òÂû¦³ÂI¤£²n½}¤F!!!
    ªGµM"¦n©_·|®`¦º¤@°¦¿ß"°Ú!!~~:funk:
·s¤â¤W¸ô

TOP

        ÀR«ä¦Û¦b : ºw¤ô¦¨ªe¡C²É¦Ì¦¨ÅÚ¡A¤Å»´¤vÆF¡A¤Å¥Hµ½¤p¦Ó¤£¬°¡C
ªð¦^¦Cªí ¤W¤@¥DÃD